سلامنقل قول:
منظورتون اينه كه جوابهايي كه به سوالات شما داده شد خيلي به دردتون خورد؟
از اين كد ميتونيد براي به دست آوردن كنترل زير اشاره گر ماوس استفاده كنيد :
توجه كنيد اين كد فقط براي كنترل هاي window دار (مثل پنل، دكمه و ...) كاربرد دارد، و روي TImage عمل نميكنيد، ولي ميتوانيد كنترل Image را داخل يك Panel قرار دهيد و ...
مثال :کد:function FindControlAtPos: TWinControl;
var
Pt: TPoint;
begin
GetCursorPos(Pt);
Result := FindControl(WindowFromPoint(Pt));
end;
کد:label1.Caption := FindControlAtPos.Name;
