有段代码请给看看?谢谢!
代码如下
..............
..............
type
TSrecord=^Fpdata;
Fpdata=record
first:string;
secord:string;
third:string;
end;
var
Form1: TForm1;
my_data:TSrecord;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
my_list:Tlist;
begin
my_list:=Tlist.Create ;
New(my_data);
my_data.first:='011';
my_data.secord:='022';
my_data.third:='033';
my_list.Add(my_data);
StringGrid1.Objects[3,4]:=my_list[0];
Dispose(my_data);
end;
问题1:StringGrid1.Objects[3,4]是什么意思,有什么作用.
2.下面这句是什么意思有什么作用;
StringGrid1.Objects[3,4]:=my_list[0];
请帮解释一下.
[解决办法]
1、StringGrid1.Objects[3,4] 第三列第4行内的对象
2、StringGrid1.Objects[3,4]:=my_list[0]; 第三列第4行内的对象等于my_list[0]
[解决办法]
这段代码后续应该会有问题吧？my_data指针都被释放掉了，之后访问my_list[0]或StringGrid1.Objects[3,4]会是一个非法的指针，读出的数据可能会有问题。
[解决办法]
StringGrid1.cells[3,4]是cell里的内容，StringGrid1.Objects[3,4]是cell对应的对象，
这个类似TStrings的Strings[I]和Strings.object[I]
