Hi!
MouseInClient is inheritated from Tcontrol!
To make it more clear use this:
var Global_I : Integer = 1;
...
procedure TmainForm.BitBtn1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
if BitBtn1.MouseInClient then //here can be triggered
begin
inc(Global_I);
BitBtn1.Caption := 'MouseInClient '+IntToStr(Global_I);
end;
Winni