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