einen Kreis zu Fuß zeichen

[Matze]

Wie?

Kann man sagen

LineTo = LineTo + MoveTo? :gruebel:

Falls ja, dann stimmt Alcs Lösung natürlich, falls nein, dann verstehe ich sie nicht.

MoveTo (Hinspringen)
LineTo (von MoveTo aus zeichnen) oder nicht? :gruebel:

[supermuckl]

wenn du ohne moveto arbeitest ( am anfang einmal )
dann ziehst du ne linie von 0,0 bis zu deinem ersten lineto

wenn du das unschöne ding da weghaben willst dann solltest du erstmal mit moveto an deinen anfang im kreis springen und dann weiter machen mit lauter lineto's

ansonsten braucht man kein moveto .. ausser man will halt ohne eine zwischenlinie ziehen irgendwo anderst ne neue linie ziehen

[Nikolas]

Moveto -> setztden Stift an die übergebene Position
Lineto -> zeichnet eine Linie von der aktuellen Position zur übegebenen Position und setzt den Stift dorthin [steht aber auch alles so in der OH ]

[alcaeus]

Hi Jungs,

Zitat:

Zitat von Chimaira

@Alcaeus: :coder: better :mrgreen: :zwinker: :cheers:

Ist noch zu früh :roll: :mrgreen:

Und zum Canvas & co.: "It's not a feature, it's a bug". So ist es kein Copy&Waste-Code :mrgreen:

Das Problem muss aber nicht notwendigerweise mit Trigonometrie gelöst werden:

Delphi-Quellcode:

for i := mx-r to mx+r do
begin
  y1 := sqrt(sqr(x)-sqr(r));
  y2 := -sqrt(sqr(x)-sqr(r));
end;

Damit erhälst du die Punkte, welche du dann nur verbinden musst. Der Weg mit y1 und y2 ist nötig, da man eine quadratische Funktion umgeformt hat und damit eine Lösung fallen lassen würde. (ich geh hier nicht weiter ins Detail :roll:)

Greetz
alcaeus

[Matze]

@Toxman: Ich kenne die Funktion, OH? Das sagst du mir?

Das habe ich doch vorher gesagt, musst nur lesen. ;)

[Nikolas]

Wo hast du was von der OH gesagt? Es kam mir auch komisch vor, aber

Zitat:

LineTo = LineTo + MoveTo?

Falls ja, dann stimmt Alcs Lösung natürlich, falls nein, dann verstehe ich sie nicht.

MoveTo (Hinspringen)
LineTo (von MoveTo aus zeichnen) oder nicht?

klang etwas seltsam :gruebel: :gruebel:

[Matze]

Naja, ich meinte nur:

MoveTo (Hinspringen)
LineTo (von MoveTo aus zeichnen) oder nicht?

Und deshalb wundere ich mich, wieso nur einmal MoveTo bei Alc steht und zig Mal LineTo. :wink:

[dizzy]

Weil LineTo auch die aktuelle Position an das Ende der Linie setzt ;).

Ist im Grunde ein MoveTo, nur dass ne Linie mitgezogen wird.

[Robert Marquardt]

Ich wuerde mich mal mit dem Bresenham-Algorithmus beschaeftigen.
Der kann nicht nur Linien zeichnen sondern auch Ellipsen/Kreise.
Alles ohne Floating Point Operationen.
Der Algorithmus liefert sogar Antialiasing-Informationen.

[Mr Whoopee]

Hallo,

bei mir geht der Quelltext vorn und hinten nicht :(.

Delphi-Quellcode:

return Deg*Pi/180;

Da meckert er schon mit return. ([Fehler] Unit1.pas(27): Undefinierter Bezeichner: 'return')

Delphi-Quellcode:

function ZeichneKreis(mx, my: Integer; r: Real);

hier erzählt er mir: "[Fehler] Unit1.pas(27): Funktion benötigt Ergebnistyp".
Des weiteren:
[Fehler] Unit1.pas(32): Undefinierter Bezeichner: 'MoveTo'
[Fehler] Unit1.pas(35): Undefinierter Bezeichner: 'DegToRad'
[Fehler] Unit1.pas(37): Inkompatible Typen: 'HDC' und 'Extended'
[Fehler] Unit1.pas(39): Inkompatible Typen: 'HDC' und 'Extended'

Kamm mir bitte jemand helfen?


Whoopee