請問我想在Image元件上移動滑鼠時知道滑鼠現在在什麼座標，
之前寫法是在Mouse Move的事件裡取得座標，在Form上多一個Label用來顯示座標值。
現在想改寫成在滑鼠移動時座標可以出現在滑鼠指標旁，
不知道大家有沒有建議什麼樣的寫法，能達到上述的要求呢?

Hint?
===================引 用 kirei6989 文 章===================
請問我想在Image元件上移動滑鼠時知道滑鼠現在在什麼座標，
之前寫法是在Mouse Move的事件裡取得座標，在Form上多一個Label用來顯示座標值。
現在想改寫成在滑鼠移動時座標可以出現在滑鼠指標旁，
不知道大家有沒有建議什麼樣的寫法，能達到上述的要求呢?

用Hint 成功了，謝謝。
我把Image1->Hint = "(" IntToStr(X) "," IntToStr(Y) ")";放在MouseMove的事件裡執行，
但是卻不會隨著滑鼠移動而出現Hint，想不通為什麼無法跟著執行，
是不是有哪些需要注意或設定的地方呢?

ps.而且需要mouse down 和 mouse up 後才會出現Hint喔！

編輯記錄

以下是Delphi的程式碼
不過應該不難看懂才對
除了Image元件外
再拉個Label來當顯示座標用


[code delphi]
procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Label1.Left := Image1.Left X 1;
Label1.Top := Image1.Top Y 1;
Label1.Caption := IntToStr(X) ',' IntToStr(Y);
end;

[/code]



===================引 用 kirei6989 文 章===================
用Hint 成功了，謝謝。
我把Image1->Hint = "(" IntToStr(X) "," IntToStr(Y) ")";放在MouseMove的事件裡執行，
但是卻不會隨著滑鼠移動而出現Hint，想不通為什麼無法跟著執行，
是不是有哪些需要注意或設定的地方呢?

ps.而且需要mouse down 和 mouse up 後才會出現Hint喔！

想不到這麼簡單就可以達成，是我想太多了，
感謝大家的幫忙。