2 2000zy Unregistered / Unconfirmed GUEST, unregistred user! 2001-03-31 #1 h:=loadlibrary('ddraw.dll');<br> edit1.Text :=inttostr(h);<br> 执行到第一句就卡住了，为何？
h:=loadlibrary('ddraw.dll');<br> edit1.Text :=inttostr(h);<br> 执行到第一句就卡住了，为何？
W wjiachun Unregistered / Unconfirmed GUEST, unregistred user! 2001-03-31 #2 If the function succeeds, it returns a handle to the loaded module. <br>If the function fails, it returns NIL.<br><br>不知道你inttostr(h)的目的是什么？<br>
If the function succeeds, it returns a handle to the loaded module. <br>If the function fails, it returns NIL.<br><br>不知道你inttostr(h)的目的是什么？<br>
X xiaoywh Unregistered / Unconfirmed GUEST, unregistred user! 2001-03-31 #3 var h:longint; 或 thandle<br>begin <br> h:=loadlibrary('ddraw.dll');<br> edit1.Text :=inttostr(h);<br>end; <br>我试过的，这句话不可能错，除非你的DLL有问题,你可以换个DLL试试
var h:longint; 或 thandle<br>begin <br> h:=loadlibrary('ddraw.dll');<br> edit1.Text :=inttostr(h);<br>end; <br>我试过的，这句话不可能错，除非你的DLL有问题,你可以换个DLL试试
Z zhangkan Unregistered / Unconfirmed GUEST, unregistred user! 2001-03-31 #4 你用if h>=32 then<br>begin<br> ...<br>end;试试看，从书上抄的。
