Source position: gtkscale.inc line 10
type TGtkScale = record
range: TGtkRange;
digits: gint;
flag0: Word;
end;