如何定义指针 DELPHI中如何定义指针!如我想定义一个整型类型的指针,并且该指针指向一个字符串!请问怎么写代码? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 楼主要的是这个吧var s:^string;begin new( s ); s^:='aaaaaa'; dispose( s ); 不知道lz什么意思。是整数类型的指针,还是指针是整数?varp:pchar;beginp:='hello';showmessage(format('指针:%d, 内容:%s',[integer(p),p]));end;=================varp:pinteger;beginp:=pInteger(PChar('hello'));showmessage(format('指针:%d, 内容:%s',[integer(p),pChar(p)]));end;=================== pointer是通用的,指针类型也分,整型指针,字符型指针这些delphi都进行了封装 PBOOL = ^BOOL; {$EXTERNALSYM PBOOL} PByte = Types.PByte; PINT = ^Integer; {$EXTERNALSYM PINT} PSingle = ^Single; PWORD = ^Word; {$EXTERNALSYM PWORD} PDWORD = ^DWORD; {$EXTERNALSYM PDWORD} LPDWORD = PDWORD;你查查就知道了 应该说指针是通用数据吧!它可以指向:数组/方法/过程/类型数据/字符包括PCHAR.......而自己却只是一个INTEGER或DWORD而已! 多维数组问题 数据库里没有数据,为什么查找说有一条记录(Access数据库) 年关已近,小心骗子 Delphi 代码跟踪的问题 使用 TCustomControl的Paint 的问题 如何远程开机 delphi中有没有和vb中doevents功能一样的函数? ●●辞职、放分及其他●● 动态数组问题 找人修改传奇2 DBserver实现多线路智能分配 多线程中的事件,急 请问这样安全吗?
var
s:^string;
begin
new( s );
s^:='aaaaaa';
dispose( s );
p:pchar;
begin
p:='hello';
showmessage(format('指针:%d, 内容:%s',[integer(p),p]));
end;
=================
var
p:pinteger;
begin
p:=pInteger(PChar('hello'));
showmessage(format('指针:%d, 内容:%s',[integer(p),pChar(p)]));
end;
===================
{$EXTERNALSYM PBOOL}
PByte = Types.PByte;
PINT = ^Integer;
{$EXTERNALSYM PINT}
PSingle = ^Single;
PWORD = ^Word;
{$EXTERNALSYM PWORD}
PDWORD = ^DWORD;
{$EXTERNALSYM PDWORD}
LPDWORD = PDWORD;
你查查就知道了
它可以指向:数组/方法/过程/类型数据/字符包括PCHAR.......而自己却只是一个INTEGER或DWORD而已!