Per Klick Image-Koordinate ausgeben

knut333 · Hält's aus hier Beiträge: 5

Ich brauche folgende Funktion, weiß aber nicht wie ich das mache:

Ich habe ein Image (600 x 500). Man soll auf das Image klicken können und diese Koordinaten (zum Beispiel 120 x 358) sollen ermittelt werden.

Könnt ihr mir helfen?

LH_Freak · Beiträge: 385 Win XP D7 PE, D2k5 Trial

bei nem Image?
einfach bei OnMouseDown dann X, und Y abfragen

knut333 · Hält's aus hier Beiträge: 5

und mit welchen befehlen frage ich x und y ab?

image1. ... ?

LH_Freak · Beiträge: 385 Win XP D7 PE, D2k5 Trial

hast du dir schonmal MouseDown angeschaut?

Musst dir global zwei Integers oder meinetwegen auch einen Pointer einführen und anschließend bei OnMouseDown z.B. so machen:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

geklickt.x := x;
gelickt.y := y;

{Bei integern das:
gx := x;
gy := y

Lannes · Verfasst: Do 29.09.05 16:59

Hallo,

Mousedown ist schon richtig,
aber eine globale Variable brauchst du nicht, denn

markieren

Delphi-Quelltext

1:
2:

procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);

liefert Dir schon die Koordinaten.
Möchtest Du die Koordinaten bezogen auf den Desktop haben,
kannst du sie mit der Funktion ClientToScreen umrechnen.

_________________
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )

LH_Freak · Beiträge: 385 Win XP D7 PE, D2k5 Trial

oder auch einfach GetCursorPos(Zeilpointer)

Karlson · Beiträge: 2088

Pointer <> TPoint!!!!!!!!!!!!!!! Sollte man keinesfalls verwechseln!

LH_Freak · Beiträge: 385 Win XP D7 PE, D2k5 Trial

Ja klar, da war ich geistig immer noch bei OGL

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme