用文件流有个WriteComponent方法的,下面的代码看看。 var fs:TFileStream; i: Integer; begin if SaveDialog1.Execute then begin fs:=TFileStream.Create(SaveDialog1.FileName,fmOpenWrite or fmCreate); try for i:=0 to ControlCount-1 do if Controls[i].ClassName<>'TToolBar' then fs.WriteComponent(Controls[i]); finally fs.Free; end; end;
----------------------------------------------
All about android www.kidroid.com