var
myproc:Tproc;
begin
myproc:=getprocaddress(h,'ismin'); 和 @myproc:=getprocaddress(h,'ismin');
这两句为什么都能运行成功。第一个myproc是一个实例,第二个@myproc是这个实例的指针地址,而getprocaddress例程是获得方法的指针地址。因该是第二句是对了,但为什么第一句也能运行成功
if assigned(myproc) then
myproc:Tproc;
begin
myproc:=getprocaddress(h,'ismin'); 和 @myproc:=getprocaddress(h,'ismin');
这两句为什么都能运行成功。第一个myproc是一个实例,第二个@myproc是这个实例的指针地址,而getprocaddress例程是获得方法的指针地址。因该是第二句是对了,但为什么第一句也能运行成功
if assigned(myproc) then
GetProcAddress返回的就是一个指针
他赋值给myproc:Tproc;在语法上是行得通的!