📄 umain.dfm
字号:
object fMain: TfMain
Left = 249
Top = 171
Width = 509
Height = 411
Caption = 'Absolute Database Import / Export Tool'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object nbWizard: TNotebook
Left = 0
Top = 0
Width = 501
Height = 308
Align = alClient
PageIndex = 5
TabOrder = 0
object TPage
Left = 0
Top = 0
Caption = 'Start'
object Label1: TLabel
Left = 91
Top = 48
Width = 343
Height = 41
AutoSize = False
Caption =
'Please, choose an action to proceed. If you are going to import ' +
'data from MS Access or MS SQL Server, please make sure that ODBC' +
' source connected to the source database exists.'
WordWrap = True
end
object rgImportExport: TRadioGroup
Left = 91
Top = 120
Width = 321
Height = 73
Caption = 'Choose Import or Export: '
ItemIndex = 0
Items.Strings = (
'Import tables from BDE / ODBC'
'Export tables to BDE')
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'ImportSource'
object Label2: TLabel
Left = 120
Top = 40
Width = 233
Height = 25
AutoSize = False
WordWrap = True
end
object Label3: TLabel
Left = 112
Top = 40
Width = 165
Height = 13
Caption = 'Please select the source for import:'
end
object rgImportSource: TRadioGroup
Left = 104
Top = 80
Width = 273
Height = 105
Caption = 'Import Source:'
ItemIndex = 0
Items.Strings = (
'Import using BDE Alias / ODBC DSN'
'Import from folder (Paradox, DBase)')
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'ImportFromAlias'
object Label4: TLabel
Left = 16
Top = 32
Width = 68
Height = 13
Caption = 'Import Aliases:'
end
object Label5: TLabel
Left = 186
Top = 32
Width = 107
Height = 13
Caption = 'Select tables to import:'
end
object lbImportAliases: TListBox
Left = 16
Top = 56
Width = 145
Height = 225
ItemHeight = 13
TabOrder = 0
OnClick = lbImportAliasesClick
end
object lbImportAliasTables: TListBox
Left = 186
Top = 56
Width = 281
Height = 225
ItemHeight = 13
MultiSelect = True
TabOrder = 1
OnClick = lbImportAliasTablesClick
end
end
object TPage
Left = 0
Top = 0
Caption = 'ImportFromFolder'
object Label6: TLabel
Left = 24
Top = 32
Width = 61
Height = 13
Caption = 'Import folder:'
end
object Label7: TLabel
Left = 200
Top = 32
Width = 107
Height = 13
Caption = 'Select tables to import:'
end
object DriveComboBox1: TDriveComboBox
Left = 24
Top = 56
Width = 145
Height = 19
DirList = dlbImport
TabOrder = 0
end
object dlbImport: TDirectoryListBox
Left = 24
Top = 88
Width = 145
Height = 201
ItemHeight = 16
TabOrder = 1
OnChange = dlbImportChange
end
object lbImportFolderTables: TListBox
Left = 200
Top = 56
Width = 257
Height = 233
ItemHeight = 13
MultiSelect = True
TabOrder = 2
OnClick = lbImportFolderTablesClick
end
end
object TPage
Left = 0
Top = 0
Caption = 'ImportDestinationDB'
object Label8: TLabel
Left = 16
Top = 56
Width = 224
Height = 13
Caption = 'Select new or existing database file to import to:'
end
object edImportDestDB: TEdit
Left = 16
Top = 80
Width = 305
Height = 21
TabOrder = 0
Text = 'dest.abs'
end
object btBrowseImportDestinationDB: TButton
Left = 328
Top = 80
Width = 25
Height = 25
Caption = '...'
TabOrder = 1
OnClick = btBrowseImportDestinationDBClick
end
end
object TPage
Left = 0
Top = 0
Caption = 'ImportProcess'
object Label9: TLabel
Left = 24
Top = 88
Width = 67
Height = 13
Caption = 'Import Details:'
end
object Label14: TLabel
Left = 24
Top = 41
Width = 76
Height = 13
Caption = 'Importing Table:'
end
object Label15: TLabel
Left = 24
Top = 65
Width = 68
Height = 13
Caption = 'Overall Import:'
end
object gTableImport: TGauge
Left = 112
Top = 39
Width = 169
Height = 17
Progress = 0
end
object gOverallImport: TGauge
Left = 112
Top = 64
Width = 169
Height = 17
Progress = 0
end
object lImportTable: TLabel
Left = 24
Top = 19
Width = 81
Height = 13
Caption = 'Importing table ...'
end
object mImportDetails: TMemo
Left = 24
Top = 112
Width = 385
Height = 177
ScrollBars = ssBoth
TabOrder = 0
end
object btStopImport: TButton
Left = 291
Top = 47
Width = 75
Height = 25
Caption = 'Stop'
TabOrder = 1
OnClick = btStopImportClick
end
end
object TPage
Left = 0
Top = 0
Caption = 'ExportSourceDB'
object Label10: TLabel
Left = 16
Top = 32
Width = 202
Height = 13
Caption = 'Select Absolute DB database file to export:'
end
object edExportedDB: TEdit
Left = 16
Top = 56
Width = 345
Height = 21
TabOrder = 0
end
object btSelectDBToExport: TButton
Left = 368
Top = 56
Width = 25
Height = 25
Caption = '...'
TabOrder = 1
OnClick = btSelectDBToExportClick
end
end
object TPage
Left = 0
Top = 0
Caption = 'ExportTables'
object Label11: TLabel
Left = 24
Top = 24
Width = 108
Height = 13
Caption = 'Select tables to export:'
end
object lbExportTables: TListBox
Left = 24
Top = 48
Width = 385
Height = 193
ItemHeight = 13
MultiSelect = True
TabOrder = 0
OnClick = lbExportTablesClick
end
end
object TPage
Left = 0
Top = 0
Caption = 'ExportDest'
object Label12: TLabel
Left = 16
Top = 16
Width = 206
Height = 13
Caption = 'Select BDE Alias / ODBC DSN to export to:'
end
object lbExportAlias: TListBox
Left = 16
Top = 40
Width = 241
Height = 241
ItemHeight = 13
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'ExportProcess'
object Label13: TLabel
Left = 16
Top = 88
Width = 68
Height = 13
Caption = 'Export Details:'
end
object lExportTable: TLabel
Left = 16
Top = 12
Width = 82
Height = 13
Caption = 'Exporting table ...'
end
object Label17: TLabel
Left = 16
Top = 34
Width = 77
Height = 13
Caption = 'Exporting Table:'
end
object Label18: TLabel
Left = 17
Top = 55
Width = 69
Height = 13
Caption = 'Export Overall:'
end
object gTableExport: TGauge
Left = 96
Top = 33
Width = 203
Height = 17
Progress = 0
end
object gOverallExport: TGauge
Left = 96
Top = 54
Width = 203
Height = 17
Progress = 0
end
object mExportDetails: TMemo
Left = 16
Top = 112
Width = 337
Height = 185
ScrollBars = ssBoth
TabOrder = 0
end
object btStopExport: TButton
Left = 312
Top = 40
Width = 75
Height = 25
Caption = 'Stop'
TabOrder = 1
OnClick = btStopExportClick
end
end
end
object Panel1: TPanel
Left = 0
Top = 308
Width = 501
Height = 75
Align = alBottom
TabOrder = 1
object btBack: TButton
Left = 112
Top = 29
Width = 75
Height = 25
Caption = '< Back'
Enabled = False
TabOrder = 0
OnClick = btBackClick
end
object btNext: TButton
Left = 208
Top = 29
Width = 75
Height = 25
Caption = 'Next >'
TabOrder = 1
OnClick = btNextClick
end
object btCancel: TButton
Left = 304
Top = 29
Width = 75
Height = 25
Cancel = True
Caption = 'Cancel'
TabOrder = 2
OnClick = btCancelClick
end
end
object odAbsDb: TOpenDialog
DefaultExt = '*.abs'
Filter = '*.abs||*.*'
Left = 400
Top = 336
end
object ABSDb: TABSDatabase
CurrentVersion = '4.88 '
DatabaseName = 'Db'
Exclusive = False
MaxConnections = 500
MultiUser = False
SessionName = 'Default'
Left = 8
Top = 316
end
object ABSTable: TABSTable
CurrentVersion = '4.88 '
DatabaseName = 'Db'
InMemory = False
ReadOnly = False
Exclusive = False
BeforeImport = ABSTableBeforeImport
OnImportProgress = ABSTableImportProgress
BeforeExport = ABSTableBeforeExport
OnExportProgress = ABSTableExportProgress
AfterExport = ABSTableAfterExport
Left = 40
Top = 316
end
object Table: TTable
Left = 8
Top = 350
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -