无
无人喝彩
Unregistered / Unconfirmed
GUEST, unregistred user!
type
Taaa = class(TPersistent)
private
FA: Integer;
FB: Integer;
public
end;
type
Tbbb = class(TPersistent)
private
public
s: array[0..1] of Taaa;
end;
...............
procedure TForm1.Button1Click(Sender: TObject);
var
b:Tbbb;
i:integer;
s1: array[0..1] of Taaa;
begin
b:=Tbbb.Create;
for i:=0 to 1 do
begin
s1 := Taaa.Create;
end;
for i:=0 to 1 do
begin
//s1.Assign?
end;
end;
求助,
1.怎么把b里面的s赋值给s1?
2.b.Create和b:=Tbbb.Create两者有什么区别?
弄清楚马上送分.感谢谢谢.
Taaa = class(TPersistent)
private
FA: Integer;
FB: Integer;
public
end;
type
Tbbb = class(TPersistent)
private
public
s: array[0..1] of Taaa;
end;
...............
procedure TForm1.Button1Click(Sender: TObject);
var
b:Tbbb;
i:integer;
s1: array[0..1] of Taaa;
begin
b:=Tbbb.Create;
for i:=0 to 1 do
begin
s1 := Taaa.Create;
end;
for i:=0 to 1 do
begin
//s1.Assign?
end;
end;
求助,
1.怎么把b里面的s赋值给s1?
2.b.Create和b:=Tbbb.Create两者有什么区别?
弄清楚马上送分.感谢谢谢.