Wenn es nur um die Anzeige geht könnte man auch eine virtuelle Listbox verwenden, wobei die Daten dann in einer TStringList (z.B.
FData
) gespeichert werden.
Dazu muss bei der Listbox der Style auf lbVirtual gesetzt und der OnData-Event implementiert werden.
Delphi-Quellcode:
procedure TForm1.ListBox1Data(Control: TWinControl; Index: Integer; var Data: string);
begin
Data := FData[Index];
end;
Das Laden der Datei sähe dann so aus:
Delphi-Quellcode:
var FileName := <filename>;
FData.AddStrings(TFile.ReadAllLines(FileName)); // hier muss es tatsächlich ReadAllLines sein
ListBox1.Count := FData.Count;