unit17.dfm.~2~
来自「delphi2009 部分中文资料,源程序等」· ~2~ 代码 · 共 62 行
~2~
62 行
object Form17: TForm17
Left = 0
Top = 0
Caption = 'Form17'
ClientHeight = 365
ClientWidth = 618
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object TIBURONBLACKFISHDEMODB: TSQLConnection
ConnectionName = 'TIBURONBLACKFISHDEMODB'
DriverName = 'BLACKFISHSQL'
LoginPrompt = False
Params.Strings = (
'drivername=BLACKFISHSQL'
'password=masterkey'
'user_name=sysdba'
'port=2508'
'create=False'
'readonlydb=False'
'Database=F:\Tiburon\Data\TiburonDemoDBBF.jds'
'HostName=localhost')
Connected = True
Left = 34
Top = 10
end
object UNICODEDEMOTABLE: TSQLDataSet
CommandText = 'UNICODEDEMOTABLE'
CommandType = ctTable
DbxCommandType = 'Dbx.Table'
MaxBlobSize = -1
Params = <>
SQLConnection = TIBURONBLACKFISHDEMODB
Left = 149
Top = 13
end
object DataSetProvider1: TDataSetProvider
DataSet = UNICODEDEMOTABLE
Left = 264
Top = 16
end
object ClientDataSet1: TClientDataSet
Active = True
Aggregates = <>
Params = <>
ProviderName = 'DataSetProvider1'
Left = 384
Top = 16
end
object DataSource1: TDataSource
DataSet = ClientDataSet1
Left = 480
Top = 16
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?