Actualmente, los desarrolladores no nos podemos quedar atrás en ayudar al medio ambiente, y sabemos que el papel se está utilizando cada vez menos, es por ello que en nuestros sistemas necesitamos exportar informes a tipos de archivos que se puedan compartir fácilmente.
Unos de estos tipos de archivos para compartir, son los PDF, y más de uno lidiamos con la creación desde Delphi con este tipo de archivos.
Que es un archivos PDF?
PDF significa Portable Document Format, es un formato de archivo creado por la empresa Adobe para el intercambio de documentos.
Si bien hay muchas librerías para Delphi, diseñadas para crear o manipular documentos PDF, pero en su gran mayoría son comerciales. Ahora, si sólo necesitamos cargar un documento PDF, obtenga información como número de páginas, su seguridad, si está linealizado o incluso modificar alguna información como el tamaño de página, agregar texto o agregar gráficos, es posible que te sirva la versión Lite de Quick PDF Library (la podemos descargar haciendo clic aquí).
Quick PDF Library
Quick PDF Library Lite ofrece un subconjunto de la funcionalidad que se encuentra en Quick PDF Library: un SDK para desarrolladores de PDF totalmente free.
Quick PDF Library Lite no solamente funciona en Delphi, sino que al ser un componente ActiveX, funciona con C, C ++, C #, PHP, Visual Basic, VB.NET, ASP, PowerBASIC, Pascal o cualquier otro lenguaje que admita ActiveX.
Funciones de Quick PDF Library Lite
Antes de mostrar un ejemplo sencillo del funcionamiento de esta librería, queremos compartir corta lista de las funciones compatibles en Quick PDF Library Lite:
- AddImageFromFile
- AddLinkToWeb
- AddStandardFont
- DocumentCount
- DrawImage
- DrawText
- FindImages
- GetInformation
- HasFontResources
- ImageCount
- ImageHeight
- ImageWidth
- Linealizado
- LoadFromFile
- NewDocument
- NewPage
- PageCount
- PageHeight
- PageRotation
- PageWidth
- RemoveDocument
- SaveToFile
- SecurityInfo
- SelectDocument
- SelectedDocument
- SelectFont
- SelectImage
- SelectPage
- SetInformation
- SetOrigin
- SetPageSize
- SetPxtDxtol
Para instalar la versión Lite de Quick PDF Library, debemos registrar la biblioteca ActiveX con Windows, utilizando el siguiente comando:
regsvr32 \ QuickPDFLite0719.dll
Ejemplo de uso de Quick PDF Library Lite
uses
ComObj;
procedure TForm1.btnCrearPDFClick(Sender: TObject);
var
vPDF: Variant;
begin
vPDF := CreateOleObject('QuickPDFLite0719.PDFLibrary');
vPDF.DrawText(100, 500, 'Hola Mundo!');
vPDF.SaveToFile('path\archivo.pdf');
vPDF:= Unassigned;
end;