Discussion :

[Invité]

Bonjour,

Je voudrais créer une grande image blanche, dessiner dessus en noir avec des moveto - lineto (méthodes de TCanvas) et l'enregistrer dans un fichier image (style bmp).
J'ai lu que l'objet Graphics::TGraphic donnait accès aux méthodes SaveToFile, mais je ne sais pas comment récupérer ce genre d'objet, vu qu'il est issu d'une classe abstraite non instanciable...
J'ai essayé les différents contrôles de la VCL (TImage, TShape, TPanel) pour voir si ils possédaient une methode "getGraphics", mais sans succès...

Vous auriez une idée comment procéder ?

[pottiez]

Il ne faut pas utiliser Graphics::TGraphic, mais Graphics::TBitmap.

[Invité]

Ca marche ! Merci !

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
  Graphics::TBitmap * pImg = new Graphics::TBitmap();
  pImg->Width = 128;
  pImg->Height = 64;
  pImg->PixelFormat << pf24bit;
  pImg->FreeImage();
  Graphics::TCanvas * pCanvas = pImg->Canvas;
  pCanvas->Pen->Color = Graphics::clBlack;
  pCanvas->Pen->Width = 1;
  pCanvas->MoveTo(0, 0);
  pCanvas->LineTo(100, 60);
  pImg->SaveToFile("c:\\toto.bmp");
  delete pImg;