Conversão de arquivos binários para texto, string

Delphi

03/02/2005

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


Rodrigo_sjc_sp

Rodrigo_sjc_sp

Curtidas 0

Respostas

Wbb

Wbb

03/02/2005

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


GOSTEI 0
POSTAR