Maaf mohon pencerahannya..
saya lagi bingung, apakah pada event OnMouseOver dapat digunakan
untuk mengetahui kalau mouse sedang berada didalam/mengenai suatu
garis lurus.
mungkin seperti ini:
var
from,to: TPoint;
procedure buat_garis_lurus;
begin
From:=Point(10,10);
To:= Point(100,100);
with canvas do
begin
MoveTo(From.X,From.Y);
LineTo(To.X,To.Y);
end;
end;
procedure OnMouseOver( bla,bla..);
begin
//mungkinkah??
if X =.... and Y =..... then ShowMessage('inside');
end;
Atau garis tersebut harus terbuat dari polygon? biar gampang ngecek
kordinatnya???
so:
from i:=1 to panjang_garis do create_Line_from_polygon;
baru:
if mouse.x inside Poly.x and mouse.y inside poly.y then
showmessage('inside');
Terima kasih buanyak atas perhatiannya.
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Get 128 Bit SSL Encryption!
http://us.click.yahoo.com/xaxhjB/hdqFAA/xGHJAA/i7folB/TM
---------------------------------------------------------------------~->
Berlangganan: [EMAIL PROTECTED]
Stop Berlangganan: [EMAIL PROTECTED]
Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED]
Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
