Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by marabu,
20. Dez 2006
Hallo Alex,
bei meinem Beispiel haben die Viertelkreise den gleichen Krümmungsradius, das schafft schöne Übergänge. Wenn du eine Grube in Abhängigkeit von zwei Parametern (Öffnungsdurchmesser und Grubentiefe) zeichnen möchtest, wobei die Übergänge auch stetig sein sollen, dann ist eventuell die Methode Arc() von TCanvas einfacher in der Verwendung, da du dabei mit den Hüllen-Rechtecken...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by marabu,
20. Dez 2006
Hi,
es sind nur ganz kleine Änderungen notwendig. Ich habe die Variable iDist eingeführt, welche festlegt, wie weit die Viertelkreise vertikal auseinander geschoben werden sollen:
procedure TDemoForm.FormClick(Sender: TObject);
const
iRadius = 60;
var
ptCenter: TPoint;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by marabu,
20. Dez 2006
Sorry Alex,
das MoveTo muss tatsächlich sein:
procedure TDemoForm.FormClick(Sender: TObject);
const
iRadius = 60;
var
ptCenter: TPoint;