Советы по Delphi
         

Сохранение приложения в виде иконки


Как мне после запуска сохранять все время приложение в виде иконки?

  1. В свойствах формы вы должны установить WindowState на wsMinimized.
  2. В секции класса формы private поместите следующее объявление:

    ... { private declarations } PROCEDURE WMQueryOpen(VAR Msg : TWMQueryOpen); message WM_QUERYOPEN;

  • В секции implementation поместите следующую реализацию метода:
        PROCEDURE TForm1.WMQueryOpen(VAR Msg : TWMQueryOpen);
    begin Msg.Result := 0;

    end;

    • Это все! Форма всегда будет иконкой. [000625]



    Содержание раздела