GÉNÉRER DES PDF AVEC DELPHI ET PDF CREATOR

Signaler
Messages postés
117
Date d'inscription
samedi 4 janvier 2003
Statut
Membre
Dernière intervention
19 juin 2009
-
Messages postés
1
Date d'inscription
jeudi 16 janvier 2003
Statut
Membre
Dernière intervention
12 octobre 2012
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/37353-generer-des-pdf-avec-delphi-et-pdf-creator

Messages postés
1
Date d'inscription
jeudi 16 janvier 2003
Statut
Membre
Dernière intervention
12 octobre 2012

Moi j'aurais une question.

Comment peut-on rendre compatible notre code, indépendamment de la version de PDFCreator ?
Je m'explique, je dois faire un exe imprimant en PDF. Par contre pour des personnes qui ont des versions de PDFCreator différentes. Du coup j'ai codé avec ma version (pdfCreator 1.3.2) et lorsque je veux imprimer sur une machine avec pdfCreator 1.5.0, ça plante. L'enregistrement de la classe a échoué, le GUID n'est plus le même.

Doit-on inclure autant de TLB.pas que de version et d'aiguiller l'appli tant bien que mal ?

Merci pour vos lumières.
Messages postés
2
Date d'inscription
mardi 3 juillet 2012
Statut
Membre
Dernière intervention
28 août 2012

Hello!
Heureusement que des tutos comme ça existe, c'est tellement galère de trouver de la doc sur PdfCreator, même 10 ans après!
Par contre, je serai un peu moins enjoué que kleptogeek concernant la qualité du code dans la fin du printit, j'avouerai que je ne saisi pas l'intérêt du booléen et l'utilisation du timer dans ce contexte et surtout de cette façon, m'enfin ça reste du pinaillage, et je ne vais pas cracher sur un exemple d'utilisation d'API ^^
Merci bien,
Messages postés
1
Date d'inscription
samedi 15 janvier 2011
Statut
Membre
Dernière intervention
21 février 2011

Très bon code. Pas un problème avec la version 0.9.1 de PDFcreator.

Merci beaucoup !
Messages postés
1
Date d'inscription
vendredi 3 septembre 2010
Statut
Membre
Dernière intervention
27 septembre 2010

I solved the VBA_TLB issue, adding this code I found, just below "type"

// From Unit VBA_TLB

// *********************************************************************//
// Interface: _Collection
// Flags: (4432) Hidden Dual OleAutomation Dispatchable
// GUID: {A4C46780-499F-101B-BB78-00AA00383CBB}
// *********************************************************************//
_Collection = interface(IDispatch)
['{A4C46780-499F-101B-BB78-00AA00383CBB}']
function Item(var Index: OleVariant): OleVariant; safecall;
procedure Add(var Item: OleVariant; var Key: OleVariant; var Before: OleVariant;
var After: OleVariant); safecall;
function Count: Integer; safecall;
procedure Remove(var Index: OleVariant); safecall;
function _NewEnum: IUnknown; safecall;
end;

// *********************************************************************//
// DispIntf: _CollectionDisp
// Flags: (4432) Hidden Dual OleAutomation Dispatchable
// GUID: {A4C46780-499F-101B-BB78-00AA00383CBB}
// *********************************************************************//
_CollectionDisp = dispinterface
['{A4C46780-499F-101B-BB78-00AA00383CBB}']
function Item(var Index: OleVariant): OleVariant; dispid 0;
procedure Add(var Item: OleVariant; var Key: OleVariant; var Before: OleVariant;
var After: OleVariant); dispid 1;
function Count: Integer; dispid 2;
procedure Remove(var Index: OleVariant); dispid 3;
function _NewEnum: IUnknown; dispid -4;
end;
Afficher les 28 commentaires