Guest User

Untitled

a guest
Jan 5th, 2013
134
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Delphi 1.67 KB | None | 0 0
  1.   ICoreWindow = interface
  2.     ['{A46F6070-DA28-48F0-8CAC-B4DA6C7C7EE5}']
  3.  
  4.     procedure GetRootTimer (out Timer: IUpdateTimer); stdcall;
  5.  
  6.     procedure Paint; stdcall;
  7.     procedure Update; stdcall;
  8.     procedure OnMouseActivity (Event, X,Y: Integer; ShiftState: Cardinal); stdcall;
  9.     procedure OnCaptureGained; stdcall;
  10.     procedure OnCaptureLost; stdcall;
  11.     procedure OnMouseLeave; stdcall;
  12.     procedure OnMouseWheel (X,Y: Integer; ShiftState: Cardinal; dX,dY: Integer); stdcall;
  13.     procedure OnKey (Event, OldState, NewState: Integer; Key: Cardinal); stdcall;
  14.     procedure OnChar (Char: WideChar); stdcall;
  15.  
  16.     function GetDirect3D: IDirect3D9; stdcall;
  17.     function GetDirect3DDevice: IDirect3DDevice9; stdcall;
  18.     function GetRootVisibleEntity: IVisibleEntityGroup; stdcall;
  19.     function GetKeyMapper: IKeyMapper; stdcall;
  20.     function GetRootControl: IControlGroup; stdcall;
  21.     function GetFileSystem: IFileSystem; stdcall;
  22.     function GetSize: TPoint; stdcall;
  23.     function GetMousePos: TFloatPoint; stdcall;
  24.     function GetShiftState: Integer; stdcall;
  25.     function GetFPS: Integer; stdcall;
  26.  
  27.     property Direct3D: IDirect3D9 read GetDirect3D;
  28.     property Direct3DDevice: IDirect3DDevice9 read GetDirect3DDevice;
  29.     property RootVisibleEntity: IVisibleEntityGroup read GetRootVisibleEntity;
  30.     property KeyMapper: IKeyMapper read GetKeyMapper;
  31.     property RootControl: IControlGroup read GetRootControl;
  32.     property FileSystem: IFileSystem read GetFileSystem;
  33.     property Size: TPoint read GetSize;
  34.     property MousePos: TFloatPoint read GetMousePos;
  35.     property ShiftState: Integer read GetShiftState;
  36.     property FPS: Integer read GetFPS;
  37.   end;
Advertisement
Add Comment
Please, Sign In to add comment