Карта сайтаСсылкиКонтакты

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

PDF Печать
Статьи

Все знают, как показать модальную форму в 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;

По материалам http://delphi3000.com


 

Добавить комментарий


Защитный код
Обновить