Отображение модальной формы в DLL

Все знают, как показать модальную форму в DLL файле? Всегда модальная форма появляется на панели задач и остается сверху даже тогда, когда Вы переключаетесь на другие окна.

procedure ShowDLLForm( appHandle: HWND ); stdcall; 
begin
  if appHandle = 0 then
    apphandle := GetActiveWindow; 
  application.handle := appHandle; 
  try
    with TDLLForm.Create( Application ) do
    try
      ShowModal 
    finally
      free; 
    end
  except
    on E: Exception do
      application.HandleException( E ); 
  end; 
  application.handle := 0; 
end;

—

02.09.2016

coder

Отображение модальной формы в DLL

Комментарии