TNxRowEvent = procedure (Sender: TObject; Index: Integer; Row: INxRow) of object;