Hi,
ich will in meinem Programm alle in einem bestimten Verzeichnis enthaltenen *.txt Datein in eine ListBox einlesen. Und bei einem Klick au ienen Eintrag diese Daei in ein RichEdit einlesn.
Es geht soweit gut, dass ich die Dateien auflisten kann. Dann gehts aber nicht mehr weiter. Kann mir jemand helfen?
Delphi-Quellcode:
var
Datei: string;
procedure TForm1.ListBox1Click(Sender: TObject);
begin
Datei := ListBox1.Name;
RichEdit1.PlainText := True;
RichEdit1.Lines.LoadFromFile(Datei);
end;