ATGauge

About

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.

Download

Homepage at github: https://github.com/Alexey-T/ATFlatControls

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.

---

From the Free Pascal wiki, page "ATGauge", as it stood on 2021-12-16 after a change by Alextp, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.