LCL: Fixed OnClick event not triggered for a TSpeedButton on a fresh created form when inside a TGroupBox. Issue #26638

git-svn-id: trunk@57947 -

lcl/include/customform.inc

@@ -677,6 +677,7 @@ end;
  ------------------------------------------------------------------------------}
 procedure TCustomForm.Activate;
 begin
+  SetCaptureControl(nil);
   if Assigned(FOnActivate) then FOnActivate(Self);
 end;