Also eigentlich müsste es dann so gehen:
Delphi-Quellcode:
procedure Tmedia.Button7Click(Sender: TObject);
var
datei:textfile;
i: integer;
begin
assignfile(datei,'c:\datei.txt');
rewrite(datei);
for i:=5 to listbox1.items.count do begin
writeln(datei,listbox1.items[i].text);
end;
closefile(datei);
end;
tuts aber nicht:
writeln(datei,listbox1.items[i].text); [Error] midiunit.pas(525): Record, object or class type required