Hola:
Como no veo la manera de hacerlo funcionar con todas las versiones de Adobe Reader, lo he modificado y en vez de ver el pdf en un form, simplemente abro el fichero con ShellExecute
Código Delphi
[-]
procedure TFMenu.ReglamentoClick(Sender: TObject);
var
sFichero: string;
begin
sFichero := ExtractFilePath(ExpandFileName(ParamStr(0))) + 'ReglamentoFEPV.pdf';
try
ShellExecute(Handle, 'open', pchar(sFichero), nil, nil, SW_SHOW);
except
ShowMessage('Se necesita tener instalado Adobe Reader');
end;
end;
Así funciona con cualquier version de Ac. Reader, pero lo pruebo en un ordenador que no tiene instalado Adobe Reader, y por supuesto no muestra nada, pero lo malo es que tampoco entra en el except y no me muestra el mensaje del ShowMessage.
¿Alguna idea para solucionar esto?
Gracias.
Un saludo.