Эффекты

Тема в разделе "WASM.WIN32", создана пользователем dgs, 26 мар 2009.

  1. dgs

    dgs New Member

    Публикаций:
    0
    Регистрация:
    23 июн 2008
    Сообщения:
    434
    Здрасте. Вот вопрос, как реализовать эфект исчезания контрола ну т.е. красивого сворачивания\сплющевания\улетания и т.п. укажите куда копать, желательно на чистом WINAPI. Заранее благодарю...
     
  2. MSoft

    MSoft New Member

    Публикаций:
    0
    Регистрация:
    16 дек 2006
    Сообщения:
    2.854
    вот как я писал такое на делфи:
    Код (Text):
    1. var R,I:Integer;
    2. begin
    3.    I:=0;
    4.    repeat
    5.       begin
    6.       Inc(I);
    7.       R:=CreateRectRgn(0,I,Width,Height-I);
    8.       SetWindowRgn(Handle,R,True);
    9.       sleep(2);
    10.       end;
    11.    until I=(Height div 2);
    12.    I:=0;
    13.    repeat
    14.       begin
    15.       Inc(I);
    16.       R:=CreateRectRgn(I,(Height div 2),Width-I,(Height div 2)+1);
    17.       SetWindowRgn(Handle,R,True);
    18.       sleep(1);
    19.       end;
    20.    until I=(Width div 2);
    21. sleep(400);
    22. end;
     
  3. Mikl___

    Mikl___ Супермодератор Команда форума

    Публикаций:
    14
    Регистрация:
    25 июн 2008
    Сообщения:
    3.708
    dgs
    [offtop]ффекты" with double "эф" [​IMG][/offtop]
     
  4. dgs

    dgs New Member

    Публикаций:
    0
    Регистрация:
    23 июн 2008
    Сообщения:
    434
    Я бы в принципе и на AnimateWindow остановился, но когда контрол пред смертно сворачивается, почему то прекращается собственная зарисовка фона, по событию WM_PAINT...