흑흑.....ㅠ,.ㅠ 진짜루 바보당...
고수님들 흠 지가엽 마우스의 포인트 값을 알아내려구 하는디엽 ㅠ.ㅠ
TPoint 의 x,y 를 사용하는건 알겠는디엽 ㅠ.ㅠ
var
currpos : TPoint;
begin
currpos.X:=?.Left;
currpos.y:=?.Top;
edit1.Text:= inttostr(currpos.x)+inttostr(currpos.y);
end;
ㅠ.ㅠ 저 바부죠 ? 이곳에 모가 들어가야 하나엽
커선가...??? 도대체 몰까...ㅠ.ㅠ
그럼 고수님들 고견 기댕김당......헉 L( -.-)ㄱ 휙~~
currpos : TPoint;
i,k:integer;
begin
i:=currpos.X;
k:=currpos.y;
edit1.Text:= inttostr(i)+','+inttostr(k);
end;
헐 창피혀라.....빨리 도망 가야쥐.......L( -.-)ㄱ 휙~~