Código Delphi [-] ExtractFileDir(Application.ExeName); Memo1.Lines.LoadFromFile('gen.text');
ExtractFileDir(Application.ExeName); Memo1.Lines.LoadFromFile('gen.text');