oribeiro Posted December 27, 2018 Report Share Posted December 27, 2018 Pessoal, Estou trabalhando com arquivos temporários em memória com o hb_dbcreate() assim: ///////////////////////////////////////////////// // Arquivo Temporário, no xHarbour 1.2 Somente // // Cria o Arquivo na memória (não usa o Disco) // ///////////////////////////////////////////////// Local _DbfTemp[1]:="ARQTEMP" Hb_DbCreate(_DbfTemp[1],{{ "Nombre", "C", 40, 0 },; // -> Criação do Memory File Temporary com Hb_DbCreateTemp() { "Direccion", "C", 50, 0 },; { "Telefono", "C", 12, 0 },; { "Edad", "N", 2, 0 },; { "Productos", "C", 10, 0 },; { "Nivel", "N", 2, 0 }}) // Seleciona o Arquivo criado na memória e usa os comandos comuns de tratamento dos registros // Select(_DbfTemp[1]) OADbAppend() replace nombre with "Oscar Ribeiro" replace Direccion with "RUA MARCIA PIERRONI, 99" replace Telefono with "55 11 4025-1234" DbAppend() replace nombre with "Marco Ribeiro" replace Direccion with "RUA MARCIA PIERRONI, 99" replace Telefono with "55 11 4025-1234" DbAppend() replace nombre with "Oscar Ribeiro Neto" replace Direccion with "RUA MARCIA PIERRONI, 99" replace Telefono with "55 11 4025-1234" browse() // Cria o indice do arquivo também na memória // index on nombre to clientes Memory Seek "Marco Ribeiro" browse() // Fecha o arquivo e Apaga da Memória // (_DbfTemp[1])->(DBCLOSEAREA()) oaDbDrop("MEM:"+_DbfTemp[1]) Entendi que quando fecho o arquivo com DbCloseArea() o arquivo ainda continua na memória, porque eu consigo abrí-lo novamente com DbUseArea() mas preciso saber se existe algum comando que verifica se o arquivo ainda está lá. Por exemplo, se o arquivo é físico eu uso FILE("ARQTEMP.DBF"), mas com arquivo de memória, existe algum comando similar ao FILE() que verifica se ele está lá? Quote Link to comment Share on other sites More sharing options...
aferra Posted December 27, 2018 Report Share Posted December 27, 2018 // Fecha o arquivo e Apaga da Memória // acredito que tenha que fazer assim para dar certo dbSelectArea( _DbfTemp[1] ) (_DbfTemp[1])->(DBCLOSEAREA()) DbDrop("MEM:"+Alltrim(_DbfTemp[1])) o alttrim por garantia Quote Link to comment Share on other sites More sharing options...
oribeiro Posted December 28, 2018 Author Report Share Posted December 28, 2018 Obrigado Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.