Hallo Raiguen. Dankeschön für die Hilfe.
Eine letzte Frage habe ich doch noch zu dem Thema,
können auch andere Trenner verwendet werden anstatt
01054 = Dresden auch sowas 01054;Dresden?
ich habs versuch, bekomme aber nichts angezeigt.
Delphi-Quellcode:
procedure TForm3.Button1Click(Sender: TObject);
var
MyList: THashedStringList;
Index: Integer;
begin
MyList := THashedStringList.Create;
MyList.LoadFromFile(
ExtractFilePath(Application.ExeName) + 'plzdat.txt');
try
index := MyList.IndexOfName(Plz_edit.Text + ' '); // hier hab ich schon einiges ausprobiert
If index > -1 Then
Ort_edit.Text := Trim(MyList.ValueFromIndex[index]);
finally
MyList.Free;
end;
end;
Grüsse, Steven