Cherche correspondance trigo avec vb6 ?

Le
LE TROLL
Cherche correspondance trigo avec vb6 ?


Bonjour,

Pour dessiner sur la forme, je cherche la correspondance en vb net des
directives trigos qui suivent en vb6 (ne pas oublier les entêtes), et aussi
indiquer s'il faut activer quelque chose grenre (autoredraw), et les
procédure spécifique comme (paint)

Voici la liste :

CERCLE
Circle(c, l), r, RGB(ro, gr, bl)
Sens : 0 = Est, 90° = Nord, 180° = Ouest, 370° = Sud..

ARC DE CERCLE
Circle(c, l), r, coul, ax, ay, RGB(ro, gr, bl)

ELLIPSE
Circle (c, l ), r , coul, ax, ay, e, RGB(ro, gr, bl)

ARC D'ELLIPSE
Circle(c, l), r, coul, ax, ay, e=<>1, RGB(ro, gr, bl)
Circle (cx, cy), 480, QBColor(14), , , 0.5
Circle(c, l), r, coul, ax, ay, e, RGB(ro, gr, bl)
c = colonne
l = ligne
r = rayon
coul = couleur (0 si RGB)
ax = début d'arc "en radian"
ay = fin d'arc "en radian"
e = ellipse si <> 1 (< 1 = c>l) (>1=l>c)
RGB = couleur

MISE EN RADIAN D'UN ANGLE
angle_en_radian = angle_en_degre * 3.14 / 180


POINT DANS UN CERCLE OU UNE ELLIPSE

SINUS
Sinus = Sin(angle_radian)

COSINUS
Cosinus = Cos(angle_radian)

POINT D'UN CERCLE
Colonne = rayon * cosinus + centre_colonne
Ligne = centre_ligne - rayon * sinus


LIGNE
Line(c1,l1) - (c2, l2), couleur

RECTANGLE
Line(c1,l1) - (c2, l2), couleur, B


REMPLISSAGE D'UN DESSIN FERME
FillStyle = x
1 defaut (transparent)
0 rempli (figure fermée) par FillColor
FillColor = couleur (si FillStyle = 0)

ECRITURE
Form1.Print "obs."; variable
Form1.Print "obs."
Form1.Print variable

POSITION COURANTE
Colonne = CurrentX
Ligne = CurrentY


Cordialement ;o)
-
Logiciels, romans, contacts : http://irolog.free.fr
_______________________
.
.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Patrice
Le #21005771
Bonjour,

C'est la classe Graphics qui prend en charge les différentes primitives
graphiques cercle et autres :
http://msdn.microsoft.com/fr-fr/library/system.drawing.graphics_members.aspx
et voir notamment les méthodes DrawXXX et FillXXX

A noter que le FillColor (qui de mémoire remplissait une figure
préalablement tracée ?) n'existe pas mais peut-être implanté assez
facilement en cas de besoin
(http://fr.wikipedia.org/wiki/Algorithme_de_remplissage_par_diffusion),
l'idée étant sans doute de favoriser le remplissage de figures dont les
caractérisques sont connues (et non d'examiner une image déjà tracée pour
déterminer les contours de remplissage).

Les fonctions mathématiques dont les fonctions trigo sont dans la classe
Math :
http://msdn.microsoft.com/en-us/library/system.math_members.aspx

Pour démarrer avec le graphisme :
http://msdn.microsoft.com/fr-fr/library/5y289054.aspx

Cela devrait permettre de commencer à défricher le terrain... Je vois qu'il
est question également de tracer du texte. Il serait peut-être possible de
présenter tout cela sous forme d'un ou plusieurs contrôles selon le but
poursuivi.

--
Patrice


"LE TROLL" discussion :
Cherche correspondance trigo avec vb6 ?


Bonjour,

Pour dessiner sur la forme, je cherche la correspondance en vb net des
directives trigos qui suivent en vb6 (ne pas oublier les entêtes), et
aussi indiquer s'il faut activer quelque chose grenre (autoredraw), et les
procédure spécifique comme (paint)...

Voici la liste :

CERCLE
Circle(c, l), r, RGB(ro, gr, bl)
Sens : 0 = Est, 90° = Nord, 180° = Ouest, 370° = Sud..

ARC DE CERCLE
Circle(c, l), r, coul, ax, ay, RGB(ro, gr, bl)

ELLIPSE
Circle (c, l ), r , coul, ax, ay, e, RGB(ro, gr, bl)

ARC D'ELLIPSE
Circle(c, l), r, coul, ax, ay, e=<>1, RGB(ro, gr, bl)
Circle (cx, cy), 480, QBColor(14), , , 0.5
Circle(c, l), r, coul, ax, ay, e, RGB(ro, gr, bl)
c = colonne
l = ligne
r = rayon
coul = couleur (0 si RGB)
ax = début d'arc "en radian"
ay = fin d'arc "en radian"
e = ellipse si <> 1 (< 1 = c>l) (>1=l>c)
RGB = couleur

MISE EN RADIAN D'UN ANGLE
angle_en_radian = angle_en_degre * 3.14 / 180


POINT DANS UN CERCLE OU UNE ELLIPSE

SINUS
Sinus = Sin(angle_radian)

COSINUS
Cosinus = Cos(angle_radian)

POINT D'UN CERCLE
Colonne = rayon * cosinus + centre_colonne
Ligne = centre_ligne - rayon * sinus


LIGNE
Line(c1,l1) - (c2, l2), couleur

RECTANGLE
Line(c1,l1) - (c2, l2), couleur, B


REMPLISSAGE D'UN DESSIN FERME
FillStyle = x
1 defaut (transparent)
0 rempli (figure fermée) par FillColor
FillColor = couleur (si FillStyle = 0)

ECRITURE
Form1.Print "obs."; variable
Form1.Print "obs."
Form1.Print variable

POSITION COURANTE
Colonne = CurrentX
Ligne = CurrentY


Cordialement ;o)
-
Logiciels, romans, contacts : http://irolog.free.fr
_______________________
.
.




