Unit
IB_Grid

Declaration

TIB_CustomGridCellClickEvent = procedure( Sender: TObject;
                                          ACol, ARow: longint;
                                          AButton: TMouseButton;
                                          AShift: TShiftState ) of object;