請問前輩們: 
在form中有各式各樣的物件,如何隨意 click 時點到某物件 (如:lable) ,希望取得該物件的name,CLASS 或其它屬性?? 3Q!!

這...有點難度, 之前有前輩有發過一篇如何runtime 點選元件, 不妨參考看看
http://delphi.ktop.com.tw/board.php?cid=31&fid=79&tid=31513

謝謝回答!! 我再找找試試!!

一定要點擊嗎?
以下是直接偵測滑鼠底下的 座標 handle
拉一個Timer 事件裡面寫
procedure TForm1.Timer1Timer(Sender: TObject);
function MYGetClassName(Handle: THandle): String;
var
Buffer: array[0..MAX_PATH] of Char;
begin
GetClassName(Handle, Buffer, MAX_PATH);
Result := String(Buffer);
end;
var p:tpoint;
c:array[0..254]of char;
s:array[0..254] of char;
begin
getcursorpos(p);
//抓HWND
caption:=inttostr(windowfrompoint(P));
//抓class name 按鈕會顯示TButton 視窗會顯示TForm
getclassname(strtoint(caption),c,255);
//抓標題 按鈕會顯示按紐文字 視窗會顯示標題
SendMessage(windowfrompoint(P), WM_GetText, 255, integer(@s[0]));
edit2.Text:=s;
edit1.Text:=c;
Edit3.Text:=MYGetClassName(strtoint(caption));
end;

DevExpress中有一个cxRTTIInspector