begin process at 2012 02 15 16:37:36
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Archive Visual Basic & VB.NET

 > 

Archives Visual Basic

 > 

Maths

 > 

Coordonnées d'un point à la périphérie d'un cercle ??


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Coordonnées d'un point à la périphérie d'un cercle ??

lundi 1 juillet 2002 à 17:05:24 | Coordonnées d'un point à la périphérie d'un cercle ??

neo12

voilà, j'voudrais utiliser paint.picture pour dessiner un cercle dans lequel s'inscrit une image.
Pour simplifier prenons 1 quart de cercle
pour reproduire ce 1/4 de cercle avec des rectangles (fonctions paint.picture), cela revient à "empiler" à la base un rectangle de coordonées (x,Y) et de la longueur égale au rayon, puis dessus
un autre rectangle de coordonnées (X,y-1) mais avec une longueur qui soit issu d'un calcul qui permet en donnant le le "y-1" d'avoir le X (donc d'avoir la longueur d'après la hauteur). cette fonction correspondrait donc à donner les coordonnées du point y sur l'arc de cercle en connaissant le X.
Ainsi de suite l'empilage de ces rectangles donne un 1/4 de cercle. Si qlq'1 à compris aidez moi SVP, je bute là dessus depuis plusieurs jour :-(
lundi 1 juillet 2002 à 20:12:34 | Re : Coordonnées d'un point à la périphérie d'un cercle ??

Progmeister


Sur un cercle, les coordonnées sont définies de façon trigonométrique :

Un cercle trigonométrique est un cercle de rayon 1 :
Les points de ce cercle ont pour coordonées (cos(x), sin(x) ou x est l'angle en radian seulement toi tu connait l'abscisse et tu veut l'ordonnée : l'abscisse : a est égale à cos(x)
Pour retrouver x a partir de a, il faut utiliser la fonction arccosinus qui n'existe pas en vb mais est régie par la formule :
Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)
Ou x est un nombre compris entre 0 et 1
La normalement tu as l'angle formé par le centre du cercle, le point que tu cherches et le point dont tu connais l'abscisse mais dont l'ordonnée est nulle, Tu calcule donc le sinus de cet angle et ca te donne y
Mais ca c vrai pour un cercle de rayon 1
Avant de passer l'abscisse a la fonction , divise la par le rayon pour qu'elle soit comprise entre 0 et 1

Je résume
Tu cherche un point d'un cercle de rayon r et de centre (a, b)
Ce point a pour coordonées (x, y), tu connait x$
Dim o
o=(x-a)/r
Dim p
p = Atn(-o / Sqr(-o * o + 1)) + 2 * Atn(1)
Dim k
k=sin(p)
y= (p*r)+b
(je tient compte des coordonnées du cercle)
Voila tu as trouvé y

J'espere avoir été clair et avoir répondu a ta question

Bonne Prog

Progmeister



-------------------------------
Réponse au message :
-------------------------------

voilà, j'voudrais utiliser paint.picture pour dessiner un cercle dans lequel s'inscrit une image.
Pour simplifier prenons 1 quart de cercle
pour reproduire ce 1/4 de cercle avec des rectangles (fonctions paint.picture), cela revient à "empiler" à la base un rectangle de coordonées (x,Y) et de la longueur égale au rayon, puis dessus
un autre rectangle de coordonnées (X,y-1) mais avec une longueur qui soit issu d'un calcul qui permet en donnant le le "y-1" d'avoir le X (donc d'avoir la longueur d'après la hauteur). cette fonction correspondrait donc à donner les coordonnées du point y sur l'arc de cercle en connaissant le X.
Ainsi de suite l'empilage de ces rectangles donne un 1/4 de cercle. Si qlq'1 à compris aidez moi SVP, je bute là dessus depuis plusieurs jour :-(
mardi 2 juillet 2002 à 17:27:27 | Re : Coordonnées d'un point à la périphérie d'un cercle ??

neo12


merci beaucoup pour ton aide, je vais essayer de mettre ça en pratique, seul bémol, c'est X que je cherche et non pas Y, Y étant la position verticale de mon rectangle aligné à gauche, il me faut avoir la longueur (que j'obtiendrais en enlevant du y que je trouverais le y corrspondant à l'alignement gauche (0 par défaut). mais bon, si j'ai bien compris il me suffit de chercher le sinus par une fonction ArcSin similaire ?


-------------------------------
Réponse au message :
-------------------------------


Sur un cercle, les coordonnées sont définies de façon trigonométrique :

Un cercle trigonométrique est un cercle de rayon 1 :
Les points de ce cercle ont pour coordonées (cos(x), sin(x) ou x est l'angle en radian seulement toi tu connait l'abscisse et tu veut l'ordonnée : l'abscisse : a est égale à cos(x)
Pour retrouver x a partir de a, il faut utiliser la fonction arccosinus qui n'existe pas en vb mais est régie par la formule :
Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)
Ou x est un nombre compris entre 0 et 1
La normalement tu as l'angle formé par le centre du cercle, le point que tu cherches et le point dont tu connais l'abscisse mais dont l'ordonnée est nulle, Tu calcule donc le sinus de cet angle et ca te donne y
Mais ca c vrai pour un cercle de rayon 1
Avant de passer l'abscisse a la fonction , divise la par le rayon pour qu'elle soit comprise entre 0 et 1

Je résume
Tu cherche un point d'un cercle de rayon r et de centre (a, b)
Ce point a pour coordonées (x, y), tu connait x$
Dim o
o=(x-a)/r
Dim p
p = Atn(-o / Sqr(-o * o + 1)) + 2 * Atn(1)
Dim k
k=sin(p)
y= (p*r)+b
(je tient compte des coordonnées du cercle)
Voila tu as trouvé y

J'espere avoir été clair et avoir répondu a ta question

Bonne Prog

Progmeister



-------------------------------
Réponse au message :
-------------------------------

voilà, j'voudrais utiliser paint.picture pour dessiner un cercle dans lequel s'inscrit une image.
Pour simplifier prenons 1 quart de cercle
pour reproduire ce 1/4 de cercle avec des rectangles (fonctions paint.picture), cela revient à "empiler" à la base un rectangle de coordonées (x,Y) et de la longueur égale au rayon, puis dessus
un autre rectangle de coordonnées (X,y-1) mais avec une longueur qui soit issu d'un calcul qui permet en donnant le le "y-1" d'avoir le X (donc d'avoir la longueur d'après la hauteur). cette fonction correspondrait donc à donner les coordonnées du point y sur l'arc de cercle en connaissant le X.
Ainsi de suite l'empilage de ces rectangles donne un 1/4 de cercle. Si qlq'1 à compris aidez moi SVP, je bute là dessus depuis plusieurs jour :-(

mardi 2 juillet 2002 à 22:18:05 | Re : Coordonnées d'un point à la périphérie d'un cercle ??

Progmeister


T'as tout compris, je penses que ca devrait marcher...

Bonne Prog

Progmeister


-------------------------------
Réponse au message :
-------------------------------


merci beaucoup pour ton aide, je vais essayer de mettre ça en pratique, seul bémol, c'est X que je cherche et non pas Y, Y étant la position verticale de mon rectangle aligné à gauche, il me faut avoir la longueur (que j'obtiendrais en enlevant du y que je trouverais le y corrspondant à l'alignement gauche (0 par défaut). mais bon, si j'ai bien compris il me suffit de chercher le sinus par une fonction ArcSin similaire ?


-------------------------------
Réponse au message :
-------------------------------


Sur un cercle, les coordonnées sont définies de façon trigonométrique :

Un cercle trigonométrique est un cercle de rayon 1 :
Les points de ce cercle ont pour coordonées (cos(x), sin(x) ou x est l'angle en radian seulement toi tu connait l'abscisse et tu veut l'ordonnée : l'abscisse : a est égale à cos(x)
Pour retrouver x a partir de a, il faut utiliser la fonction arccosinus qui n'existe pas en vb mais est régie par la formule :
Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)
Ou x est un nombre compris entre 0 et 1
La normalement tu as l'angle formé par le centre du cercle, le point que tu cherches et le point dont tu connais l'abscisse mais dont l'ordonnée est nulle, Tu calcule donc le sinus de cet angle et ca te donne y
Mais ca c vrai pour un cercle de rayon 1
Avant de passer l'abscisse a la fonction , divise la par le rayon pour qu'elle soit comprise entre 0 et 1

Je résume
Tu cherche un point d'un cercle de rayon r et de centre (a, b)
Ce point a pour coordonées (x, y), tu connait x$
Dim o
o=(x-a)/r
Dim p
p = Atn(-o / Sqr(-o * o + 1)) + 2 * Atn(1)
Dim k
k=sin(p)
y= (p*r)+b
(je tient compte des coordonnées du cercle)
Voila tu as trouvé y

J'espere avoir été clair et avoir répondu a ta question

Bonne Prog

Progmeister



-------------------------------
Réponse au message :
-------------------------------

voilà, j'voudrais utiliser paint.picture pour dessiner un cercle dans lequel s'inscrit une image.
Pour simplifier prenons 1 quart de cercle
pour reproduire ce 1/4 de cercle avec des rectangles (fonctions paint.picture), cela revient à "empiler" à la base un rectangle de coordonées (x,Y) et de la longueur égale au rayon, puis dessus
un autre rectangle de coordonnées (X,y-1) mais avec une longueur qui soit issu d'un calcul qui permet en donnant le le "y-1" d'avoir le X (donc d'avoir la longueur d'après la hauteur). cette fonction correspondrait donc à donner les coordonnées du point y sur l'arc de cercle en connaissant le X.
Ainsi de suite l'empilage de ces rectangles donne un 1/4 de cercle. Si qlq'1 à compris aidez moi SVP, je bute là dessus depuis plusieurs jour :-(




Cette discussion est classée dans : coordonnées, paint, cercle, longueur, périphérie


Répondre à ce message

Sujets en rapport avec ce message

tracer un cercle et enregistrer les coordonnées dans un fichier txt : [ par Lind ] alors j'aimerais tracer un cercle (on m'a donner en gros ce qu'il fallait faire :1-circle (X,Y), R2-déclarer 2 fonctionx(t)=r*cos(t)y(t)=r*sin(t)mais Dessiner un arc sans connaitre le centre du cercle [ par JohnBug ] Bonjour à tous,   Je dois construire une appli dans laquelle l'usagé peut dessiner des tracés sur une feuille à partir de coordonnées entrées au clavi .net faire du paint a partir d'un sub [ par yvesyves ] Slt, Je suis sous Vb2005 et j'arrive pas a créer un cercle depuis une procedure. Le cercle je sais le faire,ce que je sais pas c'est la gestion des ev longueur d'un programme [ par mimomim ] bonjour à tous ! est-ce normal qu'un petit programme puisse s'étaler sur une quinzaine de pages (format word)? mimo moyenne selon un pas [ par barros ] salut, y-a t-il quelqu'un qui pourrait aider un néophyte ?. je cherche le code vba pour le pb suivant : J'importe des données sur 2 colonnes. La prem longueur de text [ par elisabeth_nov ] bonjour,je possede un formulaire dans lequel jai une textbox qui contient une information de 11 caractere, ce que je voudrais c pouvoir enregistrer le effacer un cercle [ par nardelmouk ] salut, je suis en train de faire une source pour faire une étoile a 5 branches,si je trace plusieurs figure dans une picturebox,comment faire pour enl Cercle shape sur statusBar [ par bichoncanada ] Bonjour,je n'arrive pas a mettre un shape en forme de cercle sur ma status bar, il me le met toujours derrière et on ne le voit plus. Meme en mettant Calcul d'aire [ par fdalban ] Bonjour, j'utilise une PictureBox dans laquelle je trace un cercle et un rectangle avec Line et Circle. Il y a intersection entre le rectangle et le


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 3,089 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales