Gracias Dec por la respuesta tan rápida, lo voi a probar y te aviso
XaSu!
No encuentro el componente "TStringList" y lo hice así pero no me funciona, disculpa las molestias es que igual soy nuevo en este lenguaje.
Código Delphi
[-]
procedure TformPrincipal.btnAbrirClick(Sender: TObject);
var Dir: string;
t :TStringList;
begin
if CargarPLU.Execute then
begin
t.Create;
t.Clear;
Memo.Clear;
Dir := CargarPLU.FileName;
Memo.Lines.LoadFromFile(Dir);
eDireccion.Text := Dir ; t.LoadFromFile(Dir);
t.CommaText; Memo2.Lines := t; end;
end;
o no es así?