Nimm am Besten sakuras Vorschlag:
Label1.Caption := Copy(Edit1.Text, 0, Length(Edit1.Text) - 2);
PS: Ich poste das hier, weil etwas "umständliche" Vorschläge geposted wurden.
Normalerweise lasse ich auch danach suchen.
Edit: @NikoMitDaMacht: Könntest du bitte einen kürzeren "Wohnort" angeben, die linke Spalte ist so breit.