[Karsh]

попробуйте тогда так:

Код:

procedure TForm1.FormCreate(Sender: TObject);
var
  FileName: string;
begin
  FileName:= ParamStr(1);
  If FileExists(FileName) then
    Memo1.Lines.LoadFromFile(FileName);
  // можно указать ShowMessage для просмотра параметра
  ShowMessage(FileName);
end;