Textdatei_anzeigen

[maximov]

Willkommen in der DP

Lad doch die datei in ein liste und bedien dich dann...ungefähr so:

Delphi-Quellcode:

var st:TStringList;
...
st:=TStringList.create;
try
  st.loadFromFile('c:\dat.txt');
  if st.count >= 1 then label1.caption := st[0];
  if st.count >= 2 then label2.caption := st[1];
finally
  st.free;
end;

//edit: mist...zu spät.