Source position: compwriterpas.pas line 211
procedure CallDefinePropertiesPas(
Writer: TCompWriterPas;
Instance: TPersistent;
const Identifier: string;
var Handled: Boolean
);