Bonjour,
Je souhaiterais sauver un Canvas venant d'un TpainBox dans un fichier jpg ou bmp...
Pour cela j'ai essayé de copier le Canvas du TPaintbox dans la canvas d'un TBitmap... mais cela ne fonctionne pas...
Quelqu'un aurai une idée?
merçi
Version imprimable
Bonjour,
Je souhaiterais sauver un Canvas venant d'un TpainBox dans un fichier jpg ou bmp...
Pour cela j'ai essayé de copier le Canvas du TPaintbox dans la canvas d'un TBitmap... mais cela ne fonctionne pas...
Quelqu'un aurai une idée?
merçi
Salut !
Nom du fichier avec son chemin complet
Ou bien quelque chose comme, à la place de :Code:
1
2AnsiString Filename = "....";
Une méthode OnClickCode:
1
2 SavePictureDialog1->FileName
Donc pour que ça ne fonctionne pas chez toi, soit tu as un problème avec la taille du bitmap, avec CopyRect ou bien avec le nom du fichier.Code:
1
2
3
4
5
6
7
8
9
10
11 void __fastcall TForm1::SpeedButton1Click(TObject *Sender) { Graphics:: TBitmap *B = new Graphics::TBitmap; B->Width = PaintBox1->Width; B->Height = PaintBox1->Height; TRect R = Rect(0, 0, B->Width, B->Height); B->Canvas->CopyRect(R, PaintBox1->Canvas, R); B->SaveToFile(Filename); delete B; }
A plus !
Merçi infiniment de ton aide... J'ai à peu près le même code et pourtant quand je copie le tien cela fonctionne...
J'ai beau lire les deux codes... je vois pas de différence...
Mauis merçi beaucoup tu m'a retiré une belle épine du pied!!! ;)