Delphi中模態視窗切換時隱藏問題的解決辦法
問題 現象:
彈出模態窗體,切換到Window其他視窗,再回到程式介面,發現介面無法點選,模態視窗被遮蓋在後邊了
解決辦法:
TForm1 = class(TForm)
protectedprocedure CreateParams(var Params: TCreateParams); override;
end;
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.WndParent := 目標視窗.handle;
end;