Source position: gtkruler.pp line 35
type TGtkRulerMetric = record
metric_name: Pgchar;
abbrev: Pgchar;
pixels_per_unit: gfloat;
ruler_scale: array [0..9] of gfloat;
subdivide: array [0..4] of gint;
end;