Un point sur un cercle

**Speed41** · 09/09/2007, 13h47

Bonjour,
Je voudrais connaître les coordonnées d'un point sur une ellipse en fonction d'un angle (centre et rayons connu biensur)

Merci de votre aide

**sjrd** · 09/09/2007, 14h23

Ce sont des maths. Si je ne me trompe pas :

Code X :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Pt.X = Centre.X + RayonLargeur * cos(Angle);
Pt.Y = Centre.Y + RayonHauteur * sin(Angle);

**Speed41** · 09/09/2007, 14h54

Ok merci.

Mais il n'existe pas de fonction prédéfinit ? Il me semble qu'en Turbo Pascal ça existait ?

**Clorish** · 09/09/2007, 15h29

Envoyé par Speed41

Ok merci.

Mais il n'existe pas de fonction prédéfinit ? Il me semble qu'en Turbo Pascal ça existait ?

En meme temps ... elle n'ets pas tres dure a reproduire

**Speed41** · 09/09/2007, 17h47

Oui bien sur qu'elle n'est pas difficile à reproduire c'est simplement que j'avais constaté des petites différences (bien sur légère) entre les points ajoutés manuellement et la courbe (surement du aux arrondis). Cétait simplement pour éviter ce petit détail.

Merci de votre aide

Je vais pouvoir me mettre à mon petit programme

Merci encore

**Clorish** · 09/09/2007, 20h05

Ben .. si la difference reside entre la formule ci dessus et la methode DrawEllipse du TCanvas de Delphi .. le plus simple serait d'aller voir directement dans les sources

**sjrd** · 09/09/2007, 22h58

Ca ça va pas aider

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
procedure TCanvas.Ellipse(X1, Y1, X2, Y2: Integer);
begin
  // ...
  Windows.Ellipse(FHandle, X1, Y1, X2, Y2);
  // ...
end;

Comme Windows.Ellipse est inaccessible...

**Clorish** · 10/09/2007, 11h29

Ouaip ... vu sous cet angle ....

**Speed41** · 10/09/2007, 19h56

Heu la moi je suis dépassé
Désolé mais mon niveau est assé faible.

Un point sur un cercle

Langage Delphi

Discussions similaires

Partager

Partager