Fórum Conversão de arquivos binários para texto, string #267294
03/02/2005
0
Tenho0 um arquivo binário e preciso abrir pelo delphi e
exibir o em texto. fiz a seguinte rotina
var arq: TextFile;
B: Byte;
Ch: Char;
linha: String;
begin
AssignFile ( arq, ´c:\Data.MULTI.zm9´ );
Reset ( arq);
ReadLn ( arq, linha );
memo1.Lines.add(linha);
CloseFile ( arq );
Só que ele retorna
PK
Como faço pra converter?
o inicio do arquivo é
PK ele abre o binário, mais preciso mostrar a string
exibir o em texto. fiz a seguinte rotina
var arq: TextFile;
B: Byte;
Ch: Char;
linha: String;
begin
AssignFile ( arq, ´c:\Data.MULTI.zm9´ );
Reset ( arq);
ReadLn ( arq, linha );
memo1.Lines.add(linha);
CloseFile ( arq );
Só que ele retorna
PK
Como faço pra converter?
o inicio do arquivo é
PK ele abre o binário, mais preciso mostrar a string
Rodrigo_sjc_sp
Curtir tópico
+ 0
Responder
Posts
03/02/2005
Wbb
Cara, postei um tópico com uma Unit inteira, prontinha, só para fazer isso. Dê uma olhada aqui: http://forum.clubedelphi.net/viewtopic.php?t=57371&highlight=bin¬E1rio
T+
wbb
T+
wbb
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)