Registriert seit: 9. Mai 2005
Ort: Bocholt
573 Beiträge
Delphi XE2 Professional
|
AW: alles auf einmal speichern?
9. Nov 2011, 07:22
JvDesignUtils einbinden und über
Delphi-Quellcode:
procedure DesignSaveComponentToFile(AComp: TComponent; const AFileName: string);
var
FS: TFileStream;
begin
FS := TFileStream.Create(AFileName, fmCreate);
try
DesignSaveComponentToStream(AComp, FS);
finally
FS.Free;
end;
end;
speichern
|