TOnDigi

type TOnDigi = procedure(dwPort: Integer; szFrom, szTo, szDigiCall, szData: String) of object;

Unit
AGWAPI