Советы по Delphi
Иконка свернутого окна
Когда вы сворачиваете основную форму, иконка, которую вы наблюдаете, *НЕ ПРИНАДЛЕЖИТ* основной форме. Все попытки рисования на иконке потерпят неудачу, поскольку она принадлежит объекту application, а не форме.
File Manager при ситуации перетаскивания файлов (drag/drop) классно работает когда форма не свернута, но и он терпит неудачу, когда форма свернута, поскольку иконка НЕ является окном и не может зарегистрировать себя для сообщений drag/drop. Это проблема - как свернуть форму, т.к. щелкая по соответствующей системой кнопке, WindowState не принимает значения wsMinimized!
Обходной путь:
|
procedure TForm1.SysMen(var msg:TMessage); begin if msg.wParam = SC_MINIMIZE then begin {сворачиваем форму} WindowState := wsMinimized; else Inherited; end; |
[000341]
