Source position: fpcgtiopf.pp line 119
protected procedure TTiOPFCodeGenerator.WriteVisibilityStart(
V: TVisibility;
Strings: TStrings
); override;