procedure TFormMain.FormCreate(Sender: TObject);
begin
  if paramCount>0 then   begin
     DisplayPDF(ParamStr(1));
  end;
end;