Bonjour,
alors voila mon soucis, je voudrais simplement enregistrer deux images bmp : un rectangle noir (dont je connais la largeur et la hauteur) et le même en blanc (dans un autre fichier) avec les mêmes dimensions : mais je n'y arrive pas : mon image mesure tout le temps 105x33 (taille du composant image1 que j'ai posé sur ma form !!)
Voilà le code que j'utilise :
Citation :
var r:trect;
begin
if checkbox1.Checked=true then
begin
image1.Canvas.Brush.Color:=clblack;
r.Left:=0;
r.Top:=0;
r.Right:=updownlogolargeur.position;
r.Bottom:=updownlogohauteur.Position;
if r.Right mod 2=1 then r.right:=r.Right+1;
if r.Bottom mod 2=1 then r.Bottom:=r.Bottom+1;
image1.Width:=updownlogolargeur.position;
image1.Height:=updownlogohauteur.Position;
image1.Canvas.Rectangle(r);
image1.Picture.SaveToFile(formexternalappli.cheminappli+'logo\temp_x_'+editlogoposx.Text+'_y_'+editlogoposy.Text+'_0.bmp');
image1.Canvas.Brush.Color:=clwhite;
image1.Canvas.Rectangle(r);
image1.Picture.SaveToFile(formexternalappli.cheminappli+'logo\temp_x_'+editlogoposx.Text+'_y_'+editlogoposy.Text+'_1.bmp');
|
Quelqu'un peut-il m'aider ???
MEri bp