Kann Pfad in Label.Caption nicht ausgeben

[Bummi]

Delphi-Quellcode:

var
  str: string;
begin
  str := ExtractFilePath(ParamStr(0)) + 'Uebersicht.txt';
  if FileExists(str) then
  begin
    Label1.caption := ('Datei existiert') + ' ' + str)
    Listbox1.items.LoadFromFile(str);
  end
  else Label1.caption := 'Datei existiert nicht';
end;