|
Componente ActiveX
Hola buenas noches, probe lo que me dijo rgstuamigo, ya que el codigo que me indica ecfisa esta en c++ y aunque es bueno, el requerimiento es realizarlo en delphi, para unirlo con otros fuentes ya hechos en delphi, con el resto del proyecto, al probar el codigo que me indico rgstuamigo, hay una parte que aun no logro hacer funcionar.
Creo que debe faltar alguna dll, o algo parecido ya que me indica que no encuentra una clase, el mensaje de error es:
exception class EOleSysError with messaje 'Cadena clase no valida'.
Lo que he hecho es lo siguiente, instale el componente ActiveX de Acrobat, luego cree un formulario y declare estos dos objetos.
AcroPDFLib_TLB, ComObj.
Para que me reconociera el objeto CreateOleObject(AcroExch.app y AcroExch.AVDoc).
En la clausula Uses de la clase principal tengo declarado lo siguiente:
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, OleCtrls, AcroPDFLib_TLB,ComObj;
Y llamo a la funcion de acuerdo a lo indicado en el codigo, en el evento clic de un TButton.
procedure TForm1.Button1Click(Sender: TObject);
begin
if not TifToPDF('c:\test.tif', 'c:\test.pdf') then Showmessage('Could not convert');
end;
Si el archivo no existe, lanza el mensaje y no se revienta, pero si la imagen tif existe, es cuando lanza el mensaje de excepcion. Tambien podria ser que el componente no sea para crear archivos pdf, y por eso no reconoce la clase que se invoca desde el codigo.
Un compañero me dice que se necesita un componente distinto, sinembargo en todas las busquedas que he realizado hasta el momento, solo me hablan del control ActiveX AcroPDF.
Saben de algun otro componente delphi?.
Agradezo me puedan colaborar.
|