Статьи Королевства Дельфи

       

L2_dfm


object FldDlgFr: TFldDlgFr

Left = 301

Top = 184

BorderIcons = []

BorderStyle = bsDialog

Caption = 'Новый реквизит (поле БД)'

ClientHeight = 116

ClientWidth = 457

Color = clBtnFace

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'



Font.Style = []

OldCreateOrder = False

Position = poScreenCenter

OnActivate = FormActivate

OnCreate = FormCreate

PixelsPerInch = 96

TextHeight = 13

object FldNameLbl: TLabel

Left = 4

Top = 7

Width = 94

Height = 13

Caption = 'Идентификатор'

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = [fsBold]

ParentFont = False

end

object FldCaptionLbl: TLabel

Left = 4

Top = 28

Width = 89

Height = 13

Caption = 'Наименование'

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = [fsBold]

ParentFont = False

end

object FldDescrLbl: TLabel

Left = 4

Top = 49

Width = 59

Height = 13

Caption = 'Описание'

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = [fsBold]

ParentFont = False

end

object FldDataTypeLbl: TLabel

Left = 4

Top = 70

Width = 70

Height = 13

Caption = 'Тип данных'

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = [fsBold]

ParentFont = False

end

object Label5: TLabel

Left = 372

Top = 70

Width = 46

Height = 13

Caption = 'Размер'

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = [fsBold]

ParentFont = False

Visible = False

end

object Label1: TLabel

Left = 299

Top = 7

Width = 89

Height = 13

Caption = 'Группа данных'

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = [fsBold]

ParentFont = False

end

object FldNameEdit: TEdit


Left = 100

Top = 3

Width = 190

Height = 21

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = ' MS Sans Serif'

Font.Style = [fsBold]

ParentFont = False

TabOrder = 0

Text = 'FldNameEdit'

OnKeyUp = FldNameEditKeyUp

end

object FldCaptionEdit: TEdit

Left = 100

Top = 24

Width = 190

Height = 21

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = [fsBold]

ParentFont = False

TabOrder = 1

Text = 'FldCaptionEdit'

OnKeyUp = FldNameEditKeyUp

end

object FldDescrEdit: TEdit

Left = 100

Top = 45

Width = 354

Height = 21

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = [fsBold]

ParentFont = False

TabOrder = 2

Text = 'FldDescrEdit'

OnKeyUp = FldNameEditKeyUp

end

object OkBtn: TButton

Left = 147

Top = 92

Width = 75

Height = 20

Caption = 'Ok'

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = [fsBold]

ParentFont = False

TabOrder = 4

OnClick = OkBtnClick

end

object CancelBtn: TButton

Left = 227

Top = 92

Width = 75

Height = 20

Caption = 'Отмена'

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = [fsBold]

ParentFont = False

TabOrder = 5

OnClick = CancelBtnClick

end

object FldSizeEdit: TEdit

Left = 419

Top = 66

Width = 35

Height = 21

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = [fsBold]

ParentFont = False

TabOrder = 3

Text = 'FldSizeEdit'

Visible = False

OnKeyPress = FldSizeEditKeyPress

end

object TypeGroupCmBox: TComboBox

Left = 299

Top = 24

Width = 155

Height = 21

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = [fsBold]

ItemHeight = 13

ParentFont = False

TabOrder = 6

Text = 'Группа данных'

OnChange = TypeGroupCmBoxChange

end

object TypesComboBox: TComboBox

Left = 100

Top = 66

Width = 262

Height = 21

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = [fsBold]

ItemHeight = 13

ParentFont = False

TabOrder = 7

Text = 'TypesComboBox'

OnClick = TypesComboBoxClick

OnKeyPress = TypesComboBoxKeyPress

end

end


Содержание раздела