object pbEditDataForm: TpbEditDataForm Left = 492 Height = 401 Top = 271 Width = 530 Caption = 'Phone book data' ClientHeight = 401 ClientWidth = 530 Position = poScreenCenter LCLVersion = '1.3' object Label1: TLabel AnchorSideLeft.Control = Owner AnchorSideTop.Control = Owner Left = 6 Height = 19 Top = 6 Width = 66 BorderSpacing.Around = 6 Caption = 'Patronymic' FocusControl = DBEdit1 ParentColor = False end object Label2: TLabel AnchorSideLeft.Control = Owner AnchorSideTop.Control = DBEdit1 AnchorSideTop.Side = asrBottom Left = 6 Height = 19 Top = 68 Width = 34 BorderSpacing.Around = 6 Caption = 'Name' FocusControl = DBEdit2 ParentColor = False end object Label3: TLabel AnchorSideLeft.Control = Owner AnchorSideLeft.Side = asrCenter AnchorSideTop.Control = DBEdit1 AnchorSideTop.Side = asrBottom Left = 240 Height = 19 Top = 68 Width = 51 BorderSpacing.Around = 6 Caption = 'Surname' FocusControl = DBEdit3 ParentColor = False end object Label4: TLabel AnchorSideLeft.Control = Owner AnchorSideTop.Control = DBEdit2 AnchorSideTop.Side = asrBottom Left = 6 Height = 19 Top = 130 Width = 37 BorderSpacing.Around = 6 Caption = 'Phone' FocusControl = DBEdit4 ParentColor = False end object Label5: TLabel AnchorSideLeft.Control = Label3 AnchorSideTop.Control = DBEdit3 AnchorSideTop.Side = asrBottom Left = 240 Height = 19 Top = 130 Width = 22 BorderSpacing.Top = 6 BorderSpacing.Bottom = 6 Caption = 'ICQ' FocusControl = DBEdit5 ParentColor = False end object Label6: TLabel AnchorSideLeft.Control = Owner AnchorSideTop.Control = DBEdit4 AnchorSideTop.Side = asrBottom Left = 6 Height = 19 Top = 192 Width = 36 BorderSpacing.Around = 6 Caption = 'Memo' ParentColor = False end object DBEdit1: TDBEdit AnchorSideLeft.Control = Label1 AnchorSideTop.Control = Label1 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom Left = 12 Height = 31 Top = 31 Width = 512 DataField = 'PATRONYMIC' DataSource = pbMainForm.Datasource1 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 CharCase = ecNormal MaxLength = 0 TabOrder = 0 end object DBEdit2: TDBEdit AnchorSideLeft.Control = Label2 AnchorSideTop.Control = Label2 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Label3 Left = 12 Height = 31 Top = 93 Width = 222 DataField = 'NAME' DataSource = pbMainForm.Datasource1 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 CharCase = ecNormal MaxLength = 0 TabOrder = 1 end object DBEdit3: TDBEdit AnchorSideLeft.Control = Label3 AnchorSideTop.Control = Label3 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom Left = 246 Height = 31 Top = 93 Width = 278 DataField = 'SURNAME' DataSource = pbMainForm.Datasource1 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 CharCase = ecNormal MaxLength = 0 TabOrder = 2 end object DBEdit4: TDBEdit AnchorSideLeft.Control = Label4 AnchorSideTop.Control = Label4 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Label3 Left = 12 Height = 31 Top = 155 Width = 222 DataField = 'PHONE' DataSource = pbMainForm.Datasource1 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 CharCase = ecNormal MaxLength = 0 TabOrder = 3 end object DBEdit5: TDBEdit AnchorSideLeft.Control = Label5 AnchorSideTop.Control = Label5 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom Left = 246 Height = 31 Top = 155 Width = 278 DataField = 'ICQ' DataSource = pbMainForm.Datasource1 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 CharCase = ecNormal MaxLength = 0 TabOrder = 4 end object ButtonPanel1: TButtonPanel Left = 6 Height = 42 Top = 353 Width = 518 OKButton.Name = 'OKButton' OKButton.DefaultCaption = True HelpButton.Name = 'HelpButton' HelpButton.DefaultCaption = True CloseButton.Name = 'CloseButton' CloseButton.DefaultCaption = True CancelButton.Name = 'CancelButton' CancelButton.DefaultCaption = True TabOrder = 5 ShowButtons = [pbOK, pbCancel, pbHelp] end object DBMemo1: TDBMemo AnchorSideLeft.Control = Label6 AnchorSideTop.Control = Label6 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = ButtonPanel1 Left = 12 Height = 130 Top = 217 Width = 512 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Around = 6 DataField = 'MEMO' DataSource = pbMainForm.Datasource1 TabOrder = 6 end object RxCloseFormValidator1: TRxCloseFormValidator ErrorMsgCaption = 'Ошибка. Не все требуемые поля заполнены!' Items = < item Control = DBEdit1 FieldCaption = 'Patronymic' end item Control = DBEdit2 FieldCaption = 'Name' OnValidate = RxCloseFormValidator1Items1Validate end item Control = DBEdit4 FieldCaption = 'Phone' OnValidate = RxCloseFormValidator1Items2Validate end> left = 376 top = 8 end end