📄 unit1.dfm
字号:
Top = 16
Width = 77
Height = 16
Caption = #22635#31354#65288'1'#65289
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 288
Top = 80
Width = 77
Height = 16
Caption = #22635#31354#65288'2'#65289
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 288
Top = 136
Width = 77
Height = 16
Caption = #22635#31354#65288'3'#65289
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 288
Top = 200
Width = 77
Height = 16
Caption = #22635#31354#65288'4'#65289
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object DBMemo3: TDBMemo
Left = 8
Top = 8
Width = 249
Height = 281
DataField = #39064#30446
DataSource = F_DataSource
ScrollBars = ssBoth
TabOrder = 0
end
object DBEdit1: TDBEdit
Left = 312
Top = 40
Width = 209
Height = 21
DataField = #31572#26696'1'
DataSource = F_Answer_DataSource
TabOrder = 1
end
object DBEdit2: TDBEdit
Left = 312
Top = 104
Width = 209
Height = 21
DataField = #31572#26696'2'
DataSource = F_Answer_DataSource
TabOrder = 2
end
object DBEdit3: TDBEdit
Left = 312
Top = 160
Width = 209
Height = 21
DataField = #31572#26696'3'
DataSource = F_Answer_DataSource
TabOrder = 3
end
object DBEdit4: TDBEdit
Left = 312
Top = 224
Width = 209
Height = 21
DataField = #31572#26696'4'
DataSource = F_Answer_DataSource
TabOrder = 4
end
object Memo2: TMemo
Left = 288
Top = 264
Width = 281
Height = 41
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
Lines.Strings = (
#35831#25353#39064#20013#23545#24212#30340#32534#21495#22635#31354)
ParentFont = False
TabOrder = 5
end
object DBNavigator3: TDBNavigator
Left = 8
Top = 296
Width = 248
Height = 41
DataSource = F_Answer_DataSource
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
TabOrder = 6
OnClick = DBNavigator3Click
end
end
object P_TabSheet: TTabSheet
Caption = #32534#31243#39064
ImageIndex = 4
TabVisible = False
OnExit = P_TabsheetExit
object Label8: TLabel
Left = 8
Top = 0
Width = 43
Height = 16
Caption = #39064' '#30446
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 304
Top = 0
Width = 43
Height = 16
Caption = #31243' '#24207
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object DBMemo4: TDBMemo
Left = 8
Top = 16
Width = 249
Height = 281
DataField = #39064#30446
DataSource = P_DataSource
ScrollBars = ssBoth
TabOrder = 0
end
object chengxu_xianshi: TMemo
Left = 320
Top = 16
Width = 241
Height = 241
Lines.Strings = (
'Memo3')
ScrollBars = ssBoth
TabOrder = 1
end
object DBNavigator2: TDBNavigator
Left = 8
Top = 304
Width = 231
Height = 33
DataSource = P_Answer_DataSource
VisibleButtons = [nbFirst, nbPrior, nbNext]
TabOrder = 2
OnClick = DBNavigator2Click
end
object biancheng: TButton
Left = 240
Top = 304
Width = 89
Height = 33
Caption = #32534#31243'/'#20462#25913
TabOrder = 3
end
end
end
object C_ClientDataSet: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'c_DataSetProvider1'
RemoteServer = SocketConnection1
Left = 100
Top = 13
end
object C_DataSource: TDataSource
DataSet = C_ClientDataSet
Left = 132
Top = 13
end
object J_ClientDataSet: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'J_DataSetProvider1'
RemoteServer = SocketConnection1
Left = 212
Top = 5
end
object J_DataSource: TDataSource
DataSet = J_ClientDataSet
Left = 244
Top = 5
end
object F_ClientDataSet: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'F_DataSetProvider2'
RemoteServer = SocketConnection1
Left = 372
Top = 13
end
object F_DataSource: TDataSource
DataSet = F_ClientDataSet
Left = 404
Top = 13
end
object P_ClientDataSet: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'P_DataSetProvider3'
RemoteServer = SocketConnection1
Left = 496
Top = 8
end
object P_DataSource: TDataSource
DataSet = P_ClientDataSet
Left = 528
Top = 8
end
object SocketConnection1: TSocketConnection
Connected = True
ServerGUID = '{11D5CE7D-9819-4A0E-A02A-4DFCA09B6C92}'
ServerName = 'App_prj.mylunwen'
ObjectBroker = ruocongSimpleObjectBroker1
Top = 8
end
object tempTable: TTable
Left = 40
Top = 8
end
object tempQuery: TQuery
DatabaseName = 'P_test'
Left = 344
Top = 16
end
object ruocongSimpleObjectBroker1: TSimpleObjectBroker
Servers = <
item
ComputerName = 'zqy'
end>
Left = 440
Top = 16
end
object C_Answer: TTable
TableName = 'C_Answer.DB'
Left = 128
Top = 392
end
object J_Answer: TTable
TableName = 'J_Answer.DB'
Left = 240
Top = 392
end
object F_Answer: TTable
TableName = 'F_Answer.DB'
Left = 336
Top = 368
end
object P_Answer: TTable
TableName = 'P_Answer.DB'
Left = 464
Top = 392
end
object C_Answer_DataSource: TDataSource
DataSet = C_Answer
Left = 176
Top = 392
end
object J_Answer_DataSource: TDataSource
DataSet = J_Answer
Left = 312
Top = 392
end
object F_Answer_DataSource: TDataSource
DataSet = F_Answer
Left = 428
Top = 365
end
object P_Answer_DataSource: TDataSource
DataSet = P_Answer
Left = 544
Top = 392
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -