Thema: FileOpen

Einzelnen Beitrag anzeigen

Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#4

Re: FileOpen

  Alt 6. Nov 2009, 10:21
Delphi-Quellcode:
var
  sl:tstringlist;


begin
  sl:=tstringlist.create;
  sl.LoadfromFile(Formwasauchimmer.edit1.Text);
  ...... { Hier eintragen was auch immer Du machen willst}
  sl.free;
end;
oder noch einfacher:

Delphi-Quellcode:
procedure xxxxxbutton1click
begin
  Memo1.Lines.loadfromfile(Edit1.text);
end;
Ist es das was Du suchst?

Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
  Mit Zitat antworten Zitat