LE TROLL
Le #21006221
merci :o)

Cordialement ;o)
-
Logiciels, romans, contacts : http://irolog.free.fr
_______________________
.
.


"Patrice" news:
Bonjour,

C'est la classe Graphics qui prend en charge les différentes primitives
graphiques cercle et autres :
http://msdn.microsoft.com/fr-fr/library/system.drawing.graphics_members.aspx
et voir notamment les méthodes DrawXXX et FillXXX

A noter que le FillColor (qui de mémoire remplissait une figure
préalablement tracée ?) n'existe pas mais peut-être implanté assez
facilement en cas de besoin
(http://fr.wikipedia.org/wiki/Algorithme_de_remplissage_par_diffusion),
l'idée étant sans doute de favoriser le remplissage de figures dont les
caractérisques sont connues (et non d'examiner une image déjà tracée pour
déterminer les contours de remplissage).

Les fonctions mathématiques dont les fonctions trigo sont dans la classe
Math :
http://msdn.microsoft.com/en-us/library/system.math_members.aspx

Pour démarrer avec le graphisme :
http://msdn.microsoft.com/fr-fr/library/5y289054.aspx

Cela devrait permettre de commencer à défricher le terrain... Je vois
qu'il est question également de tracer du texte. Il serait peut-être
possible de présenter tout cela sous forme d'un ou plusieurs contrôles
selon le but poursuivi.

--
Patrice


"LE TROLL" discussion :
Cherche correspondance trigo avec vb6 ?


Bonjour,

Pour dessiner sur la forme, je cherche la correspondance en vb net des
directives trigos qui suivent en vb6 (ne pas oublier les entêtes), et
aussi indiquer s'il faut activer quelque chose grenre (autoredraw), et
les procédure spécifique comme (paint)...

Voici la liste :

CERCLE
Circle(c, l), r, RGB(ro, gr, bl)
Sens : 0 = Est, 90° = Nord, 180° = Ouest, 370° = Sud..

ARC DE CERCLE
Circle(c, l), r, coul, ax, ay, RGB(ro, gr, bl)

ELLIPSE
Circle (c, l ), r , coul, ax, ay, e, RGB(ro, gr, bl)

ARC D'ELLIPSE
Circle(c, l), r, coul, ax, ay, e=<>1, RGB(ro, gr, bl)
Circle (cx, cy), 480, QBColor(14), , , 0.5
Circle(c, l), r, coul, ax, ay, e, RGB(ro, gr, bl)
c = colonne
l = ligne
r = rayon
coul = couleur (0 si RGB)
ax = début d'arc "en radian"
ay = fin d'arc "en radian"
e = ellipse si <> 1 (< 1 = c>l) (>1=l>c)
RGB = couleur

MISE EN RADIAN D'UN ANGLE
angle_en_radian = angle_en_degre * 3.14 / 180


POINT DANS UN CERCLE OU UNE ELLIPSE

SINUS
Sinus = Sin(angle_radian)

COSINUS
Cosinus = Cos(angle_radian)

POINT D'UN CERCLE
Colonne = rayon * cosinus + centre_colonne
Ligne = centre_ligne - rayon * sinus


LIGNE
Line(c1,l1) - (c2, l2), couleur

RECTANGLE
Line(c1,l1) - (c2, l2), couleur, B


REMPLISSAGE D'UN DESSIN FERME
FillStyle = x
1 defaut (transparent)
0 rempli (figure fermée) par FillColor
FillColor = couleur (si FillStyle = 0)

ECRITURE
Form1.Print "obs."; variable
Form1.Print "obs."
Form1.Print variable

POSITION COURANTE
Colonne = CurrentX
Ligne = CurrentY


Cordialement ;o)
-
Logiciels, romans, contacts : http://irolog.free.fr
_______________________
.
.







Publicité
Poster une réponse
Anonyme