Ai
1 Star 0 Fork 52

amtech/ezdml

forked from huzgd/ezdml 
加入 Gitee
与超过 1200万 开发者一起发现、参与优秀开源项目,私有仓库也完全免费 :)
免费加入
文件
克隆/下载
wSettings.lfm 41.54 KB
一键复制 编辑 原始数据 按行查看 历史
huzgd 提交于 2022-11-20 17:07 +08:00 . v3.47
12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553
object frmSettings: TfrmSettings
Left = 436
Height = 687
Top = 208
Width = 544
BorderStyle = bsDialog
Caption = 'Settings'
ClientHeight = 687
ClientWidth = 544
OnCreate = FormCreate
OnShow = FormShow
ParentFont = True
Position = poMainFormCenter
LCLVersion = '2.0.12.0'
object Panel1: TPanel
Left = 0
Height = 36
Top = 651
Width = 544
Align = alBottom
AutoSize = True
BevelOuter = bvNone
BorderWidth = 4
ClientHeight = 36
ClientWidth = 544
TabOrder = 0
object btnOk: TButton
Left = 397
Height = 27
Top = 4
Width = 44
Anchors = [akTop, akRight]
AutoSize = True
Caption = 'OK'
ModalResult = 1
TabOrder = 0
end
object btnCancel: TButton
Left = 469
Height = 27
Top = 4
Width = 64
Anchors = [akTop, akRight]
AutoSize = True
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 1
end
object Label1: TLabel
Left = 4
Height = 17
Top = 15
Width = 4
Caption = ' '
ParentColor = False
end
end
object PageControlMain: TPageControl
Left = 0
Height = 651
Top = 0
Width = 544
ActivePage = tabshtSQL
Align = alClient
TabIndex = 2
TabOrder = 1
object tabshtGeneral: TTabSheet
Caption = 'General'
ClientHeight = 621
ClientWidth = 536
object PanelGen1: TPanel
Left = 0
Height = 621
Top = 0
Width = 536
Align = alClient
BevelOuter = bvNone
BorderWidth = 8
ClientHeight = 621
ClientWidth = 536
TabOrder = 0
object GroupBoxUI: TGroupBox
Left = 8
Height = 96
Top = 8
Width = 520
Align = alTop
Caption = 'User interface'
ClientHeight = 74
ClientWidth = 516
TabOrder = 0
object lbLanguage: TLabel
Left = 24
Height = 17
Top = 8
Width = 60
Caption = 'Language:'
ParentColor = False
end
object lbLanguageTip: TLabel
Left = 276
Height = 17
Top = 8
Width = 157
Caption = '(need restart, empty=auto)'
ParentColor = False
end
object combLANG: TComboBox
Left = 140
Height = 25
Top = 8
Width = 128
DropDownCount = 24
ItemHeight = 17
TabOrder = 0
end
object ckbCheckForUpdates: TCheckBox
Left = 24
Height = 21
Top = 44
Width = 299
Caption = 'Auto check for updates on exit (once per week)'
TabOrder = 1
end
end
object BevelGen1: TBevel
Left = 8
Height = 10
Top = 216
Width = 520
Align = alTop
Shape = bsSpacer
end
object GroupBoxAutoSave: TGroupBox
Left = 8
Height = 204
Top = 226
Width = 520
Align = alTop
AutoSize = True
Caption = 'Auto save'
ClientHeight = 182
ClientWidth = 516
TabOrder = 1
object edtAutoSaveMinutes: TEdit
Left = 140
Height = 25
Top = 8
Width = 128
TabOrder = 0
end
object lbAutoSaveMinutes: TLabel
Left = 24
Height = 17
Top = 8
Width = 77
Caption = 'Time interval:'
ParentColor = False
end
object lbAutoSaveMinutesTail: TLabel
Left = 276
Height = 17
Top = 8
Width = 137
Caption = 'minutes, 0 means never'
ParentColor = False
end
object ckbSaveTempFileOnExit: TCheckBox
Left = 24
Height = 21
Top = 48
Width = 178
Caption = 'Save temporary file on exit'
TabOrder = 1
end
object LabelLayoutSpacer1: TLabel
Left = 0
Height = 17
Top = 0
Width = 4
Caption = ' '
ParentColor = False
end
object lbAutoSaveTip: TLabel
Left = 24
Height = 102
Top = 80
Width = 480
Anchors = [akTop, akLeft, akRight]
Caption = 'Usually, when current opened file is modified, the system will save it to temporary directory at specified intervals. You can find these files by choose "File|Show Temporary File" from main menu.'#13#10'Also, when closing the program, EZDML may save current file to temporary folder, and try to load it from temporary folder when opening, just like that it''s never been closed before.'
ParentColor = False
WordWrap = True
end
end
object Bevel1: TBevel
Left = 8
Height = 10
Top = 430
Width = 520
Align = alTop
Shape = bsSpacer
end
object GroupBoxHugeMode: TGroupBox
Left = 8
Height = 121
Top = 440
Width = 520
Align = alTop
AutoSize = True
Caption = 'Huge mode'
ClientHeight = 99
ClientWidth = 516
TabOrder = 2
object lbHugeModeTableCountTip: TLabel
Left = 24
Height = 51
Top = 48
Width = 480
Anchors = [akTop, akLeft, akRight]
Caption = 'When table count reaches the threshold, the Huge-Mode will be turned on, the system stops automatically saving temporary files, and adopts fast layout algorithms for model diagrams.'
ParentColor = False
WordWrap = True
end
object edtHugeModeTableCount: TEdit
Left = 140
Height = 25
Top = 8
Width = 128
TabOrder = 0
end
object lbHugeModeTableCount: TLabel
Left = 24
Height = 17
Top = 8
Width = 71
Caption = 'Table count:'
ParentColor = False
end
object LabelLayoutSpacer: TLabel
Left = 0
Height = 17
Top = 0
Width = 4
Caption = ' '
ParentColor = False
end
end
object BevelGen2: TBevel
Left = 8
Height = 10
Top = 104
Width = 520
Align = alTop
Shape = bsSpacer
end
object GroupBoxTbTabs: TGroupBox
Left = 8
Height = 102
Top = 114
Width = 520
Align = alTop
Caption = 'Table properties pages'
ClientHeight = 80
ClientWidth = 516
TabOrder = 3
object ckbEnableCustomPropUI: TCheckBox
Left = 140
Height = 21
Top = 40
Width = 66
Caption = 'Custom'
OnChange = ckbEnableCustomPropUIChange
TabOrder = 5
end
object ckbEnableTbPropUIDesign: TCheckBox
Left = 264
Height = 21
Top = 8
Width = 79
Caption = 'UI Design'
OnChange = ckbEnableCustomPropUIChange
TabOrder = 2
end
object ckbEnableAdvTbProp: TCheckBox
Left = 24
Height = 21
Top = 40
Width = 79
Caption = 'Advanced'
OnChange = ckbEnableCustomPropUIChange
TabOrder = 4
end
object ckbEnableTbPropData: TCheckBox
Left = 388
Height = 21
Top = 8
Width = 49
Caption = 'Data'
OnChange = ckbEnableCustomPropUIChange
TabOrder = 3
end
object ckbEnableTbPropGenerate: TCheckBox
Left = 140
Height = 21
Top = 8
Width = 75
Caption = 'Generate'
OnChange = ckbEnableCustomPropUIChange
TabOrder = 1
end
object edtCustomPropUICaption: TEdit
Left = 232
Height = 25
Top = 38
Width = 130
TabOrder = 6
TextHint = 'Custom page title'
end
object ckbEnableTbPropRelations: TCheckBox
Left = 24
Height = 21
Top = 8
Width = 75
Caption = 'Relations'
OnChange = ckbEnableCustomPropUIChange
TabOrder = 0
end
end
end
end
object tabshtDisplay: TTabSheet
Caption = 'Display'
ClientHeight = 621
ClientWidth = 536
object PanelDisp: TPanel
Left = 0
Height = 621
Top = 0
Width = 536
Align = alClient
BevelOuter = bvNone
BorderWidth = 8
ClientHeight = 621
ClientWidth = 536
TabOrder = 0
object GroupBoxBaseFont: TGroupBox
Left = 8
Height = 72
Top = 35
Width = 520
Align = alTop
Caption = 'Base font'
ClientHeight = 50
ClientWidth = 516
TabOrder = 0
object lbBaseFontName: TLabel
Left = 24
Height = 17
Top = 8
Width = 38
Caption = 'Name:'
ParentColor = False
end
object edtAppDefFontName: TComboBox
Left = 104
Height = 25
Top = 8
Width = 128
DropDownCount = 24
ItemHeight = 17
TabOrder = 0
end
object edtAppDefFontSize: TEdit
Left = 360
Height = 25
Top = 8
Width = 128
TabOrder = 1
end
object lbBaseFontSize: TLabel
Left = 280
Height = 17
Top = 8
Width = 26
Caption = 'Size:'
ParentColor = False
end
end
object Bevel6: TBevel
Left = 8
Height = 10
Top = 107
Width = 520
Align = alTop
Shape = bsSpacer
end
object GroupBoxMonoFont: TGroupBox
Left = 8
Height = 70
Top = 117
Width = 520
Align = alTop
Caption = 'Monospaced font (for SQL and code)'
ClientHeight = 48
ClientWidth = 516
TabOrder = 1
object edtAppFixWidthFontSize: TEdit
Left = 360
Height = 25
Top = 8
Width = 128
TabOrder = 1
end
object lbMonoFontSize: TLabel
Left = 280
Height = 17
Top = 8
Width = 26
Caption = 'Size:'
ParentColor = False
end
object edtAppFixWidthFontName: TComboBox
Left = 104
Height = 25
Top = 8
Width = 128
DropDownCount = 24
ItemHeight = 17
TabOrder = 0
end
object lbMonoFontName: TLabel
Left = 24
Height = 17
Top = 8
Width = 38
Caption = 'Name:'
ParentColor = False
end
end
object Bevel7: TBevel
Left = 8
Height = 10
Top = 187
Width = 520
Align = alTop
Shape = bsSpacer
end
object GroupBoxDispDmlGraph: TGroupBox
Left = 8
Height = 235
Top = 197
Width = 520
Align = alTop
Caption = 'DML graph'
ClientHeight = 213
ClientWidth = 516
TabOrder = 2
object lbDmlFontName: TLabel
Left = 24
Height = 17
Top = 8
Width = 64
Caption = 'Font name:'
ParentColor = False
end
object edtDmlGraphFontName: TComboBox
Left = 104
Height = 25
Top = 40
Width = 128
DropDownCount = 24
ItemHeight = 17
TabOrder = 0
end
object lbDmlMaxTbFieldCount: TLabel
Left = 280
Height = 17
Top = 8
Width = 126
Caption = 'Max table field count:'
ParentColor = False
end
object edtTableFieldMaxDrawCount: TEdit
Left = 360
Height = 25
Top = 40
Width = 128
TabOrder = 1
end
object lbDmlMaxFieldNameSize: TLabel
Left = 24
Height = 17
Top = 88
Width = 136
Caption = 'Max size of field-name:'
ParentColor = False
end
object lbDmlMaxFieldTypeSize: TLabel
Left = 280
Height = 17
Top = 88
Width = 129
Caption = 'Max size of field-type:'
ParentColor = False
end
object edtFieldTypeMaxDrawSize: TEdit
Left = 360
Height = 25
Top = 120
Width = 128
TabOrder = 3
end
object edtFieldNameMaxDrawSize: TEdit
Left = 104
Height = 25
Top = 120
Width = 128
TabOrder = 2
end
object lbScreenDpiInfo: TLabel
Left = 24
Height = 17
Top = 168
Width = 66
Caption = 'Screen DPI:'
ParentColor = False
end
object edtScreenDpi: TEdit
Left = 104
Height = 25
Top = 168
Width = 128
ParentColor = True
ReadOnly = True
TabOrder = 4
end
end
object lbDispFontNote: TLabel
Left = 8
Height = 17
Top = 8
Width = 520
Align = alTop
Caption = 'Notes: You may need to restart the program after modifying fonts.'
ParentColor = False
WordWrap = True
end
object Bevel13: TBevel
Left = 8
Height = 10
Top = 25
Width = 520
Align = alTop
Shape = bsSpacer
end
end
end
object tabshtSQL: TTabSheet
Caption = 'SQL'
ClientHeight = 621
ClientWidth = 536
object PanelSQL: TPanel
Left = 0
Height = 621
Top = 0
Width = 536
Align = alClient
BevelOuter = bvNone
BorderWidth = 8
ClientHeight = 621
ClientWidth = 536
TabOrder = 0
object Bevel3: TBevel
Left = 8
Height = 10
Top = 208
Width = 520
Align = alTop
Shape = bsSpacer
end
object GroupBoxTableDataSQL: TGroupBox
Left = 8
Height = 105
Top = 218
Width = 520
Align = alTop
Caption = 'Preview table data'
ClientHeight = 83
ClientWidth = 516
TabOrder = 1
object edtMaxRowCountForTableData: TEdit
Left = 140
Height = 25
Top = 8
Width = 128
TabOrder = 0
end
object lbTableDataPreviewRows: TLabel
Left = 24
Height = 17
Top = 8
Width = 62
Caption = 'Rows limit:'
ParentColor = False
end
object ckbLogicNamesForTableData: TCheckBox
Left = 24
Height = 21
Top = 48
Width = 198
Caption = 'Use logic-names in select-SQL'
TabOrder = 1
end
end
object GroupBoxSQLGen: TGroupBox
Left = 8
Height = 200
Top = 8
Width = 520
Align = alTop
Caption = 'SQL Generate'
ClientHeight = 178
ClientWidth = 516
TabOrder = 0
object ckbQuotReservedNames: TCheckBox
Left = 24
Height = 21
Top = 8
Width = 148
Caption = 'Quot reserved names'
TabOrder = 0
end
object ckbBackupBeforeAlterColumn: TCheckBox
Left = 24
Height = 21
Top = 40
Width = 292
Caption = 'Generate backup SQL before altering columns'
TabOrder = 1
end
object ckbAddColCommentToCreateTbSql: TCheckBox
Left = 24
Height = 21
Top = 72
Width = 269
Caption = 'Add field-comments to table-creation-SQL'
TabOrder = 2
end
object ckbQuotAllNames: TCheckBox
Left = 232
Height = 21
Top = 8
Width = 110
Caption = 'Quot all names'
TabOrder = 3
end
object ckbCreateIndexForForeignkey: TCheckBox
Left = 232
Height = 21
Top = 136
Width = 205
Caption = 'Create indexes for foreign keys'
TabOrder = 5
end
object ckbCreateForeignkeys: TCheckBox
Left = 24
Height = 21
Top = 136
Width = 136
Caption = 'Create foreign keys'
TabOrder = 4
end
end
object GroupBoxSQLDbSpec: TGroupBox
Left = 8
Height = 137
Top = 333
Width = 520
Align = alTop
Caption = 'Spetial'
ClientHeight = 115
ClientWidth = 516
TabOrder = 2
object lbHiveVersion: TLabel
Left = 24
Height = 17
Top = 76
Width = 74
Caption = 'Hive version:'
ParentColor = False
end
object combHiveVersion: TComboBox
Left = 140
Height = 25
Top = 76
Width = 128
ItemHeight = 17
Items.Strings = (
'2'
'3'
)
TabOrder = 2
end
object ckbCreateSeqForOracle: TCheckBox
Left = 24
Height = 21
Top = 8
Width = 235
Caption = 'Create/check sequences for ORACLE'
TabOrder = 0
end
object combMysqlVersion: TComboBox
Left = 140
Height = 25
Top = 40
Width = 128
ItemHeight = 17
Items.Strings = (
'5'
'8'
)
TabOrder = 1
end
object lbMysqlVersion: TLabel
Left = 24
Height = 17
Top = 40
Width = 90
Caption = 'MySQL version:'
ParentColor = False
end
end
object Bevel19: TBevel
Left = 8
Height = 10
Top = 323
Width = 520
Align = alTop
Shape = bsSpacer
end
end
end
object tabshtFieldTypes: TTabSheet
Caption = 'Field Types'
ClientHeight = 621
ClientWidth = 536
object ScrollBoxFieldTypes: TScrollBox
Left = 0
Height = 621
Top = 0
Width = 536
HorzScrollBar.Page = 512
VertScrollBar.Page = 617
VertScrollBar.Tracking = True
Align = alClient
ClientHeight = 617
ClientWidth = 515
TabOrder = 0
object PanelFieldTypes: TPanel
Left = 0
Height = 1130
Top = 0
Width = 512
BevelOuter = bvNone
BorderWidth = 8
ClientHeight = 1130
ClientWidth = 512
TabOrder = 0
object GroupBoxCustomFldTypes: TGroupBox
Left = 8
Height = 280
Top = 375
Width = 496
Align = alTop
Caption = 'Custom field types'
ClientHeight = 258
ClientWidth = 492
TabOrder = 0
object ListBoxCustFldTps: TListBox
Left = 17
Height = 163
Top = 8
Width = 207
ItemHeight = 0
OnClick = ListBoxCustFldTpsClick
TabOrder = 0
end
object lbCustFldtpName: TLabel
Left = 248
Height = 17
Top = 8
Width = 38
Caption = 'Name:'
ParentColor = False
end
object edtCustFldtpName: TEdit
Left = 352
Height = 25
Hint = 'example: MyStr or MyTestType'
Top = 8
Width = 120
OnChange = edtCustFldtpNameChange
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
object edtCustFldtpPhyType: TEdit
Left = 352
Height = 25
Hint = 'example: NVARCHAR or CHAR(500) (default lengths can be specified)'
Top = 80
Width = 120
OnChange = edtCustFldtpNameChange
ParentShowHint = False
ShowHint = True
TabOrder = 2
end
object lbCustFldtpPhyType: TLabel
Left = 248
Height = 17
Top = 48
Width = 137
Caption = 'Physical type (optional):'
ParentColor = False
end
object btnCustFldtpNew: TButton
Left = 248
Height = 25
Top = 146
Width = 49
Caption = '+'
OnClick = btnCustFldtpNewClick
TabOrder = 3
end
object btnCustFldtpRemove: TButton
Left = 313
Height = 25
Top = 146
Width = 49
Caption = '-'
OnClick = btnCustFldtpRemoveClick
TabOrder = 4
end
object lbCustFldtpTip: TLabel
Left = 19
Height = 51
Top = 184
Width = 453
Anchors = [akTop, akLeft, akRight]
Caption = 'Custom field types will be listed after system types. When a custom type is set to a field (stored in data-type-name), EZDML will automatically match a system logic type to display its icon.'
ParentColor = False
WordWrap = True
end
end
object GroupBoxSysFldTypes: TGroupBox
Left = 8
Height = 330
Top = 35
Width = 496
Align = alTop
Caption = 'Custom physical types'
ClientHeight = 308
ClientWidth = 492
TabOrder = 1
object lbCustPhyTpTip: TLabel
Left = 16
Height = 34
Top = 268
Width = 453
Anchors = [akTop, akLeft, akRight]
Caption = 'You can define your own physical type for each logic type to replace the one recommended by the system.'
ParentColor = False
WordWrap = True
end
object PanelPhyCustTps: TPanel
Left = 19
Height = 223
Top = 13
Width = 454
BevelOuter = bvNone
ClientHeight = 223
ClientWidth = 454
TabOrder = 0
object ListBoxDefPhyTypes: TListBox
Left = 44
Height = 125
Top = 23
Width = 164
ItemHeight = 0
TabOrder = 0
Visible = False
end
end
object ckbBigIntForIntKeys: TCheckBox
Left = 19
Height = 21
Top = 236
Width = 234
Caption = 'User BIGINT for integer PK/FK fields'
TabOrder = 1
end
end
object Bevel10: TBevel
Left = 8
Height = 10
Top = 25
Width = 496
Align = alTop
Shape = bsSpacer
end
object Bevel11: TBevel
Left = 8
Height = 10
Top = 921
Width = 496
Align = alTop
Shape = bsSpacer
end
object GroupBoxTpNameReplaces: TGroupBox
Left = 8
Height = 256
Top = 665
Width = 496
Align = alTop
Caption = 'Type name replaces'
ClientHeight = 234
ClientWidth = 492
TabOrder = 2
object ListBoxTpNameReplaces: TListBox
Left = 17
Height = 163
Top = 8
Width = 207
ItemHeight = 0
OnClick = ListBoxTpNameReplacesClick
TabOrder = 0
end
object lbTpnRepPattern: TLabel
Left = 248
Height = 17
Top = 8
Width = 44
Caption = 'Pattern:'
ParentColor = False
end
object edtTpnRepPattern: TEdit
Left = 352
Height = 25
Hint = 'for example: VARCHAR2, VARCHAR2(4000), %RAW, %TEXT% (wildcard % can be used on left or right side)'
Top = 8
Width = 120
OnChange = edtTpnRepPatternChange
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
object edtTpnReplacement: TEdit
Left = 352
Height = 25
Hint = 'for example: NVARCHAR2, CHAR(200), BLOB, NCLOB'
Top = 48
Width = 120
OnChange = edtTpnRepPatternChange
ParentShowHint = False
ShowHint = True
TabOrder = 2
end
object lbTpnReplacement: TLabel
Left = 248
Height = 17
Top = 48
Width = 78
Caption = 'Replacement:'
ParentColor = False
end
object btnTpnRepNew: TButton
Left = 248
Height = 25
Top = 146
Width = 49
Caption = '+'
OnClick = btnTpnRepNewClick
TabOrder = 3
end
object btnTpnRepRemove: TButton
Left = 313
Height = 25
Top = 146
Width = 49
Caption = '-'
OnClick = btnTpnRepRemoveClick
TabOrder = 4
end
object lbTpnReplaceTip: TLabel
Left = 19
Height = 34
Top = 184
Width = 453
Anchors = [akTop, akLeft, akRight]
Caption = 'When generating SQL for any column, the physical data type name (with length) can be replaced as needed.'
ParentColor = False
WordWrap = True
end
end
object Bevel12: TBevel
Left = 8
Height = 10
Top = 365
Width = 496
Align = alTop
Shape = bsSpacer
end
object lbDBConnNote1: TLabel
Left = 8
Height = 17
Top = 8
Width = 496
Align = alTop
Caption = 'Notes: Leave blank to indicate the system default type.'
ParentColor = False
WordWrap = True
end
object GroupBoxFieldDataGenRules: TGroupBox
Left = 8
Height = 256
Top = 931
Width = 496
Align = alTop
Caption = 'Field data generate rules'
ClientHeight = 234
ClientWidth = 492
TabOrder = 3
object ListBoxFDGenRules: TListBox
Left = 17
Height = 163
Top = 8
Width = 207
ItemHeight = 0
OnClick = ListBoxFDGenRulesClick
TabOrder = 0
end
object lbTpnRepPattern1: TLabel
Left = 248
Height = 17
Top = 8
Width = 28
Caption = 'Rule:'
ParentColor = False
end
object edtFDGenRule: TEdit
Left = 352
Height = 25
Hint = 'for example: person_name'
Top = 8
Width = 120
OnChange = edtFDGenRuleChange
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
object edtFDGenNames: TEdit
Left = 352
Height = 25
Hint = 'for example: CreatorID, ModifierID'
Top = 48
Width = 120
OnChange = edtFDGenRuleChange
ParentShowHint = False
ShowHint = True
TabOrder = 2
end
object lbTpnReplacement1: TLabel
Left = 248
Height = 17
Top = 48
Width = 72
Caption = 'Field names:'
ParentColor = False
end
object btnFDGenNew: TButton
Left = 248
Height = 25
Top = 146
Width = 49
Caption = '+'
OnClick = btnFDGenNewClick
TabOrder = 3
end
object btnFDGenRemove: TButton
Left = 313
Height = 25
Top = 146
Width = 49
Caption = '-'
OnClick = btnFDGenRemoveClick
TabOrder = 4
end
object lbFDGenTip: TLabel
Left = 19
Height = 17
Top = 184
Width = 453
Anchors = [akTop, akLeft, akRight]
Caption = 'Use commas to separate multiple names, use % for partial match.'
ParentColor = False
WordWrap = True
end
end
object Bevel18: TBevel
Left = 8
Height = 10
Top = 655
Width = 496
Align = alTop
Shape = bsSpacer
end
end
end
end
object tabshtConnection: TTabSheet
Caption = 'DB Connect'
ClientHeight = 621
ClientWidth = 536
object PanelDBConn: TPanel
Left = 0
Height = 621
Top = 0
Width = 536
Align = alClient
BevelOuter = bvNone
BorderWidth = 8
ClientHeight = 621
ClientWidth = 536
TabOrder = 0
object GroupBoxDBConnOracle: TGroupBox
Left = 8
Height = 108
Top = 52
Width = 520
Align = alTop
Caption = 'Oracle'
ClientHeight = 86
ClientWidth = 516
TabOrder = 0
object edtOCILIB: TComboBox
Left = 112
Height = 25
Top = 8
Width = 344
ItemHeight = 17
TabOrder = 0
end
object lbOciLib: TLabel
Left = 24
Height = 17
Top = 8
Width = 43
Caption = 'OCI lib:'
ParentColor = False
end
object btnOracleLibBrs: TButton
Left = 456
Height = 25
Top = 8
Width = 51
Anchors = [akTop, akRight]
Caption = '..'
OnClick = btnOracleLibBrsClick
TabOrder = 1
end
object lbNLSLang: TLabel
Left = 24
Height = 17
Top = 48
Width = 64
Caption = 'NLS_LANG:'
ParentColor = False
end
object combNLSLang: TComboBox
Left = 112
Height = 25
Top = 48
Width = 344
DropDownCount = 24
ItemHeight = 17
Items.Strings = (
'SIMPLIFIED CHINESE_CHINA.ZHS16GBK'
'SIMPLIFIED CHINESE_CHINA.AL32UTF8'
'TRADITIONALCHINESE_TAIWAN.ZHT16BIG5'
'AMERICAN_AMERICA.AL32UTF8'
'AMERICAN_AMERICA.WE8ISO8859P1'
'AMERICAN_AMERICA.WE8ISO8859P15'
'AMERICAN_AMERICA.ZHS16GBK'
'KOREAN_KOREA.KO16KSC5601'
'KOREAN_KOREA.AL32UTF8'
'JAPANESE_JAPAN.JA16EUC'
'JAPANESE_JAPAN.AL32UTF8'
)
TabOrder = 2
end
end
object GroupBoxDBConnMysql: TGroupBox
Left = 8
Height = 68
Top = 170
Width = 520
Align = alTop
Caption = 'Mysql'
ClientHeight = 46
ClientWidth = 516
TabOrder = 1
object edtMYSQLLIB: TComboBox
Left = 112
Height = 25
Top = 8
Width = 344
ItemHeight = 17
TabOrder = 0
end
object lbMysqlLib: TLabel
Left = 24
Height = 17
Top = 8
Width = 17
Caption = 'lib:'
ParentColor = False
end
object btnMysqlLibBrs: TButton
Left = 456
Height = 25
Top = 8
Width = 51
Anchors = [akTop, akRight]
Caption = '..'
OnClick = btnMysqlLibBrsClick
TabOrder = 1
end
end
object Bevel4: TBevel
Left = 8
Height = 10
Top = 160
Width = 520
Align = alTop
Shape = bsSpacer
end
object Bevel5: TBevel
Left = 8
Height = 10
Top = 238
Width = 520
Align = alTop
Shape = bsSpacer
end
object GroupBoxDBConnSqlServer: TGroupBox
Left = 8
Height = 96
Top = 248
Width = 520
Align = alTop
Caption = 'SQLServer'
ClientHeight = 74
ClientWidth = 516
TabOrder = 2
object edtSQLSERVERLIB: TComboBox
Left = 112
Height = 25
Top = 8
Width = 344
ItemHeight = 17
TabOrder = 0
end
object lbSqlServerLib: TLabel
Left = 24
Height = 17
Top = 8
Width = 17
Caption = 'lib:'
ParentColor = False
end
object btnSqlServerLibBrs: TButton
Left = 456
Height = 25
Top = 8
Width = 51
Anchors = [akTop, akRight]
Caption = '..'
OnClick = btnSqlServerLibBrsClick
TabOrder = 1
end
object ckbUseOdbcDriverForMsSql: TCheckBox
Left = 111
Height = 21
Top = 40
Width = 121
Caption = 'Use ODBC driver'
TabOrder = 2
end
end
object Bevel8: TBevel
Left = 8
Height = 10
Top = 344
Width = 520
Align = alTop
Shape = bsSpacer
end
object GroupBoxDBConnSqlite: TGroupBox
Left = 8
Height = 69
Top = 433
Width = 520
Align = alTop
Caption = 'Sqlite'
ClientHeight = 47
ClientWidth = 516
TabOrder = 4
object edtSQLITELIB: TComboBox
Left = 112
Height = 25
Top = 8
Width = 344
ItemHeight = 17
TabOrder = 0
end
object lbSqliteLib: TLabel
Left = 24
Height = 17
Top = 8
Width = 17
Caption = 'lib:'
ParentColor = False
end
object btnSqliteLibBrs: TButton
Left = 456
Height = 25
Top = 8
Width = 51
Anchors = [akTop, akRight]
Caption = '..'
OnClick = btnSqliteLibBrsClick
TabOrder = 1
end
end
object lbDBConnNote: TLabel
Left = 8
Height = 34
Top = 8
Width = 520
Align = alTop
Caption = 'Notes: libs should be 64-bit. Libs can be placed in search paths, or just specify exact locations directly below (a restart operation may needed).'
ParentColor = False
WordWrap = True
end
object Bevel9: TBevel
Left = 8
Height = 10
Top = 42
Width = 520
Align = alTop
Shape = bsSpacer
end
object Bevel16: TBevel
Left = 8
Height = 10
Top = 502
Width = 520
Align = alTop
Shape = bsSpacer
end
object GroupBoxDBConnPostgre: TGroupBox
Left = 8
Height = 69
Top = 354
Width = 520
Align = alTop
Caption = 'PostgreSQL'
ClientHeight = 47
ClientWidth = 516
TabOrder = 3
object edtPOSTGRESLIB: TComboBox
Left = 112
Height = 25
Top = 8
Width = 344
ItemHeight = 17
TabOrder = 0
end
object lbPostgreLib: TLabel
Left = 24
Height = 17
Top = 8
Width = 17
Caption = 'lib:'
ParentColor = False
end
object btnPostgreLibBrs: TButton
Left = 456
Height = 25
Top = 8
Width = 51
Anchors = [akTop, akRight]
Caption = '..'
OnClick = btnPostgreLibBrsClick
TabOrder = 1
end
end
object Bevel17: TBevel
Left = 8
Height = 10
Top = 423
Width = 520
Align = alTop
Shape = bsSpacer
end
end
end
object tabshtOthers: TTabSheet
Caption = 'Others'
ClientHeight = 621
ClientWidth = 536
object PanelOthers: TPanel
Left = 0
Height = 621
Top = 0
Width = 536
Align = alClient
BevelOuter = bvNone
BorderWidth = 8
ClientHeight = 621
ClientWidth = 536
TabOrder = 0
object GroupBoxOthersTb: TGroupBox
Left = 8
Height = 96
Top = 8
Width = 520
Align = alTop
Caption = 'Table properties'
ClientHeight = 74
ClientWidth = 516
TabOrder = 0
object ckbWriteConstraintToDescribeStr: TCheckBox
Left = 24
Height = 21
Top = 8
Width = 259
Caption = 'Write constraint to table-description-text'
TabOrder = 0
end
object ckbFieldGridShowLines: TCheckBox
Left = 312
Height = 21
Top = 8
Width = 166
Caption = 'Show lines of Fields-Grid'
TabOrder = 1
end
object ckbTableDialogViewModeByDefault: TCheckBox
Left = 24
Height = 21
Top = 40
Width = 309
Caption = 'View table prop by default (unless CTRL pressed)'
TabOrder = 2
end
end
object GroupBoxKnownTbPrefix: TGroupBox
Left = 8
Height = 173
Top = 114
Width = 520
Align = alTop
Caption = 'Known table prefix'
ClientHeight = 151
ClientWidth = 516
TabOrder = 1
object lbKnownTbPrefixTip: TLabel
Left = 18
Height = 34
Top = 7
Width = 478
Anchors = [akTop, akLeft, akRight]
Caption = 'Known prefixes help generating shorter index-names for table SQLs. (one per line)'
ParentColor = False
WordWrap = True
end
object MemoKnownTbPrefixs: TMemo
Left = 24
Height = 90
Top = 48
Width = 294
ScrollBars = ssVertical
TabOrder = 0
WordWrap = False
end
end
object Bevel14: TBevel
Left = 8
Height = 10
Top = 104
Width = 520
Align = alTop
Shape = bsSpacer
end
object Bevel15: TBevel
Left = 8
Height = 10
Top = 287
Width = 520
Align = alTop
Shape = bsSpacer
end
object GroupBoxCustDict: TGroupBox
Left = 8
Height = 230
Top = 297
Width = 520
Align = alTop
Caption = 'Custom dictionary'
ClientHeight = 208
ClientWidth = 516
TabOrder = 2
object lbCustDictTip: TLabel
Left = 18
Height = 34
Top = 7
Width = 478
Anchors = [akTop, akLeft, akRight]
Caption = 'Custom dictionary is used to identify uncommon words in table field names. (one per line)'
ParentColor = False
WordWrap = True
end
object MemoCustDict: TMemo
Left = 24
Height = 144
Top = 48
Width = 294
ScrollBars = ssVertical
TabOrder = 0
WordWrap = False
end
end
end
end
end
object OpenDialogDbLib: TOpenDialog
Options = [ofFileMustExist, ofEnableSizing, ofViewDetail]
left = 344
top = 484
end
end
Loading...
马建仓 AI 助手
尝试更多
代码解读
代码找茬
代码优化
Pascal
1
https://gitee.com/amtech/ezdml.git
git@gitee.com:amtech/ezdml.git
amtech
ezdml
ezdml
master

搜索帮助