Discussion :

[cheva52]

Bonjours à toutes et à tous.
Voici mon problème:
j'ai fais un dessinateur sous borland 2006 et je dois faire ceci: ajout des fonctionnalités d'impression.
Je fais des formes géométriques dans une PaintBox
Donc je voudrais faire un bouton et dès que je clique dessus, ça imprime le contenu de la PaintBox.

Mais comment faire :s, je n'y arrive pas, je n'ai pas encore vu comment imprimer une PaintBox

Merci de votre Aide
Cordialement, Cheva

[cheva52]

svp c'est important

[blondelle]

Salut cheva52
Un lien sur le sujet dans le Forum

http://www.developpez.net/forums/sho...light=PaintBox

[henderson]

Salut !

Bienvenu sur le forum !

Pour commencer, tu peux consulter l'aide : TPrinter et TCanvas.
Il y a des exemples, en particulier avec TPrinter::Canvas !
La séquence est :

Code :

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

1
2
3
4
5
6
 
Printer()->BeginDoc(); //pour commencer l'impression
 
Printer()->Canvas-> ....; //pour dessiner
 
Printer()->EndDoc(); // pour terminer l'impression

Par exemple, si on se limite à imprimer tout le contenu du PaintBox, la partie dessin sera (comme l'exemple donné dans le lien et apporté par blondelle) :

Code :

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

1
2
3
4
 
TRect Dest = Rect(..., ..., ..., ...); 
TRect Srce = Rect(0, 0, PaintBox->Width, PaintBox->Height);
Printer()->Canvas->CopyRect(Dest, PaintBox->Canvas, Srce);

Voir éventuellement si on doit passer par StretchDraw.

Si le dessin sur le PaintBox est obtenu à l'aide d'objets graphiques sachant se dessiner sur un canvas (quelconque), dans ce cas... il suffit de rediriger le dessin vers le canvas de l'imprimante !

A plus !

[cheva52]

Désolé, je suis pas tres doué en programmation donc je ne comprends pas tout v_v
Donc je peux utiliser un TButton?
si oui ça se présenterais comme ça

void __fastcall TFPrinc::Button1Click(TObject *Sender)
{

}

Mais que faut -il mettre dedans?
Ceci?

Code :

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

1
2
3
4
5
6
7
 
void __fastcall TFPrinc::Button1Click(TObject *Sender)
{
TRect Dest = Rect(..., ..., ..., ...); 
TRect Srce = Rect(0, 0, PaintBox->Width, PaintBox->Height);
Printer()->Canvas->CopyRect(Dest, PaintBox->Canvas, Srce);
}

Désolé de ma non compréhension ^^'
J'attends vos réponses et Joyeux Noél à tous

[blondelle]

Alors premiere chose pense aux Balises soit le # soit le symbole juste avant.
Desole je pensais que tu ete plus avance, henderson voulait dire ceci

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  TPrinter *Prntr = Printer();
// Rect de l'imprimante(marge gauche, marge haute, largeur imprimante - marge droite, hauteur imprimante - marge basse);
  TRect Dest = Rect(20,20,Prntr->PageWidth - 20,Prntr->PageHeight - 20);
// Rect du PaintBox(gauche, haut, largeur, hauteur);
  TRect Srce = Rect(0, 0, PaintBox1->Width, PaintBox1->Height);
// on demarre l'impression
  Prntr->BeginDoc();
// on imprime
  Prntr->Canvas->CopyRect(Dest, PaintBox1->Canvas, Srce);
// fin de l'impression
  Prntr->EndDoc();
}