Z
zhengdehei
Unregistered / Unconfirmed
GUEST, unregistred user!
1.一个需要访问access的程序,在个别装有office2007的机器上,不能正常连接,使用系统自带的Jet.OLEDB驱动,请问有什么办法解决?
2.关于指针,例如
var
pint: pinteger;
pc: pchar;
i: integer;
s: string;
begin
pint:= pointer($02345678);
i:= pint^;
pc:= pointer($0233333);
s:= pc;
end;
这样用会有什么后果?是否必须要先 new(pint) ?
一直用着都很正常,但总觉得内存占用比较高,是否和这个有关?正确的写法是?
3.
type
TPack = packed record
Param1 : Dword;
Param2 : pDword;
end;
{ 全局变量 }
var
Pack: TPack;
.............
Pack.Param2^:= pointer($0341313);
这样写是否也有错?会造成什么后果?
对指针的正确用法比较迷糊,望高手指点。
2.关于指针,例如
var
pint: pinteger;
pc: pchar;
i: integer;
s: string;
begin
pint:= pointer($02345678);
i:= pint^;
pc:= pointer($0233333);
s:= pc;
end;
这样用会有什么后果?是否必须要先 new(pint) ?
一直用着都很正常,但总觉得内存占用比较高,是否和这个有关?正确的写法是?
3.
type
TPack = packed record
Param1 : Dword;
Param2 : pDword;
end;
{ 全局变量 }
var
Pack: TPack;
.............
Pack.Param2^:= pointer($0341313);
这样写是否也有错?会造成什么后果?
对指针的正确用法比较迷糊,望高手指点。