📄 unit1.~dfm
字号:
object Form1: TForm1
Left = 6
Top = 153
Width = 1034
Height = 494
Caption = 'ERP '#29992#25143#31579#36873
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 1026
Height = 467
Align = alClient
BevelInner = bvLowered
TabOrder = 0
object Panel2: TPanel
Left = 2
Top = 2
Width = 1022
Height = 97
Align = alTop
TabOrder = 0
object Label1: TLabel
Left = 8
Top = 24
Width = 60
Height = 13
AutoSize = False
Caption = #26368#22823#26102#38388#65306
end
object Label2: TLabel
Left = 221
Top = 23
Width = 97
Height = 13
AutoSize = False
Caption = #31579#36873#26368#23567#26102#38388#65306
end
object Label3: TLabel
Left = 10
Top = 56
Width = 84
Height = 13
AutoSize = False
Caption = #24403#21069#22312#32447#20154#25968#65306
end
object Label4: TLabel
Left = 104
Top = 56
Width = 3
Height = 13
end
object Label5: TLabel
Left = 476
Top = 22
Width = 49
Height = 13
AutoSize = False
Caption = #25130#26029'ID'#65306
end
object Label6: TLabel
Left = 633
Top = 23
Width = 36
Height = 13
AutoSize = False
Caption = #23450#26102#65306
end
object Label7: TLabel
Left = 723
Top = 21
Width = 12
Height = 13
Caption = #20998
end
object Label8: TLabel
Left = 199
Top = 22
Width = 12
Height = 13
AutoSize = False
Caption = #20998
end
object Label9: TLabel
Left = 448
Top = 22
Width = 12
Height = 13
AutoSize = False
Caption = #20998
end
object SpeedButton1: TSpeedButton
Left = 532
Top = 51
Width = 23
Height = 22
Cursor = crHandPoint
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00999999999999
99999C0000C0000000099C0707C0000707099C0000C0000000099CC007C000C0
00099CC000C00CC000C99CCC00C00CC007C99CCC07CCCCC000C99CCC00CCCCCC
07C99CCC07CCCCCC00C99CCC00CCC8CCCCC99CCCC0CCCCCCCCC99C8CCCCC8CCC
C9C99CCCCCCCCCCCCCC99CCCCCCCCCCCCCC99999999999999999}
OnClick = SpeedButton1Click
end
object Label10: TLabel
Left = 568
Top = 56
Width = 65
Height = 13
AutoSize = False
Caption = #38544#34255#31383#20307
end
object BitBtn1: TBitBtn
Left = 746
Top = 47
Width = 75
Height = 25
Caption = #31579#36873
Enabled = False
TabOrder = 0
OnClick = BitBtn1Click
end
object Edit1: TEdit
Left = 72
Top = 19
Width = 121
Height = 21
TabOrder = 1
OnChange = Edit1Change
end
object Edit2: TEdit
Left = 318
Top = 18
Width = 121
Height = 21
TabOrder = 2
OnChange = Edit2Change
end
object BitBtn2: TBitBtn
Left = 829
Top = 47
Width = 74
Height = 26
Caption = #25253#34920
TabOrder = 3
OnClick = BitBtn2Click
end
object BitBtn3: TBitBtn
Left = 746
Top = 14
Width = 75
Height = 25
Caption = #33719#21462
TabOrder = 4
OnClick = BitBtn3Click
end
object BitBtn4: TBitBtn
Left = 828
Top = 14
Width = 75
Height = 25
Caption = #25130#26029
TabOrder = 5
OnClick = BitBtn4Click
end
object CheckBox1: TCheckBox
Left = 191
Top = 56
Width = 159
Height = 17
Caption = #25490#38500#31995#32479#21644#31649#29702#21592#24080#25143
TabOrder = 6
end
object CheckBox2: TCheckBox
Left = 364
Top = 56
Width = 97
Height = 17
Caption = #33258#21160#25130#26029
TabOrder = 7
OnClick = CheckBox2Click
end
object Edit3: TEdit
Left = 530
Top = 18
Width = 98
Height = 21
TabOrder = 8
OnChange = Edit3Change
end
object CheckBox3: TCheckBox
Left = 448
Top = 56
Width = 81
Height = 17
Caption = #30028#38754#38145#23450
TabOrder = 9
OnClick = CheckBox3Click
end
object BitBtn5: TBitBtn
Left = 912
Top = 15
Width = 81
Height = 25
Caption = #36229#26102#20840#37096#25130#26029
Enabled = False
TabOrder = 10
OnClick = BitBtn5Click
end
object BitBtn6: TBitBtn
Left = 912
Top = 47
Width = 81
Height = 26
Caption = #25130#26029#26085#24535#26597#30475
TabOrder = 11
end
object Edit4: TEdit
Left = 673
Top = 17
Width = 41
Height = 21
TabOrder = 12
end
object ProgressBar1: TProgressBar
Left = 8
Top = 80
Width = 737
Height = 12
Enabled = False
Smooth = True
Step = 1
TabOrder = 13
Visible = False
end
end
object PageControl1: TPageControl
Left = 62
Top = 99
Width = 962
Height = 366
ActivePage = TabSheet4
Align = alRight
TabOrder = 1
object TabSheet1: TTabSheet
Caption = #33719#21462#32467#26524
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 954
Height = 338
Align = alClient
DataSource = dm.ds1
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #29992#25143' ID'
Title.Caption = #24037#21495
Width = 100
Visible = True
end
item
Expanded = False
FieldName = #20027#26426#21517
Title.Caption = #20027#26426#21517#31216
Width = 150
Visible = True
end
item
Expanded = False
FieldName = #31354#38386#26102#38388
Width = 100
Visible = True
end
item
Expanded = False
FieldName = #30331#24405#26102#38388
Title.Caption = #30331#38470#26102#38388
Width = 100
Visible = True
end
item
Expanded = False
FieldName = #24403#21069#20250#35805
Title.Caption = #20107#21153
Visible = True
end>
end
end
object TabSheet2: TTabSheet
Caption = #25130#26029#29992#25143
ImageIndex = 1
object DBGrid2: TDBGrid
Left = 0
Top = 0
Width = 954
Height = 338
Align = alClient
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'useid'
Title.Caption = #29992#25143#24037#21495
Visible = True
end
item
Expanded = False
FieldName = 'rq'
Title.Caption = #26085#26399
Width = 120
Visible = True
end
item
Expanded = False
FieldName = 'kxtime'
Title.Caption = #31354#38386#26102#38388
Width = 120
Visible = True
end>
end
end
object TabSheet3: TTabSheet
Caption = #31579#36873#32467#26524
ImageIndex = 2
object DBGrid3: TDBGrid
Left = 0
Top = 0
Width = 954
Height = 338
Align = alClient
DataSource = dm.ds2
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #29992#25143' ID'
Title.Caption = #24037#21495
Width = 100
Visible = True
end
item
Expanded = False
FieldName = #20027#26426#21517
Title.Caption = #20027#26426#21517#31216
Width = 100
Visible = True
end
item
Expanded = False
FieldName = #36830#25509' ID'
Visible = True
end
item
Expanded = False
FieldName = #31354#38386#26102#38388
Visible = True
end
item
Expanded = False
FieldName = #24212#29992#31243#24207#21517#31216
Width = 300
Visible = True
end
item
Expanded = False
FieldName = #25968#25454#24211#21517#31216
Width = 100
Visible = True
end
item
Expanded = False
FieldName = #31561#24453#26102#38388' (ms)'
Title.Caption = #31561#24453#26102#38388
Visible = True
end
item
Expanded = False
FieldName = #30331#24405#31867#22411
Title.Caption = #30331#38470#31867#22411
Visible = True
end>
end
end
object TabSheet4: TTabSheet
Caption = #36229#26102#20840#37096#25130#26029
ImageIndex = 3
object DBGrid4: TDBGrid
Left = 0
Top = 0
Width = 954
Height = 338
Align = alClient
DataSource = dm.ds4
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #36830#25509' ID'
Width = 150
Visible = True
end>
end
end
end
object Panel3: TPanel
Left = 2
Top = 99
Width = 63
Height = 366
Align = alLeft
AutoSize = True
BevelInner = bvLowered
TabOrder = 2
object RarBar1: TRarBar
Left = 2
Top = 26
Width = 59
Height = 341
LineColor = 16769248
TopColor = 16744576
SideColor1 = 14706792
SideColor2 = 16744576
EmptyColor1 = 12609640
EmptyColor2 = 14647424
EmptyFrameColor1 = 10512488
EmptyFrameColor2 = 12550272
BottomFrameColor = 6570124
BottomColor = 8011916
FilledFrameColor = 8413344
FilledColor = 10510496
FilledSideColor1 = 8535190
FilledSideColor2 = 8931520
Min = 0
Max = 100
Progress = 0
Font.Charset = DEFAULT_CHARSET
Font.Color = clPurple
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ShowPercentage = True
Color = clBtnFace
end
object Label11: TLabel
Left = 9
Top = 8
Width = 48
Height = 13
AutoSize = False
Caption = #36893#21435#26102#38388
end
end
end
object Timer1: TTimer
Enabled = False
OnTimer = Timer1Timer
Left = 770
Top = 82
end
object RvProject1: TRvProject
Left = 842
Top = 82
end
object RvRenderPDF1: TRvRenderPDF
DisplayName = 'Adobe Acrobat (PDF)'
FileExtension = '*.pdf'
EmbedFonts = False
ImageQuality = 90
MetafileDPI = 300
FontEncoding = feWinAnsiEncoding
DocInfo.Creator = 'Rave (http://www.nevrona.com/rave)'
DocInfo.Producer = 'Nevrona Designs'
Left = 890
Top = 82
end
object RvRenderHTML1: TRvRenderHTML
DisplayName = 'Web Page (HTML)'
FileExtension = '*.html;*.htm'
ServerMode = False
Left = 922
Top = 82
end
object RvRenderText1: TRvRenderText
DisplayName = 'Plain Text (TXT)'
FileExtension = '*.txt'
CPI = 10.000000000000000000
LPI = 6.000000000000000000
Left = 954
Top = 82
end
object RvDataSetConnection1: TRvDataSetConnection
RuntimeVisibility = rtDeveloper
DataSet = dm.ADOQ2
Left = 802
Top = 82
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -