From Lazarus wiki
Jump to navigationJump to search


ATGauge is OS-independant progress indicator component. It's like Delphi TGauge. The same properties (with some additions) but totally new code (it's smaller than Delphi 7 code). It has class name and properties compatible with the Delphi 7 version, but different unit name.


"Kind" property supports same kinds as D7:

  • only text
  • horiz bar
  • vert bar
  • needle (half-circle)
  • pie (full circle)

Author: Alexey Torgashin (Russia)

License: MPL 2.0 or LGPL.


Homepage at github:

Property ShowTextInverted

This property is to look like Delphi's component.

  • Off: text (e.g. "20%") is painted with color Font.Color at all places. This is fast.
  • On: text is painted with inverted color regarding image under it. Font.Color is ignored. Temp bitmap is created (with a size of text), then this bitmap is copied over image-bitmap with Canvas.CopyMode=cmSrcInvert. This is slower and don't work on GTK2 (I see pixelated text over green bar). This is OK on Windows and QT.