Einzelnen Beitrag anzeigen

nadery

Registriert seit: 23. Apr 2014
9 Beiträge
 
#1

Punkt in Canvas Koordinatensystem zeichnen

  Alt 24. Apr 2014, 12:56
http://forum.delphi-treff.de/index.p...threadID=59561 Crosspost

Wie setzte ich einen Punkt in ein mit Canvas gezeichnetes Koordinatensystem?

Die Koordinaten sollen aus zwei Edit Feldern entnommen werden.

Ich hatte an sowas hier Gedacht...

Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
var
  LVGroesse:integer;
  LVGewicht:integer;
begin
With image1.Canvas do
begin
LVGroesse:= strtoint(Edit1.Text);
LVGewicht:=strtoint(Edit2.Text);
TextOut(LVGroesse,LVGewicht,'X');
end;
end;
Nur fängt er bei TextOut vom Absolut punkt der ganzen Image an und nicht vom Koordinatensystem selbst.
Die Y-Koordinate von TextOut geht ja auch immer nach unten und nicht nach oben?

Jemand ne bessere Idee als das mit TextOut zu machen oder ein Vorschlag wie ich es mit TextOut machen kann?

Danke
  Mit Zitat antworten Zitat