Source position: gtkhscale.inc line 15
type TGtkHScaleClass = record
parent_class: TGtkScaleClass;
end;