Cirec
Messages postés3833Date d'inscriptionvendredi 23 juillet 2004StatutModérateurDernière intervention18 septembre 202250 8 janv. 2006 à 23:51
Salut,
> jlen, pour information c'est possible
voici comment :
procedure TForm1.Button1Click(Sender: TObject);
Var DC : HDC;
aBmp : TBitMap;
Canv : TCanvas;
begin aBmp := TBitMap.Create;
aBmp.LoadFromFile('Cloud.bmp'); // doit être un BMP
DC := GetDc(Panel1.Handle); // comme il n'y a pas de canvas(accessible) dans panel on récupère son Device Control
Canv := TCanvas.Create;
Canv.Handle := DC; // on l'affecte à notre Canvas temporaire
Canv.Brush.Bitmap := aBmp; // et l'image (BMP) à Brush
FillRect(dc, Panel1.ClientRect, Canv.Brush.handle); // On Dessine
Canv.Free; // et on libère le tout avant de quitter
aBmp.free;
ReleaseDc(Panel1.Handle, DC);
end;
Voilà c'est tout
si tu mets cela dans l'évenement OnPaint de ta Form le rafraichissement se ferat automatiquement
jlen100
Messages postés1606Date d'inscriptionsamedi 10 juillet 2004StatutMembreDernière intervention25 juillet 201413 8 janv. 2006 à 23:02
salut,
je pense que le plus simple est de mettre un Timage dans ton panel et
de le charger la propriété piture avec une image (soit à la conception
soit avec un loadfromfile)
cs_orelien
Messages postés137Date d'inscriptiondimanche 7 juillet 2002StatutMembreDernière intervention11 janvier 2009 8 janv. 2006 à 23:08
Merci,
Et bien en ait ce n'est pas exactement ce que je recherche. J'y ait bien pensé mais ce que j'aimerais c'est que l'image soie fondue avec le TPanel, qu'elle ne fasse qu'un avec lui, qu'elle soie incrustée quoi.
jlen100
Messages postés1606Date d'inscriptionsamedi 10 juillet 2004StatutMembreDernière intervention25 juillet 201413 8 janv. 2006 à 23:14
je ne crois pas que ce soit possible directement sans recréer un
nouveau composant qui reprendrait les propriétés du Timage
et du Tpanel ( ajout d'une propriété Tpicture dans un composant Tpanel).
@+
jlen
Vous n’avez pas trouvé la réponse que vous recherchez ?
jlen100
Messages postés1606Date d'inscriptionsamedi 10 juillet 2004StatutMembreDernière intervention25 juillet 201413 8 janv. 2006 à 23:59
-->cirec intéressant à savoir; je ne connaissais pas.
bien que personnellement je préfère rajouter un Timage au panel pour
une gestion plus simple de l'image associée qui permet en plus de
charger des images jpeg
Cirec
Messages postés3833Date d'inscriptionvendredi 23 juillet 2004StatutModérateurDernière intervention18 septembre 202250 9 janv. 2006 à 00:08
Absolument, quoi que l'on peut aussi charger un Jpg avec un TImage Crée dynamiquement et l'assigner à un BitMap mais bon ... c'est plus compliqué mais pas impossible.
Le but ici était de montrer la possibilité de dessiner même en l'absence de canvas en plus je sais pas si tu as vu mais le Bmp est directement affecté à Brush et non dessiné avec Draw (ce qu'il est aussi possible de faire) où avec StretchDraw
Cirec
Messages postés3833Date d'inscriptionvendredi 23 juillet 2004StatutModérateurDernière intervention18 septembre 202250 9 janv. 2006 à 00:27
Tout à fait, on peut dessiner partout.
mais je ne sais pas si il y a asser de matière à faire un tuto sur le sujet, le code donné en exemple plus haut est à lui seul 95 % de la méthode. Pour les autres composants il faut juste remplacer Panel1.Handle par celui de notre choix.
jlen100
Messages postés1606Date d'inscriptionsamedi 10 juillet 2004StatutMembreDernière intervention25 juillet 201413 9 janv. 2006 à 00:52
disons que ce serait plus facile à retrouver que sur le forum qui
limite le nombre de réponses à 20~.et pas toujours très judicieuses.
(nix serait-il possible que quand l'on consulte la liste des messages
de son compte il n'y ait qu'un seul lien par topic ce qui faciliterait
la recherche des réponses que l'on a déjà données).
j'ai expérimenté le moteur de recherche sur des réponses que j'avais
données et dont je voulais retrouver l'adresse et finalement j'ai eu
plus vite fait de réecrire le bout de code!!
Mais bon je vais mettre ça dans ma bibliothèque d'exemple
cs_orelien
Messages postés137Date d'inscriptiondimanche 7 juillet 2002StatutMembreDernière intervention11 janvier 2009 11 janv. 2006 à 00:13
Egalemenent j'ai souci, c'est que losque mon image est dessinnée et qu'une autre fenêtre de windows se postionne par dessus, l'image s'efface. Quelquun à t'il une solution ?
Merci.