Datei in Memo laden

[Ratte]

Hallo,

Ich möchte einen als Parameter übergebenen Dateinamen in einer Memo anzeigen. Der Text in der Titelzeile wird auch korrekt angezeigt, aber das Memo bleibt leer.

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
if ParamCount>0 then
begin
    if FileExists(ParamStr(1)) then
    begin
    Dateiname:=Paramstr(1);
    Form1.Caption:='Programm - '+Dateiname;
    memo1.lines.loadfromfile(Dateiname);

      end;
end;

Danke im Vorraus,

Ratte