Outils "main"
Résolu
matovitch
Messages postés
31
Date d'inscription
jeudi 2 août 2007
Statut
Membre
Dernière intervention
19 avril 2009
-
7 déc. 2007 à 21:46
matovitch Messages postés 31 Date d'inscription jeudi 2 août 2007 Statut Membre Dernière intervention 19 avril 2009 - 11 déc. 2007 à 20:47
matovitch Messages postés 31 Date d'inscription jeudi 2 août 2007 Statut Membre Dernière intervention 19 avril 2009 - 11 déc. 2007 à 20:47
A voir également:
- Outils "main"
- Editor does not contain a main type ✓ - Forum Java
- Erreur 'selection does not contain a main type - Forum Java
- Pascal outils - Forum Delphi / Pascal
- Error: main method not found in the file, please define the main method as: public static void main(string[] args) - Forum Java
- Main cartes d'acquisition - Forum Visual Basic 6
3 réponses
PCPT
Messages postés
13272
Date d'inscription
lundi 13 décembre 2004
Statut
Membre
Dernière intervention
3 février 2018
47
7 déc. 2007 à 23:58
7 déc. 2007 à 23:58
salut
linerider? connais pas....
beh tout dépend de "comment" tu dessines ton image
pour déplacer çà sera du mouse_mouse si boutton voulu enfoncé
restera a voir "comment" dessiner (je me répète non ? ^^)
tu auras l'embarras du choix, çà dépend... : du paintpicture, du bitblt, du directx, du tableau avec DIB, du GDI+, ....
tout çà dépend de ton code existant
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp
linerider? connais pas....
beh tout dépend de "comment" tu dessines ton image
pour déplacer çà sera du mouse_mouse si boutton voulu enfoncé
restera a voir "comment" dessiner (je me répète non ? ^^)
tu auras l'embarras du choix, çà dépend... : du paintpicture, du bitblt, du directx, du tableau avec DIB, du GDI+, ....
tout çà dépend de ton code existant
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp
matovitch
Messages postés
31
Date d'inscription
jeudi 2 août 2007
Statut
Membre
Dernière intervention
19 avril 2009
8 déc. 2007 à 10:46
8 déc. 2007 à 10:46
Salut PCPT
Tu cherches "line rider" sur google ( desolé pour les autres moteurs ^^) , tu trouveras 36000 sites de ce "jeu" programmé en flash (je précise que j'ai dis " du style LineRider "...).
Voici le bout de code (presque integral) des 2 outils que j'ai créé : le crayon et la gomme.
**********************************
Option Explicit
Dim Couleur As Long 'Couleur (noir ou blanc) entre 0 et 16777215
______________________________________________________________
Private Sub ImgCray_Click()
Couleur = 0
Form1.DrawWidth = 2
'Couleur noire et épaisseur 2
End Sub
_________________________________________________________________
Private Sub ImgGom_Click()
Couleur = 16777215
Form1.DrawWidth = 15
'Couleur blanc et épaisseur15
End Sub
_________________________________________________________________
Private Sub Form_MouseDown(Button
As Integer, Shift
As Integer, X
As Single, Y
As Single)
CurrentX = X
CurrentY = Y
'Actualise la nouvelle position de la souris pour ne pas lier le trait à la position précédente (mettez le en commentaire vous verrez... :p)
End Sub
_________________________________________________________________
Private Sub Form_MouseMove(Button
As Integer, Shift
As Integer, X
As Single, Y
As Single)
If Button Then Line -(X, Y), Couleur 'Dessine le trait
End Sub
**********************************
Et voilà! je rajouterais plus tard les outils "ligne" et "loupe" ( pour ça je pense me débrouiller).
Comme tu peux le voir, mouse_move + bouton et déja pris, il faut donc un booléen, peut-être mon code et il mal structuré...(je le crois ^^)
Merci d'avance de vos réponses !
Ma
tvit
c
h
Tu cherches "line rider" sur google ( desolé pour les autres moteurs ^^) , tu trouveras 36000 sites de ce "jeu" programmé en flash (je précise que j'ai dis " du style LineRider "...).
Voici le bout de code (presque integral) des 2 outils que j'ai créé : le crayon et la gomme.
**********************************
Option Explicit
Dim Couleur As Long 'Couleur (noir ou blanc) entre 0 et 16777215
______________________________________________________________
Private Sub ImgCray_Click()
Couleur = 0
Form1.DrawWidth = 2
'Couleur noire et épaisseur 2
End Sub
_________________________________________________________________
Private Sub ImgGom_Click()
Couleur = 16777215
Form1.DrawWidth = 15
'Couleur blanc et épaisseur15
End Sub
_________________________________________________________________
Private Sub Form_MouseDown(Button
As Integer, Shift
As Integer, X
As Single, Y
As Single)
CurrentX = X
CurrentY = Y
'Actualise la nouvelle position de la souris pour ne pas lier le trait à la position précédente (mettez le en commentaire vous verrez... :p)
End Sub
_________________________________________________________________
Private Sub Form_MouseMove(Button
As Integer, Shift
As Integer, X
As Single, Y
As Single)
If Button Then Line -(X, Y), Couleur 'Dessine le trait
End Sub
**********************************
Et voilà! je rajouterais plus tard les outils "ligne" et "loupe" ( pour ça je pense me débrouiller).
Comme tu peux le voir, mouse_move + bouton et déja pris, il faut donc un booléen, peut-être mon code et il mal structuré...(je le crois ^^)
Merci d'avance de vos réponses !
Ma
tvit
c
h
matovitch
Messages postés
31
Date d'inscription
jeudi 2 août 2007
Statut
Membre
Dernière intervention
19 avril 2009
11 déc. 2007 à 20:47
11 déc. 2007 à 20:47
Salut !
J'ai réussi en dessinant sur une picture plus grande que la form avec la propriété Autoredraw = true... :)
Ma
tvit
c
h
J'ai réussi en dessinant sur une picture plus grande que la form avec la propriété Autoredraw = true... :)
Ma
tvit
c
h