Source position: bcrtti.pas line 54
procedure SaveStyle(
AControl: TObject;
const AAuthor: string;
const ADescription: string;
ATargetList: TStrings
);