1467
社区成员
26.2w+
社区内容
- 主页
- 招聘
- 语言基础/算法/系统设计
- 数据库相关
- 图形处理/多媒体
- 网络通信/分布式开发
- VCL组件开发及应用
- Windows SDK/API
这样为什么会出错？
type
Tx = record
GameName : string ;
lid : integer ;
end;
Px = ^Tx;
然后在使用的时候
procedure TmyForm.Get2Click(Sender: TObject);
var
sx: Px;
begin
sx.GameName := 'xxxxx';
sx.lid := 880;
showmessage(sx.GameName);
end;
出现错误，请问如何解决？
Tx = record
GameName : string ;
lid : integer ;
end;
Px = ^Tx;
然后在使用的时候
procedure TmyForm.Get2Click(Sender: TObject);
var
sx: Px;
begin
sx.GameName := 'xxxxx';
sx.lid := 880;
showmessage(sx.GameName);
end;
出现错误，请问如何解决？
...全文
今晚打老虎2010 2005年03月23日
非常感谢
liujidong 2005年03月23日
同意，你需要先申明 tx的变量，然后把地址给sx
chinaandys 2005年03月23日
sx是一个指针，先要对其分配空间.
begin
new(sx);
sx^.GameName := 'xxxxx';
sx^.lid := 880;
showmessage(sx.GameName);
dispose(sx);
end;
begin
new(sx);
sx^.GameName := 'xxxxx';
sx^.lid := 880;
showmessage(sx.GameName);
dispose(sx);
end;
fireflyxx 2005年03月23日
sx 是指针 还没空间呢