Hallo,
hab eine .txt-Datei mit folgendem Inhalt:
Zitat:
Hans=Mustermann=27=Hesse
Jasmin=Musterfrau=26=NRW
Dieses will ich mittels TStringList auslesen, die Vornamen in einer ListBox anzeigen, den Nachnamen, das Alter und Bundesland in Labels.
Hab das so probiert, hier wird aber das Alter und das Bundesland nicht ausgegeben.
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var i: Integer;
begin
List:=TStringList.Create;
try
List.LoadFromFile('C:\Datei.txt');
for i := 0 to List.Count-1 do
ListBox1.Items.Add(List.Names[i]);
ListBox1.ItemIndex:=0;
Label1.Caption:=List.Values[ListBox1.Items[ListBox1.ItemIndex]];
Label2.Caption:=?????
Label3.Caption:=?????
finally
List.Free;
end;
end;
Wer sagt mir wie ich das anders und vor allem richtig mache?