Source position: compwriterpas.pas line 201
procedure WriteComponentToPasStream(
AComponent: TComponent;
AStream: TStream
);