jvdbmaskeditdemoform.dfm

jvcl driver development envionment

object JvDbMaskEditDemoFrm: TJvDbMaskEditDemoFrm
  Left = 185
  Top = 156
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'JvDBMaskEdit Demo'
  ClientHeight = 426
  ClientWidth = 383
  Color = clBtnFace
  DefaultMonitor = dmDesktop
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 24
    Top = 326
    Width = 305
    Height = 78
    Anchors = [akLeft, akBottom]
    Caption = 
      'Validation/Accepting new values: Try typing in Bob as the name o' +
      'f a person, then hit enter or tab, or click on a different contr' +
      'ol (to Exit the control, thus updating the data aware object). S' +
      'ee OnAcceptNewValue handler for validation sample. This is a lot' +
      ' more flexible than OnExit event where you would have to effecti' +
      'vely UNDO a change that has already been done.'
    WordWrap = True
  end
  object DBCtrlGrid1: TDBCtrlGrid
    Left = 24
    Top = 64
    Width = 337
    Height = 255
    Anchors = [akLeft, akTop, akBottom]
    DataSource = DataSource1
    PanelHeight = 85
    PanelWidth = 321
    TabOrder = 0
    object Label3: TLabel
      Left = 16
      Top = 19
      Width = 28
      Height = 13
      Caption = 'Name'
    end
    object Label4: TLabel
      Left = 16
      Top = 47
      Width = 31
      Height = 13
      Caption = 'Phone'
    end
    object EditNAME: TJvDBMaskEdit
      Left = 63
      Top = 16
      Width = 223
      Height = 21
      Anchors = [akLeft, akTop, akRight]
      DataField = 'NAME'
      DataSource = DataSource1
      TabOrder = 0
      OnExit = EditNAMEExit
      OnKeyDown = EditNAMEKeyDown
      OnAcceptNewValue = EditNAMEAcceptNewValue
    end
    object EditPHONE: TJvDBMaskEdit
      Left = 63
      Top = 48
      Width = 221
      Height = 21
      Anchors = [akLeft, akTop, akRight]
      DataField = 'PHONE'
      DataSource = DataSource1
      TabOrder = 1
    end
  end
  object DBNavigator1: TDBNavigator
    Left = 72
    Top = 24
    Width = 240
    Height = 25
    DataSource = DataSource1
    TabOrder = 1
  end
  object JvCsvDataSet1: TJvCsvDataSet
    FieldDefs = <
      item
        Name = 'NAME'
        DataType = ftString
        Size = 80
      end
      item
        Name = 'PHONE'
        DataType = ftString
        Size = 80
      end>
    Active = True
    FileName = 'Phones.csv'
    Changed = False
    CsvFieldDef = 'NAME,PHONE'
    CsvUniqueKeys = False
    ExtendedHeaderInfo = False
    CaseInsensitive = False
    AutoBackupCount = 0
    StoreDefs = True
    Left = 144
    Top = 176
    object JvCsvDataSet1NAME: TStringField
      FieldName = 'NAME'
      Size = 80
    end
    object JvCsvDataSet1PHONE: TStringField
      FieldName = 'PHONE'
      Size = 80
    end
  end
  object DataSource1: TDataSource
    DataSet = JvCsvDataSet1
    Left = 224
    Top = 176
  end
end