History

16:12 98/05/05

I added Dinput.pas. Thanks, SANDMAN.

18:53 98/04/22

I add dplay.pas.


19:55 98/04/04

In dsound.pas

function SxDMaxDistance(Para0: D3DVALUE; Para1: DWORD): HRESULT; virtual; stdcall; abstract;
->
function SetMaxDistance(Para0: D3DVALUE; Para1: DWORD): HRESULT; virtual; stdcall; abstract;


19:07 98/03/19

In record of DDCAPS
...
dwReserved4	: DWORD{130};	// reserved
dwReserved5	: DWORD{134};	// reserved
dwReserved6	: DWORD{138};	// reserved
->deleted

Member of IDirectDraw and IDirectDraw2
function GetCaps(const Para0: DDCAPS;const Para1: DDCAPS): HRESULT; virtual ; stdcall ; abstract ;
->
function GetCaps(var Para0: DDCAPS;var Para1: DDCAPS): HRESULT; virtual ; stdcall ; abstract ;


20:44 98/03/04
function CreateDeviceFromSurface(PGUID: PGUID; lpDD: IDIRECTDRAW; lpDDSBack: LPDIRECTDRAWSURFACE;
	 Para0: IDIRECT3DRMDEVICE): HRESULT; virtual; stdcall; abstract;
->
function CreateDeviceFromSurface(PGUID: PGUID; lpDD: IDIRECTDRAW; lpDDSBack: LPDIRECTDRAWSURFACE;
	 var Para0: IDIRECT3DRMDEVICE): HRESULT; virtual; stdcall; abstract;

23:58 1998/02/14
function DrawIndexedPrimitive(Para0: D3DPRIMITIVETYPE; Para1: D3DVERTEXTYPE;
	 Para2: pointer; Para3: DWORD;var Para4: Word; Para5: DWORD; Para6: DWORD): HRESULT;  virtual ; stdcall ; abstract ;
->
function DrawIndexedPrimitive(Para0: D3DPRIMITIVETYPE; Para1: D3DVERTEXTYPE;
	 Para2: pointer; Para3: DWORD; Para4: pointer; Para5: DWORD; Para6: DWORD): HRESULT;  virtual ; stdcall ; abstract ;

1/14/1998
function CreateDevice(var Para0: TGUID; Para1: IDIRECTDRAWSURFACE; var Para2: IDIRECT3DDEVICE2): HRESULT;  virtual ; stdcall ; abstract ;
->
function CreateDevice(const Para0: TGUID; Para1: IDIRECTDRAWSURFACE; var Para2: IDIRECT3DDEVICE2): HRESULT;  virtual ; stdcall ; abstract ;

12/10/1997
・Corected Mistakes
　IDirectDrawSurface.GetPalette(para0 : IDirectDrawPalette): HRESULT;
    ->
　IDirectDrawSurface.GetPalette(var para0 : IDirectDrawPalette): HRESULT;

　d3drmdefDLL = 'd3drmdef.dll';
    ->
　d3drmDLL = 'd3drm.dll';


履歴

18:53 98/04/22

dplay.pasを加えました


19:55 98/04/04

dsound.pasで

function SxDMaxDistance(Para0: D3DVALUE; Para1: DWORD): HRESULT; virtual; stdcall; abstract;
->
function SetMaxDistance(Para0: D3DVALUE; Para1: DWORD): HRESULT; virtual; stdcall; abstract;


19:07 98/03/19

DDCAPSのなかの
...
dwReserved4	: DWORD{130};	// reserved
dwReserved5	: DWORD{134};	// reserved
dwReserved6	: DWORD{138};	// reserved
これらをコメントアウトしました。

IDirectDraw and IDirectDraw2のメンバを
function GetCaps(const Para0: DDCAPS;const Para1: DDCAPS): HRESULT; virtual ; stdcall ; abstract ;
->
function GetCaps(var Para0: DDCAPS;var Para1: DDCAPS): HRESULT; virtual ; stdcall ; abstract ;
に変更しました。

20:44 98/03/04
function CreateDeviceFromSurface(PGUID: PGUID; lpDD: IDIRECTDRAW; lpDDSBack: LPDIRECTDRAWSURFACE;
	 Para0: IDIRECT3DRMDEVICE): HRESULT; virtual; stdcall; abstract;
->
function CreateDeviceFromSurface(PGUID: PGUID; lpDD: IDIRECTDRAW; lpDDSBack: LPDIRECTDRAWSURFACE;
	 var Para0: IDIRECT3DRMDEVICE): HRESULT; virtual; stdcall; abstract;

23:58 1998/02/14
function DrawIndexedPrimitive(Para0: D3DPRIMITIVETYPE; Para1: D3DVERTEXTYPE;
	 Para2: pointer; Para3: DWORD;var Para4: Word; Para5: DWORD; Para6: DWORD): HRESULT;  virtual ; stdcall ; abstract ;
　　　↓
function DrawIndexedPrimitive(Para0: D3DPRIMITIVETYPE; Para1: D3DVERTEXTYPE;
	 Para2: pointer; Para3: DWORD; Para4: pointer; Para5: DWORD; Para6: DWORD): HRESULT;  virtual ; stdcall ; abstract ;


1998/1/14
function CreateDevice(var Para0: TGUID; Para1: IDIRECTDRAWSURFACE; var Para2: IDIRECT3DDEVICE2): HRESULT;  virtual ; stdcall ; abstract ;
　　　↓
function CreateDevice(const Para0: TGUID; Para1: IDIRECTDRAWSURFACE; var Para2: IDIRECT3DDEVICE2): HRESULT;  virtual ; stdcall ; abstract ;

1997/12/10
・間違いがあったので修正
　IDirectDrawSurface.GetPalette(para0 : IDirectDrawPalette): HRESULT;
　　　↓
　IDirectDrawSurface.GetPalette(var para0 : IDirectDrawPalette): HRESULT;

　d3drmdefDLL = 'd3drmdef.dll';
　　　↓
　d3drmDLL = 'd3drm.dll';