Salut à tous, j'ai une image, je veux afficher l'image après avoir effectuer une rotation suivant un angle defini.
Comment puis je y arriver.
Merci
Salut à tous, j'ai une image, je veux afficher l'image après avoir effectuer une rotation suivant un angle defini.
Comment puis je y arriver.
Merci
On progresse .....
Si tu as fait la rotation, tu peux l'afficher dans un TImage,
si tu ne sais pas faire le rotation, je ne pourrais pas aider la dessus, je n'ai jamais cherché ... mais "Rotation" dans l'aide API SDK, tu as une page qui semble expliqué les notions de math nécessaires ...
Aide via F1 - FAQ - Guide du développeur Delphi devant un problème - Pensez-y !
Attention Troll Méchant !
"Quand un homme a faim, mieux vaut lui apprendre à pêcher que de lui donner un poisson" Confucius
Mieux vaut se taire et paraître idiot, Que l'ouvrir et de le confirmer !
L'ignorance n'excuse pas la médiocrité !
L'expérience, c'est le nom que chacun donne à ses erreurs. (Oscar Wilde)
Il faut avoir le courage de se tromper et d'apprendre de ses erreurs
Salut
Il existe un compo TRotateImage. Tu peux l'utiliser ou t'en inspirer.
@+ Claudius
Merci les gars.
je vais voir tout de suite
A+
On progresse .....
Pour info : Vous pouvez télécharger :
- chez http://perso.orange.fr/bardou/michel...programmes.htm
- à la rubrique rotation
- le Zip du code de Jean-Yves Quéinec qui utilise, en sus du MemoryStream, les Scanline pour la rapidité des rotations de bitMaps.
N'oubliez pas de consulter les FAQ Delphi et les cours et tutoriels Delphi
Erreur dans mon msg précédent c'est pas le bon code source, celui-ci est effectivement rapide mais dénature les couleurs.
Voiçi le Zip du code de 2006 du même auteur, en espérant que mon quota de Zips n'est pas dépassé.
rotaEtRedim.zip
N'oubliez pas de consulter les FAQ Delphi et les cours et tutoriels Delphi
Info complémentaire / mes 2 msg précédents :
Vous pouvez quand même télécharger le fichier indiqué chez http://perso.orange.fr/bardou/michel...programmes.htm
J'ai trouvé le bug qui y dénaturait les couleurs, il manquait une ligne :
- dans l'unit Ulecture;
- à l'intérieur de la procedure TForm3.FileListBox1Click(Sender: TObject);
il suffit de rectifier le code comme suit :
Le code est rapide et en prime il permet de combiner la rotation du BitMap avec un effet de zoom avant/arrière.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Bmp1 := Tbitmap.create; Bmp1.pixelformat := pf24bit; //< ligne à ajouter dans le code-source bmp1.width := Image1.picture.graphic.width;
N'oubliez pas de consulter les FAQ Delphi et les cours et tutoriels Delphi
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager