получено его:
в спрятанных глубинах защищенных колеривщиков:
тип
TmagiccxPCStandardPainter = конец типа (TcxPCStandardPainter);
процедура TfrmSumGraphs.pcSUMDatabasesMouseDown (прислужник: TObject;
Кнопка: TMouseButton; Перенос: TShiftState; X, Y: Интежер);
var
n: Интежер;
плата: tcxTabSheet;
R: TRect;
pt: TPoint;
начните
n: = pcSUMDatabases.IndexOfTabAt (x, y);
если (n <> -1) после этого
начните
плата: = pcSUMDatabases.Pages [n];
TmagiccxPCStandardPainter (pcSUMDatabases.Painter) .StandardPainterPrepareOutTabImageAndTextData (tab.TabIndex);
R: = TmagiccxPCStandardPainter (pcSUMDatabases.Painter) .FOutTabImageAndTextData.TabImageRect;
если PtInRect, то (r, пункт (x, y)) после этого ShowMessage («оно '' s на изображении!!!! ");
конец;
конец;