解决了。 protected procedure WndProc(var Message: TMessage); override;------------------------------------------------------------procedure TForm1.WndProc(var Message: TMessage);begin inherited; case Message.Msg of WM_SETCURSOR: if (not IsWindowEnabled(Handle)) and (Message.LParamHi=WM_LBUTTONDOWN) then begin try if Form2<>nil then Form2.BringToFront; except end; try if Form3<>nil then Form3.BringToFront; except end; ...... end; end;end;