Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

choia

abrir arquivo txt em um memo

Recommended Posts

Realmente, foi discutido isto já neste tópico.

cara realmente você ja tinha me passado mas esse codigo nao esta funcionando

beginMemo1.Clear;AssignFile(txt,'C:\Documents and Settings\social\Desktop\trabalho_final_redes\trabalho_final_redes\teste.txt');{$I-}Reset(txt);{$I+}if IOResult = 0 then begin while not Eof(txt) do begin Readln(txt, str); if str <> '' then if copy(str,1,8) = 'Value = ' then Memo1.Lines.Add(copy(str,9,Length(str) - 8)); end; end;CloseFile(txt);end;

nao esta aparecendo nada no memo

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.