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