各位先进，我最近在用SetCaptureControl时发现在VCL中的定义 [CODE] procedure SetCaptureControl(Control: TControl); begin ReleaseCapture; CaptureControl := nil; if Control <> nil then begin if not (Control is TWinControl) then begin if Control.Parent = nil then Exit; CaptureControl := Control; Control := Control.Parent; end; SetCapture(TWinControl(Control).Handle);//请留意这 end; end; 我用SetCapture(TWinControl(Image1).Handle)不会出错，TIMAGE不属于TWinControl,为什么可以这样用，此时的Handle代表什么？谢谢 發表人 - xiaoning79627 於 2003/07/15 14:41:05

The way you type cast will not check for type compatibility, and you can even do this: TWinControl(pointer(1)).Handle. The handle returned of course is invalid (or access violation in some cases). If you want type checking, you can use as: (AObject as TWinControl).Handle. The simple answer to your original question is: The handle returned is invalid.

TWinControl(Image1).Handle 這行是錯的,     Image1 並不是 TWinControl, 這樣等於是強迫轉型,  Delphi 並不會幫你檢查錯誤.... 就如同 TStrings(Image1).Text 一樣 Complier 會過... 一般物件間轉換比較好的寫法是用 as 或 is, 請查 Help  因此, 這個時後的

谢谢两位的回复，让小弟又明白了一些