współrzędne punktu / kursora myszy

0

mam problem , chciałbym uzyskać współrzędne punktu, który kliknąłem...
tak konkretnie to zalezy mi na uzyskaniu wspolrzednych na canvasie...
czyli mam sobie ekran -> moj program -> canvas i wlasnie z tego canvasa ma sciagam wspolrzedne ;P


| |
| pppppppppppppppp |
| p cccccccc p |
| p c c p |
| p c c p |
| p cccccccc p |
| pppppppppppppppp |
| |
|____________________|

czy ktos pomoze ? :P

0

czy tcanvas ma jakas inna forme (nie myl z TForm)
Jezeli tworzysz TCANVAS DYNAMICZNIE to wtedy sam podajesz pozycje. Jak np. to jest Timage lub inna knotrolka (kompionent) pobierasz wartosci nazwa.top i nazwa.left

var
t:tpoint;
begin
getcursorpos(t);
t.x := t.x-(form1.left+nazwa.left);
t.y := t.y-(form1.top+nazwa.top);
end;

o to chodzi?

0

OnMouseDown :>

0
var
t:tpoint;
begin
getcursorpos(t);
t.x := t.x-(form1.left+nazwa.left);
t.y := t.y-(form1.top+nazwa.top);
end;

mniej wiecej czegos takiego oczekiwalem ;] , widzialem juz cos takiego ale nazwy tej funkcji zapomnialem ;) thx, juz sprawdzam ;)

0

wiesz co.... ta funkcja getcursorpos(); to chyba jednak podaje wspolrzedne liczac od lewego gornego rogu formy, a nie ekranu... nawet na lepsze wyjdzie ;)

1 użytkowników online, w tym zalogowanych: 0, gości: 1