Source position: gtkvscale.inc line 15
type TGtkVScaleClass = record
parent_class: TGtkScaleClass;
end;