Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1435 connectés 

  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  [DELPHI] Copier le contenu d'un panel dans un autre ?

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[DELPHI] Copier le contenu d'un panel dans un autre ?

n°2142972
davidmarli
Posté le 19-05-2012 à 13:56:35  profilanswer
 

Bonjour,
 
j'ai un programme qui affiche une image d'une vidéo dans un panel.
Je voudrais alors copier cette image (ce qui est donc affiché dans ce panel) dans un autre panel.
Mais je n'y parvient pas.
 
J'avais pensé à cela, mais j'obtiens juste un rectangle noir en copie!!  
 

Citation :

jvpanel2.canvas.copymode:=cmSrcCopy;
 jvpanel2.Canvas.CopyRect(
    Rect(0,0,jvpanel2.Width,jvpanel2.Height),
    jvpanel1.Canvas,
    Rect(0,0,jvpanel1.Width,jvpanel1.Height)
    );


 
j'ai donc utilisé des jvpanels, l'image s'affiche bien dans le jvpanel1 que je voudrais copier dans le 2.
 
Merci pour votre aide.

mood
Publicité
Posté le 19-05-2012 à 13:56:35  profilanswer
 

n°2143247
Flagad'awa​re
c pô moi, j'ai pas touché!
Posté le 21-05-2012 à 20:56:46  profilanswer
 

Salut
 
c'est surement pas le plus propre mais si tu passe par un TBitMap?
 

Code :
  1. var:Bmp :TBitMap;
  2. ---
  3. Bmp := TBitMap.Create;
  4. try
  5.   Bmp.Width  :=  jvpanel1.Width;
  6.   Bmp.Height  :=  jvpanel1.Height;
  7.   Bmp.PixelFormat:=pf24bit;
  8.   Bmp.Canvas.Draw(0,0,jvpanel1); // ou Bmp.Canvas.Draw(0,0,jvpanel1.canvas); ?
  9.   // et si le bitmap n'est pas vide...
  10.   jvpanel2.Width := Bmp.Width;
  11.   jvpanel2.Height := Bmp.Height;
  12.   jvpanel2.PixelFormat:=pf24bit;
  13.   jvpanel2.Canvas.Draw(0,0,Bmp);
  14. finally
  15.   Bmp.free;
  16. end;


 
biensur c'est pas testé mais ça devrait tourner avec peu de modifs


Message édité par Flagad'aware le 21-05-2012 à 20:56:58
n°2143248
davidmarli
Posté le 21-05-2012 à 22:13:02  profilanswer
 

Merci, je testerai cela.


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  [DELPHI] Copier le contenu d'un panel dans un autre ?

 

Sujets relatifs
[ORACLE OCI] Select sur un clob ne retourne qu'une partie du contenuAutoriser du contenu uniquement à des fans Facebook
Copier/Coller sous-clef de registre VBAUtiliser le contenu d'un fichier XML
html5 progress et contenu de divVBA aide copier résultat filtre !!!
Rechercher un fichier texte puis copier le contenu dans Excel[DELPHI] Tlistview : surligner une ou plusieurs lignes ?
delphi, file Directory problem!! 
Plus de sujets relatifs à : [DELPHI] Copier le contenu d'un panel dans un autre ?


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR