Und angenommen, ich mächte nur jede zweite Zeile in die ListBox1 laden?
Das müsste doch mit einer Zeile Code machtbar sein?
Delphi-Quellcode:
procedure TForm1.Button4Click(Sender: TObject);
var sl: TStringList;
zeilennr: integer;
begin
OpenDialog1.Execute;
Edit3.Text:= Opendialog1.FileName;
sl:=TStringList.Create;
try
sl.LoadFromFile(Edit3.Text); //Datei in Stringliste laden
for zeilennr:=0 to sl.Count-1 do begin //Schleife über alle Zeilen, Zählung
end;
finally
sl.free; //Objekt wieder freigeben
ListBox1.Items.LoadFromFile(Edit3.Text);
Kann das jemand vervollständigen? Also dass ich praktisch nur ungerade Zeilen importieren (Zeile 1, 3, 5, 7....)