vc 6.0 的代码
LPDIRECTDRAW7 lpdd = NULL;
DWORD returnNum;
DWORD tmpDword;
tmpDword=lpdd->CreateSurface(&ddsd, &lpGameSurface , NULL);
if(tmpDword!=0) returnNum=0;
else returnNum=(DWORD)lpGameSurface;
我写出来的Delphi 7
lpdd:IDirectDraw7
tmpDword,returnNum:DWORD;
tmpDword:=lpdd.CreateSurface(ddsd,lpGameSurface,nil);
if tmpDword<>0 then returnNum:=0
else returnNum:=dword(lpGameSurface);
到底哪里不对了，怎么运行都出错，如果按VC的汇编代码，直接用BASM写出来就没事儿。

IDirectDraw7需要DirectDrawCreateEX创建；
ddsd的内容需要填充；
不过DX9都面临着淘汰，还再用DDRAW7？