ATGauge

From Free Pascal wiki
Jump to: navigation, search

About

ATGauge is OS-independant progress indicator component. It's like D7's TGauge. The same properties (with some addons) but totally new code (it's much smaller that D7's one). It has class name and properties, compatible with Delphi7 version, but different unit name.

atgauge.png

"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

Latest version, with demo app, is at https://github.com/Alexey-T/ATGauge/

Requirements

Lazarus: 1.4.0.

Tested on: Win32 (Windows 7), Linux GTK2 or QT (Ubuntu 14.04), macOS (10.8)

Installation

  • Download zip file from Github using "Download ZIP" button.
  • Open package file (.lpk), compile and install.
  • Restart ide, see "Misc tab" of the Component Palette.

Prop ShowTextInverted

This prop is for look like Delphi.

  • Off: text ("20%") painted with color Font.Color at all places. This is fast.
  • On: text painted with inverted color regarding image under it. Font.Color ignored. Temp bitmap is created (with a size of text), then temp-bitmap is copied over image-bitmap with Canvas.CopyMode=cmSrcInvert. This is slower and don't work on Linux Gtk2 (I see pixelated text over green bar). This's ok on Win32 (note: ClearType not used here) and QT.