Código Delphi [-] procedure TForm1.BitBtn1Click(Sender: TObject); Var Archivo: String; begin Archivo := 'C:\STARW\QUERY1.SQL'; Memo1.Lines.LoadFromFile(Archivo); end;
procedure TForm1.BitBtn1Click(Sender: TObject); Var Archivo: String; begin Archivo := 'C:\STARW\QUERY1.SQL'; Memo1.Lines.LoadFromFile(Archivo); end;