Discussion :

[micoudic]

Bonjour,
J'ai un petit applicatif (gestion d'une petite Base de donnée) , developpé en D6 et j'utilise QR4 pour imprimer.
Je voudrais donner la possibilité de changer l'imprimante de destination, soit par un PrinterSetupDialog, soit par un PrintDialog (j'ai essayé les deux, mais sans succès).

Pour imprimer, je fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
...
  // Imprime Liste adhérents
    SFMQ01.Print;

...


Il y a sûrement quelque chose que j'ai "sauté".

J'ai recherché partout, notamment ce lien
http://alphomega.developpez.com/imprimer/?page=page_2
mais je tourne en rond.
J'arrive bien à récupérer la valeur d'index de l'imprimante choisie et son nom, mais quoi que je fasse, la sortie se fait toujours sur l'imprimante par défaut (définie par Windows).

Faut-i

[SergioMaster]

Voci comment je procede [D3]..[D7]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
if PrintDialog1.Execute then
 begin
  //  Imprimante.Caption:=Printer.Printers[Printer.PrinterIndex];
   QuickRep1.PrinterSettings.PrinterIndex:=Printer.PrinterIndex;
   QuickRep1.PrinterSettings.Copies:=Printer.Copies;
 end;

Toutefois j'ai quelquefois des problèmes avec XP avec des index hors limites

[micoudic]

Merci pour la réponse, je viens de tester, ça marche.