Page en cours de chargement

Donnez votre avis..
Que pensez-vous de gambaslinux.fr?
 
Interessant
Il manque des rubriques
excellent site
Résultats
INTERFACE GAMBAS
LOGICIELS GAMBAS 3
TUTORIELS
=Bibliothèque
DRAWAREA - Remplir les formes geometriques

REMPLIR UNE FORME GEOMETRIQUE AVEC UNE TEXTURE

 

 

exampledrawarea.png

Bonjour,

Aujourd'hui nous allons nous interesser à remplir des formes geometriques.

A travers ce petit exemple, nous allons utiliser la fonction FILL.

Voici le code de l'application :

PRIVATE mycolor AS Integer = 0
PUBLIC SUB _new()
END
PUBLIC SUB form_OPEN()
me.center
END
PUBLIC SUB brect_click()
draw.begin(drawingarea1)
draw.rect(10, 10, 50, 50)
draw.END
END
PUBLIC SUB brect2_click()
draw.begin(drawingarea1)
draw.fillcolor = mycolor
draw.fillstyle = fill.backdiagonal
draw.rect(70, 10, 50, 50)
draw.END
END
PUBLIC SUB brect3_click()
draw.begin(drawingarea1)
draw.fillcolor = mycolor
draw.fillstyle = fill.cross
draw.rect(110, 10, 50, 50)
draw.END
END
PUBLIC SUB brect4_click()
draw.begin(drawingarea1)
draw.fillcolor = mycolor
draw.fillstyle = fill.crossdiagonal
draw.rect(170, 10, 50, 50)
draw.END
END
PUBLIC SUB brect5_click()
draw.begin(drawingarea1)
draw.fillcolor = mycolor
draw.fillstyle = fill.dense12
draw.rect(210, 10, 50, 50)
draw.END
END
PUBLIC SUB brect7_click()
draw.begin(drawingarea1)
draw.fillcolor = mycolor
draw.fillstyle = fill.solid
draw.rect(270, 10, 50, 50)
draw.END
END
PUBLIC SUB brect7_click()
draw.begin(drawingarea1)
draw.fillcolor = mycolor
draw.fillstyle = fill.horizontal
draw.rect(10, 70, 50, 50)
draw.END
END
PUBLIC SUB brect8_click()
draw.begin(drawingarea1)
draw.fillcolor = mycolor
draw.fillstyle = fill.vertical
draw.rect(70, 70, 50, 50)
draw.END
END
PUBLIC SUB brect9_click()
draw.begin(drawingarea1)
draw.fillcolor = mycolor
draw.fillstyle = fill.none
draw.rect(110, 70, 50, 50)
draw.END
END
PUBLIC SUB bquit_click()
me.CLOSE
END
PUBLIC SUB colorchooser1_change()
mycolor = colorchooser1.value
END

Date de création : 20/01/2012 @ 19:22
Dernière modification : 27/01/2012 @ 22:19
Catégorie : DRAWAREA
Page lue 4809 fois

Imprimer l'article Imprimer l'article


react.gifRéactions à cet article

Personne n'a encore laissé de commentaire.
Soyez donc le premier !


ACCES RAPIDE

doc.png DOCUMENTATION
forum.png   FORUM GAMBAS
logiciel.png LOGICIELS GB
 gb3logo.png  GAMBASFORGE
 mailing.png  MAILING LIST
 bugtracker.png  Gambas Bug Tracker

RECHERCHE




LES INSTRUCTIONS
Divers
INSTRUCTIONS
Où ça, qui ça?
actualite et medias
compteur gratuit
VISITES

   visiteurs

   visiteurs en ligne

ARCHIVES GAMBAS 1/2
^ Haut ^