Source position: batterymanager.pas line 21
type TOnBatteryNotCharging = procedure(
Sender: TObject;
batteryAtPercentLevel: Integer
) of object;