Superposé des images
maxoudu328
Messages postés
52
Date d'inscription
mercredi 24 novembre 2004
Statut
Membre
Dernière intervention
17 mai 2007
-
5 déc. 2005 à 14:27
EddiTheHead Messages postés 58 Date d'inscription mercredi 16 février 2005 Statut Membre Dernière intervention 2 juin 2006 - 5 déc. 2005 à 19:14
EddiTheHead Messages postés 58 Date d'inscription mercredi 16 février 2005 Statut Membre Dernière intervention 2 juin 2006 - 5 déc. 2005 à 19:14
2 réponses
neodelphi
Messages postés
442
Date d'inscription
jeudi 4 avril 2002
Statut
Membre
Dernière intervention
11 août 2008
5 déc. 2005 à 16:07
5 déc. 2005 à 16:07
Tu peut le faire en chargant ta dynamite dans un bitmap et en utilisant
les méthodes qui te sont mises à disposition par le Canvas de ta carte
si celle-ci est affichée dans un TImage...
Exemple pour dessiner une ligne rouge :
Image1.Canvas.Pen.Color := clRed;
Image1.Canvas.MoveTo(0, 10);
Image1.Canvas.LineTo(100, 200);
Il me semble qu'il existe des routines pour les courbes de bézier, je te conseille de regarder dans l'aide...
Pour ce qui est de dessiner ta dynamite, je croit que la méthode est
CopyRect. Il faut également configurer deux ou trois petites chose pour
indiquer la couleur de transparence de ta dynamite...
Bon courage...
neodelphi
les méthodes qui te sont mises à disposition par le Canvas de ta carte
si celle-ci est affichée dans un TImage...
Exemple pour dessiner une ligne rouge :
Image1.Canvas.Pen.Color := clRed;
Image1.Canvas.MoveTo(0, 10);
Image1.Canvas.LineTo(100, 200);
Il me semble qu'il existe des routines pour les courbes de bézier, je te conseille de regarder dans l'aide...
Pour ce qui est de dessiner ta dynamite, je croit que la méthode est
CopyRect. Il faut également configurer deux ou trois petites chose pour
indiquer la couleur de transparence de ta dynamite...
Bon courage...
neodelphi
EddiTheHead
Messages postés
58
Date d'inscription
mercredi 16 février 2005
Statut
Membre
Dernière intervention
2 juin 2006
5 déc. 2005 à 19:14
5 déc. 2005 à 19:14
Slt,
Pour superposer une image sur une autre avec transparence, je ne crois pas que CopyRect puisse le faire (du moins en Delphi3) mais voir la méthode Draw.
Var BMPMap : TBitmap ou TImage
BMPDynamite : TBitmap;
.
.
.
// Activer la transparence
BMPDynamite.Transparent := True;
// Définir la couleur transparente. Dans ce cas c'est le noir
BMPDynamite.TransparentColor := RGB(0, 0, 0);
.
.
.
// Afficher le BMPDynamite sur le BMPMap en X=64 et Y=64
BMPMap.Canvas.Draw(64, 64, BMPDynamite);
Pour superposer une image sur une autre avec transparence, je ne crois pas que CopyRect puisse le faire (du moins en Delphi3) mais voir la méthode Draw.
Var BMPMap : TBitmap ou TImage
BMPDynamite : TBitmap;
.
.
.
// Activer la transparence
BMPDynamite.Transparent := True;
// Définir la couleur transparente. Dans ce cas c'est le noir
BMPDynamite.TransparentColor := RGB(0, 0, 0);
.
.
.
// Afficher le BMPDynamite sur le BMPMap en X=64 et Y=64
BMPMap.Canvas.Draw(64, 64, BMPDynamite);
