Q
quickp
Unregistered / Unconfirmed
GUEST, unregistred user!
var delphiaspobj=Server.CreateObject("my.aspobj");
var inout;
inout=false;
delphiaspobj.check(inout);//改变inout为true;
if (inout)
{Response.write('yes');}
//inout值老改不了
procedure Taspobj.check(var permited: OleVariant);
begin
permited:=true;
end;
var inout;
inout=false;
delphiaspobj.check(inout);//改变inout为true;
if (inout)
{Response.write('yes');}
//inout值老改不了
procedure Taspobj.check(var permited: OleVariant);
begin
permited:=true;
end;