TOnConnect

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

Unit
AGWAPI