Buenas noches, Saludos a todos
Estoy empezando a programar en Delphi y uno de los primeros programas que me interesa realizar consiste en abrir un pdf cualquiera desde una aplicación en Delphi. He leído algunos hilos muy interesantes con relación a esto y he intentado utilizar el componente WebBrowser tal como lo sugieren allí, pero no he tenido éxito.
Me aparece el siguiente error al intentar abrir un archivo pdf para ser mostrado en el WebBrowser: El archivo no empieza por '%PDF-'.
Me he basado en el código facilitado por
nlsgarcia en uno de los hilos consultados:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
openDialog : TOpenDialog;
begin
openDialog := TOpenDialog.Create(self);
openDialog.InitialDir := GetCurrentDir;
openDialog.Options := [ofFileMustExist];
openDialog.Filter := 'PDF files|*.pdf';
openDialog.FilterIndex := 1;
if openDialog.Execute then
begin
WebBrowser1.Silent := True;
WebBrowser1.Navigate('file://' + openDialog.FileName + '#toolbar=0&navpanes=0&scrollbar=1');
end;
end;
Estoy utilizando la version de DELPHI XE2 en Windows 7 32 bits. No sé si el problema se deba a una mala instalación del componente TWebBrowser. Quizá a alguien le haya ocurrido ese error con anterioridad y me pueda colaborar. Por lo menos en el foro no he encontrado alguna referencia a ese problema.
Agradezco de antemano su colaboración.