Работает в 2k/XP:
|
Code: |
|
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); {©Drkb v.3(2007): www.drkb.ru} begin AnimateWindow(Handle, 500, AW_HIDE or AW_BLEND); end; |
Автор: p0s0l
Создание, закрытие и вызов форм
Как сделать плавное закрытие окна ?
- Подробности
- Родительская категория: TForm
- Категория: Создание, закрытие и вызов форм
Просьба писать ваши замечания, наблюдения и все остальное,
что поможет улучшить предоставляемую информацию на этом сайте.
ВСЕ КОММЕНТАРИИ МОДЕРИРУЮТСЯ ВРУЧНУЮ, ТАК ЧТО СПАМИТЬ БЕСПОЛЕЗНО!