没有直接的方法,你可以参考assign之类的利用stringgrid的row是Tstring类型来实现
比如:
procedure AssignStringGrid(SSG,DSG:TStringGrid);
var
mm:tmemorystream;
i:integer;
begin
mm:=tmemorystream.Create;
try
dsg.RowCount:=ssg.RowCount;
dsg.ColCount:=ssg.ColCount;
for i:=0 to ssg.RowCount-1 do
begin
mm.Size:=0;
ssg.Rows.SaveToStream(mm);
mm.Position:=0;
dsg.Rows.LoadFromStream(mm);
end;
finally
mm.Free;
end;
end;