Discussion :

[shell13010]

Salut a tous,

J'aurais aimer savoir si vous auriez une idées pour insérer un png ou bmp par

dessus une image dans un coin droit ou autre avec un Timage,

car j'ai rien trouver de spécial sur le forum...

Donc si vous savez ou auriez une idées je suis preneur

Sur se Bonne soirée à tous

[DOLPat®]

Bonjour

Sur une feuille avec 2 TImage par exemple, il suffit de faire:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
begin
  Windows.BitBlt(bmpPrincipal.Canvas.Handle,
         bmpPrincipal.Width-bmpIncruste.Picture.Bitmap.Width ,
         0,
         bmpIncruste.Picture.Bitmap.Width,
         bmpIncruste.Picture.Bitmap.Height,
         bmpIncruste.Picture.Bitmap.Canvas.Handle,
         0,
         0,
         SRCCOPY);
  bmpPrincipal.Invalidate;
end;

[shell13010]

Salut

Effectivement c'est fonctionnel après quelque modif donc merci pour ton aide

Un sujet résolu...

A bientôt.