Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Transporent, растворение в воздухе 
:(
    Опции темы
welt
Дата 10.11.2005, 22:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 89
Регистрация: 21.5.2005
Где: UnderGround

Репутация: нет
Всего: нет



Выше p0s0l писал, что для того, чтобы окно исчезало при закрытии надо дописать:
Код

WM_CLOSE   : AnimateWindow(Wnd, 200, AW_HIDE or AW_BLEND);

в функцию MainWinProc
А также после строчки
Wnd:= CreateWindowEx...............
написать еще раз
Код

AnimateWindow(Wnd, 200, AW_ACTIVATE or AW_BLEND);    


А как сделать это но для появления окна. Т.е чтобы оно не расворялось при закрытии, а появлялось при создании?
Пробовал дописывать WM_CREATE: .... и WM_SHOW: ....
не получается.
PM MAIL   Вверх
rsm
Дата 11.11.2005, 08:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник Клуба
Сообщений: 999
Регистрация: 16.3.2005

Репутация: 1
Всего: 62



Добавь пару строк в код p0s0l:
Код

Wnd:= CreateWindowEx(0, 'WindowClass',     
'Окно', WS_OVERLAPPEDWINDOW, 100, 100, 500, 400, 0, 0, HInstance, nil);    
UpdateWindow(Wnd);
AnimateWindow(Wnd, 200, AW_ACTIVATE or AW_BLEND);     
ShowWindow(Wnd, SW_SHOW);
while GetMessage(Msg, 0, 0, 0) do     
begin     
  TranslateMessage(Msg);     
  DispatchMessage(Msg);     
end; 

PM MAIL   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • 99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема »


 




[ Время генерации скрипта: 0.0395 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.