Bien le bonjour à tous.

J'expose mon problème :

1) Je voudrais imprimer un TChart, cependant l'impression fonctionne mais celle-ci me sort une toute petite image...
2) Est-il possible d'étirer l'image pour pouvoir tenir dans une feuille au format A4 ?
3) Est-il possible de tourner l'image à 90° car print->Orientation = poLandscape ne fonctionne pas.

Enfin voici le code de la fonction impression :

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
16
17
18
19
20
21
22
23
24
25
26
27
28
 
void __fastcall TFImprimer::ButtonImprimerClick(TObject *Sender)
{
  PrintDialog1->Options.Clear();
 
  print->Title = "12.07.07";
  if (PrintDialog1->Execute())
  {
    // imprime les pages
    print->BeginDoc();
 
    if(CheckTemperature->Checked)
    {
      FConsulterRapport->GraphPression->PaintTo(print->Handle, 10, 10);
      print->NewPage();
    }
    if(CheckPression->Checked)
    {
      FConsulterRapport->GraphPression->PaintTo(print->Handle, 10, 10);
      print->NewPage();
    }
    if(CheckVide->Checked)
    {
      FConsulterRapport->GraphVide->PaintTo(print->Handle, 10, 10);
    }
    print->EndDoc();
  }
}
Merci de vos réponses ^_^