PDA

View Full Version : مختصات موس بر روی فرم


yashar666
شنبه 26 اسفند 1385, 00:25 صبح
جطور میشه مختصات x y موس را که روی فرم حرکت می کنه نشون داد آیا تابعی داره به چه
صورت هست ممنونم
mzjahromi
شنبه 26 اسفند 1385, 06:56 صبح
OnMouseMove
nightHunter
شنبه 26 اسفند 1385, 09:52 صبح
با سلام.


procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
StatusBar1.Panels[0].Text:='X : ' + IntToStr(Mouse.CursorPos.X) + ' Y : ' + IntToStr(Mouse.CursorPos.Y);
end;

موفق باشی.
yashar666
شنبه 26 اسفند 1385, 12:49 عصر
ممنونم از راهنمای شما