Programme de dessin à la souris avec ouverture et enregistrement en bmp

Soyez le premier à donner votre avis sur cette source.

Vue 6 787 fois - Téléchargée 734 fois

Description

Un petit programme de dessin qui utilise PSet.
Choix de la taille du pinceau, des couleurs, du mode,
1 ou 2 couleurs simultanées, symétrie horizontale seulement
ou horizontale et verticale.
Crée de jolis effets.
Possibilité de sauvegarder et d'ouvrir les images.
J'utilise le module GetPixel.bas (fourni dans le Zip)
qui n'est pas de moi mais je remercie son auteur qui est un membre
de VBFance.J'espère qu'il se reconnaitra...

Source / Exemple :


Tout est dans le Zip
Source très mal commentée je sais mais 
au départ ce n'était pas pour publier.

Conclusion :


Mon gros problème est qu' avec PSet, on dessine juste des points les uns à coté des autres, hors, j'aimerais pouvoir dessiner en continue comme avec paint.
Si vous savez comment faire, ça m'aiderait beaucoup.
Merci d'avance et lachez vos com ;)

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
89
Date d'inscription
vendredi 16 mars 2007
Statut
Membre
Dernière intervention
23 février 2010

Ok, là j'ai compris. :)
Merci Renfield pour tes explications
(et ta patience) ;)
Messages postés
17288
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
71
en gros, chaque GetDC va demander un nouveu hDC à Windows.
sa reserve est grande, mais pas illimitée...

il te faut utiliser ReleaseDC pour indiquer a windows que le DC ne t'es plus utile
Messages postés
89
Date d'inscription
vendredi 16 mars 2007
Statut
Membre
Dernière intervention
23 février 2010

Pour mes variables, faut que je retourne jeter un coup d'oeil sur mon code.
Pour le Shift, ok c'est compris je retiendrais.

Mais pour la fuite mémoire...Je sais meme pas ce que ça veux dire "fuite mémoire" et "libérer le DC obtenu" :(
Messages postés
17288
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
71
c'est simple:

Dim Couleur1, Couleur2, SaveCouleur1, SaveCouleur2 As ColorConstants

ici, seule la dernière variable sera typée.
les autres seront des Variant

pour la fuite mémoire, c'est bête aussi. Tu fais un GetDC
il te faut libérer le DC obtenu

pour le Shift, on le teste ainsi :
If Shift = vbShiftMask then
....
End If
Messages postés
89
Date d'inscription
vendredi 16 mars 2007
Statut
Membre
Dernière intervention
23 février 2010

Alors là, rien que pour comprendre ce que tu me dis, ça va me prendre du temps...
Pour le SHIFT, j'avais bien remarqué que ça marche meme en appuyant sur Ctrl mais j'ai pas cherché à comprendre.
Faut dire que j'avais fait ce prog pour mon fils qui avait 3 ans et comme ça fonctionnait...;)
Mais bon, je veux progresser alors je vais me pencher sur tes remarques.
Merci Renfield.
Afficher les 7 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.