|
|
|
|
|
unit u_rp_pin_total;
|
|
|
|
|
|
|
|
|
|
|
|
interface
|
|
|
|
|
|
|
|
|
|
|
|
uses
|
|
|
|
|
|
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
|
|
|
|
|
Dialogs, dxExEdtr, RxMemDS, DB, ADODB, Menus, XPMenu, bsSkinCtrls,
|
|
|
|
|
|
dxDBGrid, dxDBTLCl, dxGrClms, dxTL, dxDBCtrl, dxCntner, ComCtrls,
|
|
|
|
|
|
bsSkinTabs, ExtCtrls, cxStyles, cxCustomData, cxGraphics, cxFilter,
|
|
|
|
|
|
cxData, cxDataStorage, cxEdit, cxDBData, cxMaskEdit, cxCalendar,
|
|
|
|
|
|
cxTextEdit, cxGridCustomTableView, cxGridTableView,
|
|
|
|
|
|
cxGridBandedTableView, cxGridDBBandedTableView, cxClasses, cxControls,
|
|
|
|
|
|
cxGridCustomView, cxGridLevel, cxGrid, Grids, DBGridEh;
|
|
|
|
|
|
|
|
|
|
|
|
type
|
|
|
|
|
|
Tfrm_rp_pin_total = class(TForm)
|
|
|
|
|
|
Panel1: TPanel;
|
|
|
|
|
|
bsSkinPanel2: TbsSkinPanel;
|
|
|
|
|
|
bsSkinButton10: TbsSkinButton;
|
|
|
|
|
|
bsSkinButton9: TbsSkinButton;
|
|
|
|
|
|
bsSkinButton5: TbsSkinButton;
|
|
|
|
|
|
p_seae: TADOStoredProc;
|
|
|
|
|
|
p_seae1: TDataSource;
|
|
|
|
|
|
t_sum1: TDataSource;
|
|
|
|
|
|
bsSkinPageControl1: TbsSkinPageControl;
|
|
|
|
|
|
bsSkinTabSheet1: TbsSkinTabSheet;
|
|
|
|
|
|
p_seai: TADOStoredProc;
|
|
|
|
|
|
p_seai1: TDataSource;
|
|
|
|
|
|
p_airi1: TDataSource;
|
|
|
|
|
|
p_airi: TADOStoredProc;
|
|
|
|
|
|
p_aire: TADOStoredProc;
|
|
|
|
|
|
p_aire1: TDataSource;
|
|
|
|
|
|
bsSkinPageControl2: TbsSkinPageControl;
|
|
|
|
|
|
bsSkinTabSheet11: TbsSkinTabSheet;
|
|
|
|
|
|
bsSkinTabSheet12: TbsSkinTabSheet;
|
|
|
|
|
|
bsSkinTabSheet13: TbsSkinTabSheet;
|
|
|
|
|
|
bsSkinTabSheet14: TbsSkinTabSheet;
|
|
|
|
|
|
p_sum: TADOStoredProc;
|
|
|
|
|
|
PopupMenu2: TPopupMenu;
|
|
|
|
|
|
N10: TMenuItem;
|
|
|
|
|
|
N11: TMenuItem;
|
|
|
|
|
|
N14: TMenuItem;
|
|
|
|
|
|
N13: TMenuItem;
|
|
|
|
|
|
N12: TMenuItem;
|
|
|
|
|
|
N15: TMenuItem;
|
|
|
|
|
|
N16: TMenuItem;
|
|
|
|
|
|
XPMenu2: TXPMenu;
|
|
|
|
|
|
dxDBGrid10: TdxDBGrid;
|
|
|
|
|
|
dxDBGridMaskColumn28: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn29: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn30: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridDateColumn10: TdxDBGridDateColumn;
|
|
|
|
|
|
dxDBGridMaskColumn31: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn32: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn33: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn34: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridDateColumn11: TdxDBGridDateColumn;
|
|
|
|
|
|
dxDBGridMaskColumn37: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn99: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn100: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn101: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridColumn33: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridMaskColumn103: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn104: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridDateColumn12: TdxDBGridDateColumn;
|
|
|
|
|
|
dxDBGridMaskColumn105: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn106: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn107: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridColumn45: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn57: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn69: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn80: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn81: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn82: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn83: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn84: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn85: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridMaskColumn108: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridColumn86: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn87: TdxDBGridColumn;
|
|
|
|
|
|
p_airtruck: TADOStoredProc;
|
|
|
|
|
|
p_airtruck1: TDataSource;
|
|
|
|
|
|
tab5: TbsSkinTabSheet;
|
|
|
|
|
|
dxDBGrid10Column33: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGrid10Column34: TdxDBGridColumn;
|
|
|
|
|
|
cxGrid1: TcxGrid;
|
|
|
|
|
|
cxGrid1Level1: TcxGridLevel;
|
|
|
|
|
|
cxGrid1DBBandedTableView1: TcxGridDBBandedTableView;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn3: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn4: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn5: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn6: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn7: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn8: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn9: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn10: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn11: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn12: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn13: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn14: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn15: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn16: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn17: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn18: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn19: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn20: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn21: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn22: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn23: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn24: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn25: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn110: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn26: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn31: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn41: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn51: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn61: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn71: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn81: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn91: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn101: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn27: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1TEU: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn28: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn29: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn30: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn32: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn33: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn34: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn35: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn36: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn37: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn38: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn39: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1USD: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1RMB: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn40: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1USD1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1RMB1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn42: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1USD2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1RMB2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn43: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn44: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn45: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView1DBBandedColumn46: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxStyleRepository1: TcxStyleRepository;
|
|
|
|
|
|
cxStyle1: TcxStyle;
|
|
|
|
|
|
cxStyle2: TcxStyle;
|
|
|
|
|
|
cxStyle3: TcxStyle;
|
|
|
|
|
|
cxStyle4: TcxStyle;
|
|
|
|
|
|
cxStyle5: TcxStyle;
|
|
|
|
|
|
cxGrid1Level2: TcxGridLevel;
|
|
|
|
|
|
p_seae_pin: TADOStoredProc;
|
|
|
|
|
|
p_seae_pin1: TDataSource;
|
|
|
|
|
|
cxGrid2: TcxGrid;
|
|
|
|
|
|
cxGridLevel1: TcxGridLevel;
|
|
|
|
|
|
cxGrid2DBBandedTableView1: TcxGridDBBandedTableView;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn3: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn4: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn5: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn6: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn7: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn8: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn9: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn10: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn11: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn12: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn13: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn14: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn15: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn16: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn17: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn18: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn19: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn20: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn21: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn22: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn23: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn110: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn24: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn31: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn41: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn51: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn61: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn71: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn81: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn91: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn101: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn25: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1TEU: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn26: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn27: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn28: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn29: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn30: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn32: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn33: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn34: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn35: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn36: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn37: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1USD: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1RMB: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn38: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1USD1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1RMB1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn39: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1USD2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1RMB2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn40: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn42: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn43: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView1DBBandedColumn44: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxStyleRepository2: TcxStyleRepository;
|
|
|
|
|
|
cxStyle6: TcxStyle;
|
|
|
|
|
|
cxStyle7: TcxStyle;
|
|
|
|
|
|
cxStyle8: TcxStyle;
|
|
|
|
|
|
cxStyle9: TcxStyle;
|
|
|
|
|
|
cxStyle10: TcxStyle;
|
|
|
|
|
|
cxGrid2Level1: TcxGridLevel;
|
|
|
|
|
|
cxGrid2DBBandedTableView3: TcxGridDBBandedTableView;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn3: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn4: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn5: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn6: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn7: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn8: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn9: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn10: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn11: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn12: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn13: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn14: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn15: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn16: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn17: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn18: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn19: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn20: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn21: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn22: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn23: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn110: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn24: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn31: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn41: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn51: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn61: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn71: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn81: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn91: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn101: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn25: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3TEU: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn26: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn27: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn28: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn29: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn30: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn32: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn33: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn34: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn35: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn36: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn37: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3USD: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3RMB: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn38: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3USD1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3RMB1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn39: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3USD2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3RMB2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn40: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn42: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn43: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid2DBBandedTableView3DBBandedColumn44: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxStyleRepository3: TcxStyleRepository;
|
|
|
|
|
|
cxStyle11: TcxStyle;
|
|
|
|
|
|
cxStyle12: TcxStyle;
|
|
|
|
|
|
cxStyle13: TcxStyle;
|
|
|
|
|
|
cxStyle14: TcxStyle;
|
|
|
|
|
|
cxStyle15: TcxStyle;
|
|
|
|
|
|
bsSkinTabSheet6: TbsSkinTabSheet;
|
|
|
|
|
|
cxGrid1DBBandedTableView3: TcxGridDBBandedTableView;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn3: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn4: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn5: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn6: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn7: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn8: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn9: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn10: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn11: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn12: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn13: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn14: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn15: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn16: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn17: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn18: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn19: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn20: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn21: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn22: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn23: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn24: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn25: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn110: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn26: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn31: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn41: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn51: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn61: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn71: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn81: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn91: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn101: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn27: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3TEU: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn28: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn29: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn30: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn32: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn33: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn34: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn35: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn36: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn37: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn38: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn39: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3USD: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3RMB: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn40: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3USD1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3RMB1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn42: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3USD2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3RMB2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn43: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn44: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn45: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid1DBBandedTableView3DBBandedColumn46: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxStyleRepository4: TcxStyleRepository;
|
|
|
|
|
|
cxStyle16: TcxStyle;
|
|
|
|
|
|
cxStyle17: TcxStyle;
|
|
|
|
|
|
cxStyle18: TcxStyle;
|
|
|
|
|
|
cxStyle19: TcxStyle;
|
|
|
|
|
|
cxStyle20: TcxStyle;
|
|
|
|
|
|
p_seai_pin: TADOStoredProc;
|
|
|
|
|
|
p_seai_pin1: TDataSource;
|
|
|
|
|
|
p_aire_pin: TADOStoredProc;
|
|
|
|
|
|
p_aire_pin1: TDataSource;
|
|
|
|
|
|
p_airi_pin1: TDataSource;
|
|
|
|
|
|
p_airi_pin: TADOStoredProc;
|
|
|
|
|
|
cxGrid3: TcxGrid;
|
|
|
|
|
|
cxGridLevel2: TcxGridLevel;
|
|
|
|
|
|
cxStyleRepository5: TcxStyleRepository;
|
|
|
|
|
|
cxStyle21: TcxStyle;
|
|
|
|
|
|
cxStyle22: TcxStyle;
|
|
|
|
|
|
cxStyle23: TcxStyle;
|
|
|
|
|
|
cxStyle24: TcxStyle;
|
|
|
|
|
|
cxStyle25: TcxStyle;
|
|
|
|
|
|
cxGrid3DBBandedTableView1: TcxGridDBBandedTableView;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn3: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn4: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn5: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn6: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn7: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn8: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn9: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn10: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn11: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn12: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn13: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn14: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn15: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn16: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn17: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn18: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn19: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn20: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn21: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn22: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn23: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn24: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1USD: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1RMB: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn25: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1USD1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1RMB1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn26: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1USD2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1RMB2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn27: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn28: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn29: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView1DBBandedColumn30: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxStyleRepository6: TcxStyleRepository;
|
|
|
|
|
|
cxStyle26: TcxStyle;
|
|
|
|
|
|
cxStyle27: TcxStyle;
|
|
|
|
|
|
cxStyle28: TcxStyle;
|
|
|
|
|
|
cxStyle29: TcxStyle;
|
|
|
|
|
|
cxStyle30: TcxStyle;
|
|
|
|
|
|
cxGrid3DBBandedTableView3: TcxGridDBBandedTableView;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn3: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn4: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn5: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn6: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn7: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn8: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn9: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn10: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn11: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn12: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn13: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn14: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn15: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn16: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn17: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn18: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn19: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn20: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn21: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn22: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn23: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn24: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3USD: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3RMB: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn25: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3USD1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3RMB1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn26: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3USD2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3RMB2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn27: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn28: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn29: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView3DBBandedColumn30: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxStyleRepository7: TcxStyleRepository;
|
|
|
|
|
|
cxStyle31: TcxStyle;
|
|
|
|
|
|
cxStyle32: TcxStyle;
|
|
|
|
|
|
cxStyle33: TcxStyle;
|
|
|
|
|
|
cxStyle34: TcxStyle;
|
|
|
|
|
|
cxStyle35: TcxStyle;
|
|
|
|
|
|
cxGrid3Level1: TcxGridLevel;
|
|
|
|
|
|
cxGrid3DBBandedTableView4: TcxGridDBBandedTableView;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn3: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn4: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn5: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn6: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn7: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn8: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn9: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn10: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn11: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn12: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn13: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn14: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn15: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn16: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn17: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn18: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn19: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn20: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn21: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn22: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn23: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn24: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4USD: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4RMB: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn25: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4USD1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4RMB1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn26: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4USD2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4RMB2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn27: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn28: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn29: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid3DBBandedTableView4DBBandedColumn30: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxStyleRepository8: TcxStyleRepository;
|
|
|
|
|
|
cxStyle36: TcxStyle;
|
|
|
|
|
|
cxStyle37: TcxStyle;
|
|
|
|
|
|
cxStyle38: TcxStyle;
|
|
|
|
|
|
cxStyle39: TcxStyle;
|
|
|
|
|
|
cxStyle40: TcxStyle;
|
|
|
|
|
|
dxDBGrid4: TdxDBGrid;
|
|
|
|
|
|
dxDBGridMaskColumn71: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn72: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn73: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridDateColumn7: TdxDBGridDateColumn;
|
|
|
|
|
|
dxDBGridMaskColumn74: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn75: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn76: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn77: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn78: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGrid4Column36: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGrid4Column37: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridMaskColumn79: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridDateColumn8: TdxDBGridDateColumn;
|
|
|
|
|
|
dxDBGridMaskColumn80: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn81: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn82: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn83: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridColumn22: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridMaskColumn84: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn85: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn86: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridDateColumn9: TdxDBGridDateColumn;
|
|
|
|
|
|
dxDBGridMaskColumn87: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn88: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridMaskColumn89: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGridColumn23: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn24: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn25: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn26: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn27: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn28: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn29: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn30: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridColumn31: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGridMaskColumn90: TdxDBGridMaskColumn;
|
|
|
|
|
|
dxDBGrid4Column34: TdxDBGridColumn;
|
|
|
|
|
|
dxDBGrid4Column35: TdxDBGridColumn;
|
|
|
|
|
|
cxGrid4: TcxGrid;
|
|
|
|
|
|
cxGridDBBandedTableView1: TcxGridDBBandedTableView;
|
|
|
|
|
|
cxGridDBBandedColumn1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn3: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn4: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn5: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn6: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn7: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn8: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn9: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn10: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn11: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn12: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn13: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn14: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn15: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn16: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn17: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn18: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn19: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn20: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn21: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn22: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn23: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn24: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn25: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn26: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn27: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn28: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn29: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn30: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn31: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn32: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn33: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn34: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn35: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn36: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridDBBandedColumn37: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGridLevel3: TcxGridLevel;
|
|
|
|
|
|
cxGrid4DBBandedTableView1: TcxGridDBBandedTableView;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn3: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn4: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn5: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn6: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn7: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn8: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn9: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn10: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn11: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn12: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn13: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn14: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn15: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn16: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn17: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn18: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn19: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn20: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn21: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn22: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn23: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn24: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1USD: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1RMB: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn25: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1USD1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1RMB1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn26: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1USD2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1RMB2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn27: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn28: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn29: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView1DBBandedColumn30: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxStyleRepository9: TcxStyleRepository;
|
|
|
|
|
|
cxStyle41: TcxStyle;
|
|
|
|
|
|
cxStyle42: TcxStyle;
|
|
|
|
|
|
cxStyle43: TcxStyle;
|
|
|
|
|
|
cxStyle44: TcxStyle;
|
|
|
|
|
|
cxStyle45: TcxStyle;
|
|
|
|
|
|
cxGrid4Level1: TcxGridLevel;
|
|
|
|
|
|
cxGrid4DBBandedTableView3: TcxGridDBBandedTableView;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn3: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn4: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn5: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn6: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn7: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn8: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn9: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn10: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn11: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn12: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn13: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn14: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn15: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn16: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn17: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn18: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn19: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn20: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn21: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn22: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn23: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn24: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3USD: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3RMB: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn25: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3USD1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3RMB1: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn26: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3USD2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3RMB2: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn27: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn28: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn29: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxGrid4DBBandedTableView3DBBandedColumn30: TcxGridDBBandedColumn;
|
|
|
|
|
|
cxStyleRepository10: TcxStyleRepository;
|
|
|
|
|
|
cxStyle46: TcxStyle;
|
|
|
|
|
|
cxStyle47: TcxStyle;
|
|
|
|
|
|
cxStyle48: TcxStyle;
|
|
|
|
|
|
cxStyle49: TcxStyle;
|
|
|
|
|
|
cxStyle50: TcxStyle;
|
|
|
|
|
|
procedure bsSkinButton5Click(Sender: TObject);
|
|
|
|
|
|
procedure FormClose(Sender: TObject; var Action: TCloseAction);
|
|
|
|
|
|
procedure Panel1Resize(Sender: TObject);
|
|
|
|
|
|
procedure bsSkinButton10Click(Sender: TObject);
|
|
|
|
|
|
procedure FormShow(Sender: TObject);
|
|
|
|
|
|
procedure bsSkinButton9Click(Sender: TObject);
|
|
|
|
|
|
procedure N10Click(Sender: TObject);
|
|
|
|
|
|
procedure N14Click(Sender: TObject);
|
|
|
|
|
|
procedure N12Click(Sender: TObject);
|
|
|
|
|
|
procedure N16Click(Sender: TObject);
|
|
|
|
|
|
procedure dxDBGrid1ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
procedure dxDBGrid2ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
procedure dxDBGrid3ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
procedure dxDBGrid4ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
procedure dxDBGrid5ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
procedure dxDBGrid6ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
procedure dxDBGrid7ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
procedure dxDBGrid8ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
procedure dxDBGrid9ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
procedure dxDBGrid1DblClick(Sender: TObject);
|
|
|
|
|
|
procedure dxDBGrid2DblClick(Sender: TObject);
|
|
|
|
|
|
procedure dxDBGrid3DblClick(Sender: TObject);
|
|
|
|
|
|
procedure dxDBGrid4DblClick(Sender: TObject);
|
|
|
|
|
|
procedure dxDBGrid1Column116CustomDraw(Sender: TObject;
|
|
|
|
|
|
ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode;
|
|
|
|
|
|
AColumn: TdxDBTreeListColumn; const AText: String; AFont: TFont;
|
|
|
|
|
|
var AColor: TColor; ASelected, AFocused: Boolean;
|
|
|
|
|
|
var ADone: Boolean);
|
|
|
|
|
|
procedure dxDBGridColumn11CustomDraw(Sender: TObject; ACanvas: TCanvas;
|
|
|
|
|
|
ARect: TRect; ANode: TdxTreeListNode; AColumn: TdxDBTreeListColumn;
|
|
|
|
|
|
const AText: String; AFont: TFont; var AColor: TColor; ASelected,
|
|
|
|
|
|
AFocused: Boolean; var ADone: Boolean);
|
|
|
|
|
|
procedure dxDBGridColumn21CustomDraw(Sender: TObject; ACanvas: TCanvas;
|
|
|
|
|
|
ARect: TRect; ANode: TdxTreeListNode; AColumn: TdxDBTreeListColumn;
|
|
|
|
|
|
const AText: String; AFont: TFont; var AColor: TColor; ASelected,
|
|
|
|
|
|
AFocused: Boolean; var ADone: Boolean);
|
|
|
|
|
|
procedure dxDBGridColumn31CustomDraw(Sender: TObject; ACanvas: TCanvas;
|
|
|
|
|
|
ARect: TRect; ANode: TdxTreeListNode; AColumn: TdxDBTreeListColumn;
|
|
|
|
|
|
const AText: String; AFont: TFont; var AColor: TColor; ASelected,
|
|
|
|
|
|
AFocused: Boolean; var ADone: Boolean);
|
|
|
|
|
|
procedure dxDBGridColumn85CustomDraw(Sender: TObject; ACanvas: TCanvas;
|
|
|
|
|
|
ARect: TRect; ANode: TdxTreeListNode; AColumn: TdxDBTreeListColumn;
|
|
|
|
|
|
const AText: String; AFont: TFont; var AColor: TColor; ASelected,
|
|
|
|
|
|
AFocused: Boolean; var ADone: Boolean);
|
|
|
|
|
|
procedure dxDBGrid2Column34CustomDraw(Sender: TObject;
|
|
|
|
|
|
ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode;
|
|
|
|
|
|
AColumn: TdxDBTreeListColumn; const AText: String; AFont: TFont;
|
|
|
|
|
|
var AColor: TColor; ASelected, AFocused: Boolean;
|
|
|
|
|
|
var ADone: Boolean);
|
|
|
|
|
|
procedure p_seaeAfterOpen(DataSet: TDataSet);
|
|
|
|
|
|
procedure p_seaiAfterOpen(DataSet: TDataSet);
|
|
|
|
|
|
private
|
|
|
|
|
|
{ Private declarations }
|
|
|
|
|
|
public
|
|
|
|
|
|
{ Public declarations }
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
var
|
|
|
|
|
|
frm_rp_pin_total: Tfrm_rp_pin_total;
|
|
|
|
|
|
rp_pin_total_open:boolean;
|
|
|
|
|
|
|
|
|
|
|
|
implementation
|
|
|
|
|
|
|
|
|
|
|
|
uses u_main, my_sys_function, u_rp_query, u_sys_progress,
|
|
|
|
|
|
u_data_share;
|
|
|
|
|
|
|
|
|
|
|
|
{$R *.dfm}
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.bsSkinButton5Click(Sender: TObject);
|
|
|
|
|
|
begin
|
|
|
|
|
|
close;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.FormClose(Sender: TObject;
|
|
|
|
|
|
var Action: TCloseAction);
|
|
|
|
|
|
begin
|
|
|
|
|
|
rp_pin_total_open:=false;
|
|
|
|
|
|
frm_rp_pin_total.Hide;
|
|
|
|
|
|
frm_rp_pin_total.ManualFloat(frm_rp_pin_total.BoundsRect );
|
|
|
|
|
|
frm_main.freeTabs('frm_rp_pin_total');
|
|
|
|
|
|
action:=cafree;
|
|
|
|
|
|
frm_rp_pin_total:=nil;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.Panel1Resize(Sender: TObject);
|
|
|
|
|
|
begin
|
|
|
|
|
|
bsSkinPanel2.Left:=Panel1.Width-bsSkinPanel2.Width;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.bsSkinButton10Click(Sender: TObject);
|
|
|
|
|
|
begin
|
|
|
|
|
|
bsSkinTabSheet1.show;
|
|
|
|
|
|
if p_seae.Active then p_seae.close;
|
|
|
|
|
|
p_seae1.DataSet:=nil;
|
|
|
|
|
|
if p_seae_pin.Active then p_seae_pin.close;
|
|
|
|
|
|
p_seae_pin1.DataSet:=nil;
|
|
|
|
|
|
if p_seai.Active then p_seai.close;
|
|
|
|
|
|
p_seai1.DataSet:=nil;
|
|
|
|
|
|
if p_seai_pin.Active then p_seai_pin.close;
|
|
|
|
|
|
p_seai_pin1.DataSet:=nil;
|
|
|
|
|
|
if p_aire.Active then p_aire.close;
|
|
|
|
|
|
p_aire1.DataSet:=nil;
|
|
|
|
|
|
if p_aire_pin.Active then p_aire_pin.close;
|
|
|
|
|
|
p_aire_pin1.DataSet:=nil;
|
|
|
|
|
|
if p_airi.Active then p_airi.close;
|
|
|
|
|
|
p_airi1.DataSet:=nil;
|
|
|
|
|
|
if p_airi_pin.Active then p_airi_pin.close;
|
|
|
|
|
|
p_airi_pin1.DataSet:=nil;
|
|
|
|
|
|
if p_airtruck.Active then p_airtruck.close;
|
|
|
|
|
|
p_airtruck1.DataSet:=nil;
|
|
|
|
|
|
|
|
|
|
|
|
try
|
|
|
|
|
|
frm_rp_query:=tfrm_rp_query.Create (self);
|
|
|
|
|
|
rp_query_limited:='0037';
|
|
|
|
|
|
rp_query_bs:=12;
|
|
|
|
|
|
frm_rp_query.ShowModal;
|
|
|
|
|
|
finally
|
|
|
|
|
|
frm_rp_query.Free;
|
|
|
|
|
|
end;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.FormShow(Sender: TObject);
|
|
|
|
|
|
begin
|
|
|
|
|
|
// loadreggrid(dxdbgrid1,true,caption+'1');
|
|
|
|
|
|
// loadreggrid(dxdbgrid2,true,caption+'2');
|
|
|
|
|
|
// loadreggrid(dxdbgrid3,false,caption+'3');
|
|
|
|
|
|
// loadreggrid(dxdbgrid4,false,caption+'4');
|
|
|
|
|
|
rp_pin_total_open:=true;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.bsSkinButton9Click(Sender: TObject);
|
|
|
|
|
|
begin
|
|
|
|
|
|
sys_print('ҵ<><D2B5><EFBFBD>ۺ<EFBFBD>ͳ<EFBFBD><CDB3>',2,nil,nil,nil,nil,p_seae1,p_seai1,p_aire1,p_airi1,t_sum1,nil,nil);
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.N10Click(Sender: TObject);
|
|
|
|
|
|
begin
|
|
|
|
|
|
if bsSkinTabSheet1.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
if bsSkinTabSheet11.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
// update_grid_view_no(dxdbgrid1);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
if bsSkinTabSheet12.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
// update_grid_view_no(dxdbgrid2);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
if bsSkinTabSheet13.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
// update_grid_view_no(dxdbgrid3);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
if bsSkinTabSheet14.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
// update_grid_view_no(dxdbgrid4);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
end;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.N14Click(Sender: TObject);
|
|
|
|
|
|
begin
|
|
|
|
|
|
if bsSkinTabSheet1.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
if bsSkinTabSheet11.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
// update_grid_view_all(dxdbgrid1);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
if bsSkinTabSheet12.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
// update_grid_view_all(dxdbgrid2);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
if bsSkinTabSheet13.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
// update_grid_view_all(dxdbgrid3);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
if bsSkinTabSheet14.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
// update_grid_view_all(dxdbgrid4);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
end;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.N12Click(Sender: TObject);
|
|
|
|
|
|
begin
|
|
|
|
|
|
if bsSkinTabSheet1.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
if bsSkinTabSheet11.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
// update_grid(dxdbgrid1,87);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
if bsSkinTabSheet12.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
// update_grid(dxdbgrid2,88);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
if bsSkinTabSheet13.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
// update_grid(dxdbgrid3,89);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
if bsSkinTabSheet14.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
// update_grid(dxdbgrid4,90);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
end;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.N16Click(Sender: TObject);
|
|
|
|
|
|
begin
|
|
|
|
|
|
if bsSkinTabSheet1.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
if bsSkinTabSheet11.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
cxgrid_save_xls(cxgrid1);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
if bsSkinTabSheet12.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
cxgrid_save_xls(cxgrid2);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
if bsSkinTabSheet13.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
cxgrid_save_xls(cxgrid3);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
if bsSkinTabSheet14.Showing then
|
|
|
|
|
|
begin
|
|
|
|
|
|
cxgrid_save_xls(cxgrid4);
|
|
|
|
|
|
exit;
|
|
|
|
|
|
end;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid1ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
Column_sort_pro(Column,p_seae,'ҵ<><D2B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>');
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid2ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
Column_sort_pro(Column,p_seai,'ҵ<><D2B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>');
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid3ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
Column_sort_pro(Column,p_aire,'ҵ<><D2B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>');
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid4ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
Column_sort_pro(Column,p_airi,'ҵ<><D2B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>');
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid5ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
Column_sort_pro(Column,p_sum,'base');
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid6ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
Column_sort_pro(Column,p_sum,'base');
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid7ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
Column_sort_pro(Column,p_sum,'base');
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid8ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
Column_sort_pro(Column,p_sum,'base');
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid9ColumnSorting(Sender: TObject;
|
|
|
|
|
|
Column: TdxDBTreeListColumn; var Allow: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
Column_sort_pro(Column,p_sum,'base');
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid1DblClick(Sender: TObject);
|
|
|
|
|
|
begin
|
|
|
|
|
|
fee_view(p_seae.fieldbyname('<27><><EFBFBD><EFBFBD>').asstring);
|
|
|
|
|
|
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid2DblClick(Sender: TObject);
|
|
|
|
|
|
begin
|
|
|
|
|
|
fee_view(p_seai.fieldbyname('<27><><EFBFBD><EFBFBD>').asstring);
|
|
|
|
|
|
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid3DblClick(Sender: TObject);
|
|
|
|
|
|
begin
|
|
|
|
|
|
fee_view(p_aire.fieldbyname('<27><><EFBFBD><EFBFBD>').asstring);
|
|
|
|
|
|
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid4DblClick(Sender: TObject);
|
|
|
|
|
|
begin
|
|
|
|
|
|
fee_view(p_airi.fieldbyname('<27><><EFBFBD><EFBFBD>').asstring);
|
|
|
|
|
|
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid1Column116CustomDraw(Sender: TObject;
|
|
|
|
|
|
ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode;
|
|
|
|
|
|
AColumn: TdxDBTreeListColumn; const AText: String; AFont: TFont;
|
|
|
|
|
|
var AColor: TColor; ASelected, AFocused: Boolean; var ADone: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
if strtofloatdef(AText,0)<=0 then
|
|
|
|
|
|
AColor:=clRed;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGridColumn11CustomDraw(Sender: TObject;
|
|
|
|
|
|
ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode;
|
|
|
|
|
|
AColumn: TdxDBTreeListColumn; const AText: String; AFont: TFont;
|
|
|
|
|
|
var AColor: TColor; ASelected, AFocused: Boolean; var ADone: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
if strtofloatdef(AText,0)<=0 then
|
|
|
|
|
|
AColor:=clRed;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGridColumn21CustomDraw(Sender: TObject;
|
|
|
|
|
|
ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode;
|
|
|
|
|
|
AColumn: TdxDBTreeListColumn; const AText: String; AFont: TFont;
|
|
|
|
|
|
var AColor: TColor; ASelected, AFocused: Boolean; var ADone: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
if strtofloatdef(AText,0)<=0 then
|
|
|
|
|
|
AColor:=clRed;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGridColumn31CustomDraw(Sender: TObject;
|
|
|
|
|
|
ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode;
|
|
|
|
|
|
AColumn: TdxDBTreeListColumn; const AText: String; AFont: TFont;
|
|
|
|
|
|
var AColor: TColor; ASelected, AFocused: Boolean; var ADone: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
if strtofloatdef(AText,0)<=0 then
|
|
|
|
|
|
AColor:=clRed;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGridColumn85CustomDraw(Sender: TObject;
|
|
|
|
|
|
ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode;
|
|
|
|
|
|
AColumn: TdxDBTreeListColumn; const AText: String; AFont: TFont;
|
|
|
|
|
|
var AColor: TColor; ASelected, AFocused: Boolean; var ADone: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
if strtofloatdef(AText,0)<=0 then
|
|
|
|
|
|
AColor:=clRed;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.dxDBGrid2Column34CustomDraw(Sender: TObject;
|
|
|
|
|
|
ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode;
|
|
|
|
|
|
AColumn: TdxDBTreeListColumn; const AText: String; AFont: TFont;
|
|
|
|
|
|
var AColor: TColor; ASelected, AFocused: Boolean; var ADone: Boolean);
|
|
|
|
|
|
begin
|
|
|
|
|
|
if strtofloatdef(AText,0)<=0 then
|
|
|
|
|
|
AColor:=clRed;
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.p_seaeAfterOpen(DataSet: TDataSet);
|
|
|
|
|
|
begin
|
|
|
|
|
|
AdoFormatdxDBGrid(DataSet);
|
|
|
|
|
|
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
procedure Tfrm_rp_pin_total.p_seaiAfterOpen(DataSet: TDataSet);
|
|
|
|
|
|
begin
|
|
|
|
|
|
AdoFormatdxDBGrid(DataSet);
|
|
|
|
|
|
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
end.
|
