Topic: Controllist of MDI child form not set after Form.Show

V6.2

When I call this procedure after Form.Show it doesn't find all controls. Also the control names (set by script) are not present.
After reopen the form all is fine. And yes, the procedure is called after Form.Show ;-)
I know there is some work to do on MDI Forms...

By the way:
The OnMouseMove event of TdbStringGrid can't be set by code.

procedure forms_SetOnMouseMoveOnAllControls(wctrl: TWinControl);

var
  i: Integer;

begin
  for i := 0 to wctrl.ControlCount - 1 do
  begin
    if (wctrl.Controls[i] is TWinControl) and not (wctrl.Controls[i] is TdbStringGridEx) then
    begin
      try
        wctrl.Controls[i].OnMouseMove := @forms_OnMouseMove;
      except
      end;

      if TWinControl(wctrl.Controls[i]).ControlCount > 0 then
        forms_SetOnMouseMoveOnAllControls(TWinControl(wctrl.Controls[i]));
     
    end
  end;
end;