Source position: fpcgtiopf.pp line 76
procedure TTiOPFCodeGenerator.DeclareObjectvariable(
Strings: TStrings;
const ObjectClassName: string
);