[ecfisa]

Hola.

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  if ParamStr(1) > '' then
  begin
    OpenDialog1.FileName:= ParamStr(1);
    OpenDialog1.Execute;
  end;
end;

Pero no veo la necesidad de llamar TOpenDialog si ya se está enviando el nombre de archivo en ParamStr(1)...

Un saludo.