Question

delphi MDI 使某个窗体 成为活动窗体

好像可以使用setforegroundwindow 函数，不过...我在SDI 测试。可以。但在MDI，为什么不可以？代码如下：var
new2:Tygda; procedure TMainForm.mniN11Click(Sender: TObject);
begin
if Application.FindComponent('ygda')=nil then
begin
new2:=Tygda.Create(application);
new2.Show;
end
else
SetForegroundWindow(new2.Handle);end;会的大虾们，教教我，谢谢...

Answer 1

if not assigned(yhgl) then
application.CreateForm(tyhgl,yhgl);
yhgl.WindowState:=wsNormal;
yhgl.Show;