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