Советы по 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]



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