Autor Beitrag
WeBsPaCe
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 2322
Erhaltene Danke: 1

FireFox 3, Internet Explorer 6 SP1
D1, D3Prof, D6Pers, D7Pers+Indy, VisualStudio Express
BeitragVerfasst: So 27.02.05 13:49 
Moin. Also ich möchte einen Kreis mit Canvas in ein TImage zeichnen. Von dem Kreis soll aber nur der Teil ganz rechts oben zu sehen sein. Also der erste Quadrant, wenn man sagt, dass der Mittelpunkt der Ursprung eines Koordinatensystems ist.

Wieso zeigt er mir aber bei...
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
procedure TForm1.FormCreate(Sender: TObject);
begin
Image1.Canvas.Pen.Width := 5;
Image1.Canvas.Pen.Color := clRed;
Image1.Canvas.Ellipse(0-Form1.ClientWidth, 0-Form1.ClientHeight, Form1.ClientWidth, Form1.ClientHeight);
end;

...diesen Teil...
ausblenden Quelltext
1:
2:
3:
4:
5:
+-+-+
| | |
+-+-+
| |X|
+-+-+
...(also das rechts unten!), wenn ich doch aber diesen Teil sehen möchte...
ausblenden Quelltext
1:
2:
3:
4:
5:
+-+-+
| |X|
+-+-+
| | |
+-+-+

... ???????? :shock:


Moderiert von user profile iconChristian S.: Topic aus VCL (Visual Component Library) verschoben am So 27.02.2005 um 14:04

_________________
Steht der Bauer im Gemüse, hat er später grüne Füße.
WeBsPaCe Threadstarter
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 2322
Erhaltene Danke: 1

FireFox 3, Internet Explorer 6 SP1
D1, D3Prof, D6Pers, D7Pers+Indy, VisualStudio Express
BeitragVerfasst: So 27.02.05 14:17 
Ich hab einfach vergessen, dass die Koordinaten ja links oben ihren Ursprung haben... :autsch:

So geht's:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
procedure TForm1.FormCreate(Sender: TObject);
begin
Image1.Canvas.Pen.Width := 5;
Image1.Canvas.Pen.Color := clRed;
Image1.Canvas.Ellipse(-Form1.ClientWidth, 0, Form1.ClientWidth, Form1.ClientHeight+Form1.ClientHeight);
end;


Danke für eure Posts... :rofl:

_________________
Steht der Bauer im Gemüse, hat er später grüne Füße.