Files
HeidiSQL/source/createdatabase.dfm
Ansgar Becker 6c2a100945 Implement combo box for definer in routine + view + trigger editor. Fixes issue #2189. Some related changes here:
- Remove ensureValidIdentifier() and its partly uncatched exceptions. Instead, disable "OK" buttons for empty table/view/proc name.
- QuoteIdent and DeQuoteIdent now take the glue char instead of a "HasMultiSegments" boolean param, so they're more exact when "user@host" or "db.name" come in.
2010-10-12 22:13:08 +00:00

133 lines
2.8 KiB
Plaintext

object CreateDatabaseForm: TCreateDatabaseForm
Left = 0
Top = 0
BorderStyle = bsDialog
Caption = 'Create database ...'
ClientHeight = 218
ClientWidth = 317
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Position = poOwnerFormCenter
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
DesignSize = (
317
218)
PixelsPerInch = 96
TextHeight = 13
object lblDBName: TLabel
Left = 8
Top = 19
Width = 31
Height = 13
Caption = '&Name:'
FocusControl = editDBName
end
object lblCharset: TLabel
Left = 8
Top = 46
Width = 70
Height = 13
Caption = '&Character set:'
FocusControl = comboCharset
end
object lblCollation: TLabel
Left = 8
Top = 73
Width = 45
Height = 13
Caption = 'C&ollation:'
FocusControl = comboCollation
end
object lblPreview: TLabel
Left = 8
Top = 138
Width = 178
Height = 13
Anchors = [akLeft, akRight, akBottom]
Caption = 'SQL &preview for CREATE DATABASE:'
end
object editDBName: TEdit
Left = 88
Top = 16
Width = 221
Height = 21
Anchors = [akLeft, akTop, akRight]
TabOrder = 0
TextHint = 'Enter database name'
OnChange = Modified
end
object comboCharset: TComboBox
Left = 88
Top = 43
Width = 221
Height = 21
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
Sorted = True
TabOrder = 1
OnChange = comboCharsetChange
end
object btnOK: TButton
Left = 153
Top = 102
Width = 75
Height = 25
Anchors = [akRight, akBottom]
Caption = 'OK'
Default = True
TabOrder = 3
OnClick = btnOKClick
end
object btnCancel: TButton
Left = 234
Top = 102
Width = 75
Height = 25
Anchors = [akRight, akBottom]
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 4
end
object comboCollation: TComboBox
Left = 88
Top = 70
Width = 221
Height = 21
Style = csDropDownList
TabOrder = 2
OnChange = Modified
end
object SynMemoPreview: TSynMemo
Left = 8
Top = 154
Width = 301
Height = 56
SingleLineMode = False
Anchors = [akLeft, akRight, akBottom]
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Courier New'
Font.Style = []
TabOrder = 5
Gutter.Font.Charset = DEFAULT_CHARSET
Gutter.Font.Color = clWindowText
Gutter.Font.Height = -11
Gutter.Font.Name = 'Courier New'
Gutter.Font.Style = []
Gutter.Visible = False
ReadOnly = True
RightEdge = 0
ScrollBars = ssNone
WordWrap = True
end
end