 , очень надо
 , очень надоМодератор: Модераторы
 , очень надо
 , очень надо

Иван Шихалев писал(а):Собственно, к вариантной части можно и так и так обращаться. Если не определено поле тега, а только тип — значит это и неважно — какое представление требуется, то и используем.


       PSDL_Event = ^SDL_Event;
       SDL_Event = record
           case longint of
              0 : ( eventtype : Uint8 );
              1 : ( active : SDL_ActiveEvent );
              2 : ( key : SDL_KeyboardEvent );
              3 : ( motion : SDL_MouseMotionEvent );
              4 : ( button : SDL_MouseButtonEvent );
              5 : ( jaxis : SDL_JoyAxisEvent );
              6 : ( jball : SDL_JoyBallEvent );
              7 : ( jhat : SDL_JoyHatEvent );
              8 : ( jbutton : SDL_JoyButtonEvent );
              9 : ( resize : SDL_ResizeEvent );
              10: ( expose : SDL_ExposeEvent );
              11: ( quit : SDL_QuitEvent );
              12: ( user : SDL_UserEvent );
              13: ( syswm : SDL_SysWMEvent );
           end;

 , большое спасибо!!!!!!!!!!!!!
 , большое спасибо!!!!!!!!!!!!! , большое спасибо!!!!!!!!!!!!!
 , большое спасибо!!!!!!!!!!!!!
Вернуться в Обучение Free Pascal
Сейчас этот форум просматривают: Google [Bot] и гости: 1