DimDimBY
Newbie | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
X11
Да никаких событий нет. Я для этого вообще тестовое приложение слепил, состоящее из двух таблиц и грида.
type
TForm1 = class(TForm)
Button1: TButton;
DS_Razdel: TDataSource;
DS_Rab: TDataSource;
cxGrid1DBTableView1: TcxGridDBTableView;
cxGrid1Level1: TcxGridLevel;
cxGrid1: TcxGrid;
Tab_Razdel: TDBISAMTable;
Tab_Rab: TDBISAMTable;
cxGrid1DBTableView1NP: TcxGridDBColumn;
cxGrid1DBTableView1GRUPPA: TcxGridDBColumn;
cxGrid1DBTableView1K_GRUP: TcxGridDBColumn;
cxGrid1DBTableView1K_Ind: TcxGridDBColumn;
cxGrid1DBTableView1Osn: TcxGridDBColumn;
cxGrid1DBTableView2: TcxGridDBTableView;
cxGrid1DBTableView2NumGrup: TcxGridDBColumn;
cxGrid1DBTableView2P_NUM: TcxGridDBColumn;
cxGrid1DBTableView2NumWid: TcxGridDBColumn;
cxGrid1DBTableView2KodResurs: TcxGridDBColumn;
cxGrid1DBTableView2NumPoSmete: TcxGridDBColumn;
cxGrid1DBTableView2SWIAZ: TcxGridDBColumn;
cxGrid1DBTableView2TEXT: TcxGridDBColumn;
cxGrid1DBTableView2OSN: TcxGridDBColumn;
cxGrid1DBTableView2IZM: TcxGridDBColumn;
cxGrid1DBTableView2VR: TcxGridDBColumn;
cxGrid1Level2: TcxGridLevel;
ImageList1: TImageList;
Button2: TButton;
Button3: TButton;
Label1: TLabel;
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
|
