在程式執行中怎麼得知滑鼠所在位置之下是什麼元件呢？ 我參考之前的討論問題都只能得到TWinControl類別之下的﹐例如以下的做法： function GetName:TWinConrl; var pt:TPoint; begin GetCursorPos(pt); Result:=FindControl(WindowFromPoint(pt)); end; 但是如 Label 元件是由 TGraphicControl 類別而來的就無法得到。 但是在Delphi本身的IDE環境中﹐當滑鼠移到任何一元件上時即可得知元件的Name及ClassName﹐這是怎麼做的呢？

在 TControl.OnMouseMove Event 中判斷呢？

請問在OnMouseMove中要怎麼判斷呢？ 我原本想使用FindCompoment﹐但FindCompoment必須先知道元件的Name﹐但如果也不知道Name呢？

在 OnMouseMove Event 中, 有個 Sender 參數就是 要得到該元件的 Name 的話, 就用 TControl(Sender).Name;