Mettre une imprimante par défaut

Bonjour,

J'ai développé une application qui remplit une facture au format Excel avec Borland C++ Builder. Pour remplir ma facture Excel, j'utilise le pilotage OLE.

Ensuite je converti cette facture en PDF avec PDFCreator(imprimante virtuelle) pour cela j'utilise cette ligne de code :

vWorksheet.OleProcedure("PrintOut");

Mon problème est le suivant si l'imprimante virtuelle de PDFCreator n'est pas l'imprimante par défaut, dans ce cas là ma facture n'est pas converti.

Est il possible de spécifier une imprimante avec le pilotage OLE ou sinon est il possible de modifier via mon programme l'imprimante par défaut ???

Merci d'avance pour vos réponses.

Amine.

un autre chemin de solution plus portable serait de choisir, non pas l 'imprimante par default, mais l'imprimante qui te conviens ( l'imprimante virtuelle) de manière dynamique.

Cela t eviterais de changer l imprimante par default pour tout le reste du systeme.:D

Oui c'est clair, j'aimerais bien éviter ça, d'ailleurs dans ma question je le demande comment choisir l'imprimante sur laquelle on va imprimer avec le pilotage OLE d'Execl ?

Sous Word (à vérifier sous Excel mais je pense que c'est la même chose), il existe la propriété ActivePrinter que tu peux initialiser.

Ex, sous C++ Builder:

Code:

---

word.OlePropertySet("ActivePrinter",imprimante);

---

Pour le choix du bac:

Code:

---

1 2	Variant opt = word.OlePropertyGet("Options"); opt.OlePropertySet("DefaultTray",bac); // si bac chaîne de caractères

---

ou

Code:

---

opt.OlePropertySet("DefaultTrayID",bac); // si bac numérique

---

Pour les numéros ou noms de bac, il faut consulter l'aide.

Bonjour,

j'arrive toujours pas à choisir mon imprimante, j'ai essayé ca (voir code) mais ca ne marche pas non plus.

Code:

---

1 2 3 4 5 6 7

Variant imprimante; AnsiString imprimante1; imprimante1 = "PDFCreator"; imprimante = imprimante1.c_str(); vWorksheet.OlePropertySet("ActivePrinter",imprimante); vWorksheet.OleProcedure("PrintOut");

---

Sinon, j'ai pas bien capté l'histoire de bac ...

Amine.

je me permet de remonter le post car j'ai le même problème :/

voici mon code :

Code:

---

1 2 3 4 5

TPrinter *Prntr = Printer(); PrinterSetupDialog1->Execute()); //permet de choisir une imprimante   Variant imprimante = StringToOleStr(Printer()->Printers->Strings[Printer()->PrinterIndex]); vMSExcel.OlePropertySet("ActivePrinter",imprimante);

---

et j'ai une erreur sur la ligne suivante :

Code:

---

1 2	vMSExcel.OlePropertySet("ActivePrinter",imprimante);

---

Est ce que quelqu'un serait donc comment définir l'imprimante active pour excel, dans le cas d'une utilisation en Ole.

Merci d'avance

Perso, j'ai toujours le même problème aussi, j'ai un peu laché l'affaire et j'affiche ma facture au format Excel et non plus en PDF.

Si quelqu'un a une solution merci de nous la proposer, ce problème m'empeche de dormir lol.

je crois avoir trouvé la solution

voici mon code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

PrinterSetupDialog1->Execute();   TPrinter *Prntr = Printer();   Variant imprimante = StringToOleStr(Printer()->Printers->Strings[Printer()->PrinterIndex]);   //On modifie l'imprimante active du fichier excel généré try { vWorksheet.OleProcedure("PrintOut",NULL, NULL, NULL, NULL, imprimante, NULL, NULL, NULL); } catch(...) { }   //On imprime le fichier vWorksheet.OleProcedure("PrintOut");

---

si tu pouvais tester amine et me dire si cela fonctionne correctement chez toi aussi ;)