📄 ruku.~dfm
字号:
object FormRuku: TFormRuku
Left = -4
Top = -4
BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
BorderStyle = bsSingle
Caption = #20837#24211#31649#29702
ClientHeight = 534
ClientWidth = 800
Color = clActiveBorder
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
OldCreateOrder = False
DesignSize = (
800
534)
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 797
Height = 529
ActivePage = TabSheet1
Anchors = [akLeft, akTop, akRight, akBottom]
TabOrder = 0
object TabSheet1: TTabSheet
Caption = #20837#24211
DesignSize = (
789
501)
object Label1: TLabel
Left = 0
Top = 48
Width = 66
Height = 13
Caption = #20837#24211#31867#21035' '
end
object Label2: TLabel
Left = 8
Top = 88
Width = 39
Height = 13
Caption = #26465#30721' '
end
object Label3: TLabel
Left = 8
Top = 128
Width = 51
Height = 13
Caption = #20379#24212#21830' '
end
object Label4: TLabel
Left = 256
Top = 40
Width = 39
Height = 13
Caption = #21333#20215' '
end
object Label5: TLabel
Left = 256
Top = 80
Width = 42
Height = 13
Caption = #25968#37327' '
end
object Label6: TLabel
Left = 256
Top = 120
Width = 36
Height = 13
Caption = #21333#20301' '
end
object Label7: TLabel
Left = 256
Top = 160
Width = 39
Height = 13
Caption = #22791#27880' '
end
object Label8: TLabel
Left = 480
Top = 40
Width = 69
Height = 13
Caption = #20837#24211#26102#38388' '
end
object Label9: TLabel
Left = 488
Top = 80
Width = 51
Height = 13
Caption = #32463#21150#20154' '
end
object Label10: TLabel
Left = 488
Top = 120
Width = 45
Height = 13
Caption = #20179#20301' '
end
object Label11: TLabel
Left = 488
Top = 160
Width = 48
Height = 13
Caption = #36135#20301' '
end
object Label12: TLabel
Left = 8
Top = 152
Width = 36
Height = 13
Caption = #21697#21517' '
end
object Button1: TButton
Left = 160
Top = 192
Width = 81
Height = 25
Caption = #20837#24211
TabOrder = 0
OnClick = Button1Click
end
object StringGrid1: TStringGrid
Left = 8
Top = 232
Width = 773
Height = 265
Anchors = [akLeft, akTop, akRight, akBottom]
Color = 16382457
ColCount = 13
Ctl3D = False
RowCount = 100
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goDrawFocusSelected, goEditing]
ParentCtl3D = False
TabOrder = 1
OnMouseDown = StringGrid1MouseDown
OnSelectCell = StringGrid1SelectCell
ColWidths = (
64
117
128
129
99
64
64
64
64
64
64
64
64)
RowHeights = (
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24)
end
object Button8: TButton
Left = 80
Top = 192
Width = 73
Height = 25
Caption = #25552#21462#20449#24687
TabOrder = 2
OnClick = Button8Click
end
object Memo1: TMemo
Left = 608
Top = 0
Width = 169
Height = 33
Lines.Strings = (
'Mem'
'o1')
TabOrder = 3
Visible = False
end
object DBEdit1: TDBEdit
Left = 88
Top = 80
Width = 137
Height = 21
DataField = #26465#30721
DataSource = DataSource1
TabOrder = 4
end
object DBComboBox1: TDBComboBox
Left = 88
Top = 40
Width = 137
Height = 21
DataField = #20837#24211#31867#21035
DataSource = DataSource1
ItemHeight = 13
TabOrder = 5
end
object DBEdit2: TDBEdit
Left = 88
Top = 120
Width = 137
Height = 21
DataField = #20379#24212#21830
DataSource = DataSource1
TabOrder = 6
end
object DBEdit3: TDBEdit
Left = 336
Top = 40
Width = 129
Height = 21
DataField = #21333#20215
DataSource = DataSource1
TabOrder = 7
end
object DBEdit4: TDBEdit
Left = 336
Top = 80
Width = 129
Height = 21
DataSource = DataSource1
TabOrder = 8
end
object DBEdit5: TDBEdit
Left = 336
Top = 120
Width = 129
Height = 21
DataField = #21333#20301
DataSource = DataSource1
TabOrder = 9
end
object DBEdit6: TDBEdit
Left = 568
Top = 40
Width = 137
Height = 21
DataField = #20837#24211#26102#38388
DataSource = DataSource1
TabOrder = 10
end
object DBEdit7: TDBEdit
Left = 568
Top = 80
Width = 137
Height = 21
DataField = #32463#21150#20154
DataSource = DataSource1
TabOrder = 11
end
object DBEdit8: TDBEdit
Left = 568
Top = 120
Width = 137
Height = 21
DataField = #20179#20301
DataSource = DataSource1
TabOrder = 12
end
object DBEdit9: TDBEdit
Left = 88
Top = 152
Width = 137
Height = 21
DataField = #36135#29289#21517#31216
DataSource = DataSource1
TabOrder = 13
end
object DateTimePicker2: TDateTimePicker
Left = 568
Top = 40
Width = 137
Height = 21
Date = 38586.392756099550000000
Time = 38586.392756099550000000
TabOrder = 14
end
object DBEdit10: TDBEdit
Left = 336
Top = 152
Width = 129
Height = 21
DataField = #22791#27880
DataSource = DataSource1
TabOrder = 15
end
object DBEdit11: TDBEdit
Left = 568
Top = 152
Width = 137
Height = 21
DataField = #36135#20301
DataSource = DataSource1
TabOrder = 16
end
end
object TabSheet4: TTabSheet
Caption = #20837#24211#26597#35810
ImageIndex = 3
DesignSize = (
789
501)
object Edit3: TEdit
Left = 16
Top = 16
Width = 113
Height = 21
TabOrder = 0
Text = #25353#20135#21697#21517#31216#26597#35810
end
object Button2: TButton
Left = 152
Top = 16
Width = 81
Height = 25
Caption = #26597#35810
TabOrder = 1
OnClick = Button2Click
end
object Button3: TButton
Left = 488
Top = 16
Width = 57
Height = 25
Caption = #26597#35810
TabOrder = 2
OnClick = Button3Click
end
object Button4: TButton
Left = 152
Top = 64
Width = 81
Height = 25
Caption = #26597#35810
TabOrder = 3
OnClick = Button4Click
end
object Edit6: TEdit
Left = 336
Top = 64
Width = 105
Height = 21
TabOrder = 4
Text = #25353#20379#24212#21830#26597#35810
end
object Button5: TButton
Left = 488
Top = 64
Width = 57
Height = 25
Caption = #26597#35810
TabOrder = 5
OnClick = Button5Click
end
object ComboBox1: TComboBox
Left = 16
Top = 64
Width = 121
Height = 21
ItemHeight = 13
TabOrder = 6
Text = #25353#32463#21150#20154#26597#35810
end
object DBGrid2: TDBGrid
Left = 8
Top = 136
Width = 773
Height = 353
Anchors = [akLeft, akTop, akRight, akBottom]
DataSource = DataSource2
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
TabOrder = 7
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object DateTimePicker1: TDateTimePicker
Left = 336
Top = 16
Width = 106
Height = 21
Date = 38581.652692523140000000
Time = 38581.652692523140000000
TabOrder = 8
end
object Panel1: TPanel
Left = 8
Top = 104
Width = 773
Height = 33
Anchors = [akLeft, akTop, akRight]
Caption = 'Panel1'
TabOrder = 9
object ToolBar1: TToolBar
Left = 1
Top = 1
Width = 771
Height = 29
ButtonHeight = 21
ButtonWidth = 43
Caption = 'ToolBar1'
ShowCaptions = True
TabOrder = 0
object ToolButton5: TToolButton
Left = 0
Top = 2
Caption = #27983#35272
ImageIndex = 4
OnClick = ToolButton5Click
end
object ToolButton1: TToolButton
Left = 43
Top = 2
Caption = #39318#35760#24405
ImageIndex = 0
OnClick = ToolButton1Click
end
object ToolButton2: TToolButton
Left = 86
Top = 2
Caption = #19978#19968#26465
ImageIndex = 1
OnClick = ToolButton2Click
end
object ToolButton3: TToolButton
Left = 129
Top = 2
Caption = #19979#19968#26465
ImageIndex = 2
OnClick = ToolButton3Click
end
object ToolButton4: TToolButton
Left = 172
Top = 2
Caption = #26411#35760#24405
ImageIndex = 3
OnClick = ToolButton4Click
end
end
end
end
end
object MainMenu1: TMainMenu
Left = 352
object Q1: TMenuItem
Caption = #36864#20986'(&Q)'
OnClick = Q1Click
end
object H1: TMenuItem
Caption = #24110#21161'(&H)'
end
object G1: TMenuItem
Caption = #20851#20110'(&G)'
end
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 468
Top = 24
end
object ADOQuery1: TADOQuery
Active = True
ConnectionString =
'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
'fo=False;Initial Catalog=ckgl;Data Source=PYJ\PYJ2000'
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select '#20837#24211#31867#21035','#26465#30721','#36135#29289#21517#31216','#21333#20215','#21333#20301','#22791#27880','#20837#24211#26102#38388','#32463#21150#20154','#20379#24212#21830','#20179#20301','#36135#20301' from product_lis' +
't;')
Left = 436
Top = 24
end
object DataSource2: TDataSource
DataSet = ADOQuery2
Left = 292
Top = 16
end
object ADOQuery2: TADOQuery
Connection = DataModule1.ADOConnection1
Parameters = <>
Left = 268
Top = 16
end
object ADOQuery3: TADOQuery
Connection = DataModule1.ADOConnection1
Parameters = <>
Left = 132
Top = 24
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -