1. Accueil
  2. Codes-Sources
  3. Delphi / Pascal

Comment puis je copier Bitmap de image1 en image2 ? [Résolu]

Signaler
Messages postés
63
Date d'inscription
dimanche 22 juillet 2007
Statut
Membre
Dernière intervention
28 avril 2011
 -
Bacterius
Messages postés
3793
Date d'inscription
samedi 22 décembre 2007
Statut
Membre
Dernière intervention
3 juin 2016
 -
salut


Comment puis je copier Bitmap de image1 en image2 mais sans changer la taille de image2 ?
J'ai essayé avec CopyRect(Rect(0,0, ...
sa fonctionne mais je ne voudrais pas utiliser cette Methode

y at-il une autre Solution ?

merci bien
Afficher la suite

3 réponses

Réponse 1 / 3
Messages postés
3793
Date d'inscription
samedi 22 décembre 2007
Statut
Membre
Dernière intervention
3 juin 2016
 7
Bah tu peux utiliser StretchBlt, qui fait la même chose que CopyRect mais en étant une API. Tu peux même préciser la constante HALFTONE (avec l'API SetStretchBltMode) pour que le résultat soit plus joli. 

SetStretchBltMode(Image2.Canvas.Handle, HALFTONE);
StretchBlt(Image2.Canvas.Handle, 0, 0, Image2.Width, Image2.Height, Image1.Canvas.Handle, 0, 0, Image1.Width, Image1.Height, SRCCOPY);

Ce sera plus long avec l'attribut HALFTONE mais tu ne sentiras pas la différence à moins de faire des opérations graphiques très coûteuses.

Cordialement, Bacterius !
Réponse 2 / 3
Messages postés
63
Date d'inscription
dimanche 22 juillet 2007
Statut
Membre
Dernière intervention
28 avril 2011
Merci! sa marche bien
Réponse 3 / 3
Messages postés
3793
Date d'inscription
samedi 22 décembre 2007
Statut
Membre
Dernière intervention
3 juin 2016
 7
De rien, content d'avoir pu aider

Cordialement, Bacterius !
Répondre Posez votre question