RTFormwork/public10/design/U_PageBaseList.dfm
2024-10-30 13:45:23 +08:00

621 lines
14 KiB
Plaintext

object frmPageBaseList: TfrmPageBaseList
Left = 0
Top = 0
Caption = 'frmPageBaseList'
ClientHeight = 538
ClientWidth = 1112
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #24494#36719#38597#40657
Font.Style = []
OldCreateOrder = False
WindowState = wsMaximized
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 21
object ToolBar3: TToolBar
Tag = 1
Left = 0
Top = 0
Width = 1112
Height = 60
AutoSize = True
ButtonHeight = 30
ButtonWidth = 115
Caption = 'ToolBar1'
GradientEndColor = clWindow
Images = DataLink_schedule.cxImageList_bar
List = True
GradientDrawingOptions = [gdoHotTrack]
ShowCaptions = True
TabOrder = 0
object Trefresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 1
OnClick = TrefreshClick
end
object Tadd: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #26032#22686
ImageIndex = 9
Visible = False
end
object Tooledit: TToolButton
Left = 142
Top = 0
AutoSize = True
Caption = #20462#25913
ImageIndex = 3
Visible = False
end
object ToolDel: TToolButton
Left = 213
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 5
Visible = False
end
object Toolzdy1: TToolButton
Left = 284
Top = 0
AutoSize = True
Caption = '1'
Visible = False
end
object Toolzdy2: TToolButton
Left = 304
Top = 0
AutoSize = True
Caption = '2'
Visible = False
end
object Toolzdy3: TToolButton
Left = 324
Top = 0
AutoSize = True
Caption = '3'
Visible = False
end
object Toolzdy4: TToolButton
Left = 344
Top = 0
AutoSize = True
Caption = '4'
Visible = False
end
object Toolzdy5: TToolButton
Left = 364
Top = 0
AutoSize = True
Caption = '5'
Visible = False
end
object Toolzdy6: TToolButton
Left = 384
Top = 0
AutoSize = True
Caption = '6'
Wrap = True
Visible = False
end
object Toolzdy7: TToolButton
Left = 0
Top = 30
AutoSize = True
Caption = '7'
Visible = False
end
object Toolzdy8: TToolButton
Left = 20
Top = 30
AutoSize = True
Caption = '8'
Visible = False
end
object Toolzdy9: TToolButton
Left = 40
Top = 30
AutoSize = True
Caption = '9'
Visible = False
end
object Toolzdy10: TToolButton
Left = 60
Top = 30
AutoSize = True
Caption = '10'
Visible = False
end
object Toolzdy11: TToolButton
Left = 89
Top = 30
AutoSize = True
Caption = '11'
Visible = False
end
object Toolzdy12: TToolButton
Left = 118
Top = 30
AutoSize = True
Caption = '12'
Visible = False
end
object Toolzdy13: TToolButton
Left = 147
Top = 30
AutoSize = True
Caption = '13'
Visible = False
end
object Toolzdy14: TToolButton
Left = 176
Top = 30
AutoSize = True
Caption = '14'
Visible = False
end
object Toolzdy15: TToolButton
Left = 205
Top = 30
AutoSize = True
Caption = '15'
Visible = False
end
object Toolzdy16: TToolButton
Left = 234
Top = 30
AutoSize = True
Caption = '16'
Visible = False
end
object Toolzdy17: TToolButton
Left = 263
Top = 30
AutoSize = True
Caption = '17'
Visible = False
end
object Toolzdy18: TToolButton
Left = 292
Top = 30
AutoSize = True
Caption = '18'
Visible = False
end
object Toolzdy19: TToolButton
Left = 321
Top = 30
AutoSize = True
Caption = '19'
Visible = False
end
object Toolzdy20: TToolButton
Left = 350
Top = 30
AutoSize = True
Caption = '20'
Visible = False
end
object Tprint: TToolButton
Left = 379
Top = 30
AutoSize = True
Caption = #23548#20986'Excel'
ImageIndex = 28
OnClick = TprintClick
end
object TprintGrid: TToolButton
Left = 488
Top = 30
AutoSize = True
Caption = #25171#21360
ImageIndex = 21
OnClick = TprintGridClick
end
object TsaveGrid: TToolButton
Left = 559
Top = 30
AutoSize = True
Caption = #20445#23384#26684#24335
ImageIndex = 30
OnClick = TsaveGridClick
end
object TgridSet: TToolButton
Left = 662
Top = 30
AutoSize = True
Caption = #34920#26684#21015#35774#32622
ImageIndex = 16
Visible = False
OnClick = TgridSetClick
end
object Tclose: TToolButton
Left = 781
Top = 30
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TcloseClick
end
end
object Panel_page: TPanel
Left = 0
Top = 105
Width = 1112
Height = 37
Align = alTop
AutoSize = True
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
DesignSize = (
1112
37)
object LBCPAP: TLabel
Left = 425
Top = 8
Width = 100
Height = 20
Alignment = taCenter
Anchors = [akLeft]
AutoSize = False
Caption = #24403#21069#39029'/'#24635#39029#25968
Layout = tlCenter
ExplicitTop = 7
end
object Label31: TLabel
Left = 14
Top = 8
Width = 96
Height = 21
Alignment = taCenter
Anchors = [akLeft]
Caption = #27599#39029#35760#24405#26465#25968
Layout = tlCenter
ExplicitTop = 7
end
object BTNP: TButton
Left = 532
Top = 5
Width = 78
Height = 30
Anchors = [akLeft]
Caption = #19979#19968#39029
TabOrder = 0
OnClick = BTNPClick
end
object BTLP: TButton
Left = 338
Top = 4
Width = 78
Height = 31
Anchors = [akLeft]
Caption = #19978#19968#39029
TabOrder = 1
OnClick = BTLPClick
end
object TCBNOR: TcxComboBox
Tag = 2
Left = 122
Top = 2
Properties.DropDownListStyle = lsEditFixedList
Properties.Items.Strings = (
'500'
'1000'
'5000'
'10000')
Properties.OnChange = TCBNORPropertiesChange
TabOrder = 2
Text = '500'
Width = 94
end
end
inline frmFrameDateSel1: TfrmFrameDateSel10
Left = 0
Top = 60
Width = 1112
Height = 45
Align = alTop
AutoSize = True
Color = clBtnFace
ParentBackground = False
ParentColor = False
TabOrder = 2
ExplicitTop = 60
ExplicitWidth = 1112
inherited dxLayoutControl1: TdxLayoutControl
Width = 1112
ExplicitWidth = 1112
inherited BegDate: TcxDateEdit
Left = 116
Top = 11
ExplicitLeft = 116
ExplicitTop = 11
end
inherited EndDate: TcxDateEdit
Left = 265
Top = 11
ExplicitLeft = 265
ExplicitTop = 11
end
inherited cxButton1: TcxButton
Left = 465
Top = 11
ExplicitLeft = 465
ExplicitTop = 11
end
inherited cxButton2: TcxButton
Left = 625
Top = 11
ExplicitLeft = 625
ExplicitTop = 11
end
inherited cxButton3: TcxButton
Left = 756
Top = 11
ExplicitLeft = 756
ExplicitTop = 11
end
inherited cbbType: TcxComboBox
Left = 705
Top = 11
ExplicitLeft = 705
ExplicitTop = 11
end
inherited cxButton4: TcxButton
Left = 385
Top = 11
ExplicitLeft = 385
ExplicitTop = 11
end
inherited cxButton5: TcxButton
Left = 545
Top = 11
ExplicitLeft = 545
ExplicitTop = 11
end
inherited TimeType: TcxComboBox
Left = 16
Top = 11
ExplicitLeft = 16
ExplicitTop = 11
end
inherited jqModel: TcxCheckBox
Left = 859
Top = 11
ExplicitLeft = 859
ExplicitTop = 11
ExplicitWidth = 82
ExplicitHeight = 25
end
inherited dxLayoutControl1Group_Root: TdxLayoutGroup
ItemIndex = 1
end
inherited dxLayoutItem1: TdxLayoutItem
CaptionOptions.Text = 'New Item'
end
inherited dxLayoutItem2: TdxLayoutItem
CaptionOptions.Text = 'New Item'
end
inherited dxLayoutItem8: TdxLayoutItem
CaptionOptions.Text = 'New Item'
end
inherited dxLayoutItem9: TdxLayoutItem
CaptionOptions.Text = 'New Item'
end
inherited dxLayoutItem10: TdxLayoutItem
ControlOptions.OriginalHeight = 25
ControlOptions.OriginalWidth = 82
end
end
end
object cxPageControl1: TcxPageControl
Left = 56
Top = 148
Width = 569
Height = 353
TabOrder = 3
Properties.ActivePage = cxTabSheet1
Properties.CustomButtons.Buttons = <>
ClientRectBottom = 351
ClientRectLeft = 2
ClientRectRight = 567
ClientRectTop = 36
object cxTabSheet1: TcxTabSheet
Caption = 'cxTabSheet1'
ImageIndex = 0
object dxLayoutControl1: TdxLayoutControl
Left = 0
Top = 0
Width = 565
Height = 57
Align = alTop
TabOrder = 0
AutoSize = True
LayoutLookAndFeel = BaseDataLink.dxLayoutSkinLookAndFeel1
OptionsItem.SizableHorz = True
OptionsItem.SizableVert = True
OnDblClick = dxLayoutControl2DblClick
object dxLayoutGroup1: TdxLayoutGroup
AlignHorz = ahParentManaged
AlignVert = avParentManaged
CaptionOptions.AlignVert = tavCenter
SizeOptions.AssignedValues = [sovSizableHorz, sovSizableVert]
SizeOptions.SizableHorz = True
SizeOptions.SizableVert = True
Hidden = True
LayoutDirection = ldHorizontal
Padding.Bottom = -5
Padding.Top = -5
Padding.AssignedValues = [lpavBottom, lpavTop]
ShowBorder = False
Index = -1
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 57
Width = 565
Height = 258
Align = alClient
TabOrder = 1
object tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DataSource1
DataController.Filter.AutoDataSetFilter = True
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsData.Inserting = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
end
object cxGrid1Level1: TcxGridLevel
GridView = tv1
end
end
end
object cxTabSheet2: TcxTabSheet
Caption = 'cxTabSheet2'
ImageIndex = 1
object dxLayoutControl2: TdxLayoutControl
Left = 0
Top = 0
Width = 565
Height = 57
Align = alTop
TabOrder = 0
AutoSize = True
LayoutLookAndFeel = BaseDataLink.dxLayoutSkinLookAndFeel1
OptionsItem.SizableHorz = True
OptionsItem.SizableVert = True
OnDblClick = dxLayoutControl2DblClick
object dxLayoutControl2Group_Root: TdxLayoutGroup
AlignHorz = ahParentManaged
AlignVert = avParentManaged
CaptionOptions.AlignVert = tavCenter
SizeOptions.AssignedValues = [sovSizableHorz, sovSizableVert]
SizeOptions.SizableHorz = True
SizeOptions.SizableVert = True
Hidden = True
LayoutDirection = ldHorizontal
Padding.Bottom = -5
Padding.Top = -5
Padding.AssignedValues = [lpavBottom, lpavTop]
ShowBorder = False
Index = -1
end
end
object cxGrid2: TcxGrid
Left = 0
Top = 57
Width = 565
Height = 258
Align = alClient
TabOrder = 1
object tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DataSource1
DataController.Filter.AutoDataSetFilter = True
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsData.Inserting = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
end
object cxGridLevel1: TcxGridLevel
GridView = tv2
end
end
end
end
object cxProgressBar1: TMovePanel
Left = 408
Top = 256
Width = 233
Height = 49
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31245#21518#12290#12290#12290
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = #24494#36719#38597#40657
Font.Style = []
ParentFont = False
TabOrder = 4
Visible = False
end
object DataSource1: TDataSource
DataSet = CDS_List1
Left = 768
Top = 296
end
object ADOQueryList1: TADOQuery
Connection = DataLink_schedule.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 704
Top = 368
end
object cxGridPopupMenu1: TcxGridPopupMenu
PopupMenus = <>
Left = 992
Top = 111
end
object ADOQueryBaseCmd: TADOQuery
Parameters = <>
Left = 281
Top = 248
end
object ADOQueryBaseTemp: TADOQuery
LockType = ltReadOnly
Parameters = <>
Left = 673
Top = 161
end
object CDS_List1: TClientDataSet
Aggregates = <>
Params = <>
Left = 395
Top = 280
end
object DataSource2: TDataSource
DataSet = CDS_List1
Left = 832
Top = 304
end
object ADOQueryList2: TADOQuery
Connection = DataLink_schedule.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 816
Top = 400
end
object CDS_List2: TClientDataSet
Aggregates = <>
Params = <>
Left = 467
Top = 320
end
end