Советы по Delphi

       

Иконка свернутого окна


Когда вы сворачиваете основную форму, иконка, которую вы наблюдаете, *НЕ ПРИНАДЛЕЖИТ* основной форме. Все попытки рисования на иконке потерпят неудачу, поскольку она принадлежит объекту application, а не форме.

File Manager при ситуации перетаскивания файлов (drag/drop) классно работает когда форма не свернута, но и он терпит неудачу, когда форма свернута, поскольку иконка НЕ является окном и не может зарегистрировать себя для сообщений drag/drop. Это проблема - как свернуть форму, т.к. щелкая по соответствующей системой кнопке, WindowState не принимает значения wsMinimized!

Обходной путь:

procedure TForm1.SysMen(var msg:TMessage);
beginif msg.wParam = SC_MINIMIZE then begin{сворачиваем форму}WindowState := wsMinimized;elseInherited;end;

[000341]



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