begin process at 2008 07 06 19:40:29
1 205 743 membres
306 nouveaux aujourd'hui
14 119 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

CRÉER UNE IMAGE EN FUSEAUX


Information sur la source

Catégorie :Graphique Classé sous : image, strechtblt, fuseaux, sphère Niveau : Débutant Date de création : 11/01/2007 Date de mise à jour : 11/01/2007 16:42:25 Vu / téléchargé: 2 492 / 428

Note :
Aucune note

Commentaire sur cette source (7)
Ajouter un commentaire et/ou une note


Description

Bonjour à tous,

Je vous propose une source bien modeste. Pour des besoins persos, j'ai eu besoin de coller une image sur une sphère.
Ce code permet de créer une image en fuseaux à partir d'une image standard. La copie d'écran montre bien mieux qu'un long discour, ce que fait le code.

Principe :
L'image est découpée en 12 fuseaux. On peut en faire plus ou moins... c'est vous qui voyez.
Chaque fuseaux est "lu", ligne par ligne. Chaque ligne est copiée et déformée (contraction) sous forme d'un fuseau.

Merci à EBARTSOFT qui m'a donné l'API à utiliser pour que la déformation soit plus jolie ^^

Conclusion

Amélioration à prévoir :
- La formule créant le fuseau est peut être à améliorer.

Ce code ne servira certainement pas à beaucoup de monde...

Je reste bien entendu ouvert à toute remarque.
Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

11 janvier 2007 16:42:25 :
Ajour de l'API SetStretchBltMode pour améliorer le rendu de la déformation
  • signaler à un administrateur
    Commentaire de bebelious le 11/01/2007 15:46:35

    Sympa ce code. J'aime bien

    Pourquoi ne pas appliquer un flou pour éviter crénelage,
    ou alors faire une moyenne des pixels aux alentours...
    (heu... c'est un flou aussi ca tiens ;) )

    Bonne prog

  • signaler à un administrateur
    Commentaire de EBArtSoft le 11/01/2007 16:21:23 administrateur CS

    Bon aller je te donne l'astuce... mais c'est bien par ce que c'est toi ! lol

    'On ajoute :
    Private Declare Function SetStretchBltMode Lib "gdi32" (ByVal hdc As Long, ByVal nStretchMode As Long) As Long

    'Puis on fait :
    pctDest.Cls
    pctDest.Picture = LoadPicture
    SetStretchBltMode pctDest.hdc, 3

    C'est y pas mieux ainsi ? hum

    @+

  • signaler à un administrateur
    Commentaire de moustachu le 11/01/2007 16:39:40

    Merci de vos commentaires. Et merci Ebartsoft. C'est nickel !

    Je fais une mise à jour.

    bebelious>Oui, il faudrait que je fasse de l'antialiasing aussi...ça viendra..ou pas

    ++
    Moustachu


  • signaler à un administrateur
    Commentaire de Renfield le 11/01/2007 22:50:12 administrateur CS

    Joli

  • signaler à un administrateur
    Commentaire de Piezo le 11/05/2007 20:20:12

    Je suis et serais toujours aussi impressionné par tout ce que l'on ai capable de faire avec VB.
    Merci à Moustachu...
    et EBArtSoft qui n'a rien a envier aux plus grand et c'est pas de l'adobe !!
    Ya pas photo et choppe (sans alcool !)

  • signaler à un administrateur
    Commentaire de EBArtSoft le 11/05/2007 21:48:00 administrateur CS

    Yeah Piezo un supporter de vb6 ! bienvenue :p

  • signaler à un administrateur
    Commentaire de moustachu le 13/05/2007 17:43:48

    Quel commentaire !!Merci Piezo !

Ajouter un commentaire

Pub



Appels d'offres

WEB DESIGN
Budget : 1 000€
Plugin Dialer outlook
Budget : 2 000€
Travail graphique- ill...
Budget : 1 000€

CalendriCode

Juillet 2008
LMMJVSD
 123456
78910111213
14151617181920
21222324252627
28293031   

VS Express FR Gratuit !

VS Express en français et 100% gratuit !

Téléchargements

Boutique

Boutique de goodies CodeS-SourceS