TGtkRange

type TGtkRange = record

  widget: TGtkWidget;

  trough: PGdkWindow;

  slider: PGdkWindow;

  step_forw: PGdkWindow;

  step_back: PGdkWindow;

  x_click_point: gint16;

  y_click_point: gint16;

  button: guint8;

  digits: gint8;

  flag0: Word;

  timer: guint32;

  old_value: gfloat;

  old_lower: gfloat;

  old_upper: gfloat;

  old_page_size: gfloat;

  adjustment: PGtkAdjustment;

end;