C!T ROM 5/ctrom5b.zip/ctrom5b/PROGRAM/DELPHI/ORPHTR/ORPHTR.EXE/EFUNIT.DFM/EFUNIT.txt

Text File | 1995-03-29 | 4KB | 238 lines

object Form1: TForm1
  Left = 216
  Top = 148
  Width = 467
  Height = 306
  Caption = 'Entry Field Demo'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'Courier New'
  Font.Style = []
  PixelsPerInch = 96
  Position = poScreenCenter
  OnActivate = FormActivate
  TextHeight = 16
  object Bevel1: TBevel
    Left = 8
    Top = 128
    Width = 233
    Height = 105
  end
  object Label1: TLabel
    Left = 184
    Top = 11
    Width = 136
    Height = 16
    Caption = 'Simple edit field'
  end
  object Label3: TLabel
    Left = 183
    Top = 44
    Width = 144
    Height = 16
    Caption = 'Picture edit field'
  end
  object Label4: TLabel
    Left = 16
    Top = 168
    Width = 128
    Height = 16
    Caption = 'Field 2 contents'
  end
  object Label5: TLabel
    Left = 184
    Top = 75
    Width = 144
    Height = 16
    Caption = 'Numeric edit field'
  end
  object Label6: TLabel
    Left = 16
    Top = 200
    Width = 128
    Height = 16
    Caption = 'Field 3 contents'
  end
  object Label2: TLabel
    Left = 16
    Top = 136
    Width = 128
    Height = 16
    Caption = 'Field 1 contents'
  end
  object Label7: TLabel
    Left = 256
    Top = 128
    Width = 169
    Height = 97
    AutoSize = False
    Caption = 'See OVCDATA.PAS for more information on picture mask characters.'
    WordWrap = True
  end
  object OvcController1: TOvcController
    Left = 8
    Top = 240
    EntryCommands.TableList = (
      'Default'
      True
      (
        37
        47
        39
        58
        1061
        76
        1063
        77
        36
        43
        35
        17
        46
        11
        8
        1
        520
        1
        1058
        2
        1057
        73
        45
        45
        1114
        57
        2056
        57
        38
        75
        40
        16
        1037
        48
        549
        21
        551
        24
        548
        20
        547
        19
        1573
        30
        1575
        31
        545
        23
        546
        22
        550
        25
        552
        18
        1572
        27
        1571
        28
        1569
        29
        1570
        26
        558
        9
        1112
        9
        1069
        7
        1091
        7
        557
        53
        1110
        53
        33
        55
        1060
        32
        34
        50
        1059
        46
        9
        49
        521
        54
        1033
        49
        1545
        54
        3080
        56
        1072
        33
        1073
        34
        1074
        35
        1075
        36
        1076
        37
        1077
        38
        1078
        39
        1079
        40
        1080
        41
        1081
        42
        1584
        61
        1585
        62
        1586
        63
        1587
        64
        1588
        65
        1589
        66
        1590
        67
        1591
        68
        1592
        69
        1593
        70))
    OnError = OvcController1Error
  end
  object OvcFourWaySpinner1: TOvcFourWaySpinner
    Left = 139
    Top = 40
    Width = 25
    Height = 25
    FocusedControl = OvcPictureField1
  end
  object OvcNumericField1: TOvcNumericField
    Left = 40
    Top = 72
    Width = 98
    Height = 22
    Cursor = crIBeam
    Controller = OvcController1
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'System'
    Font.Pitch = fpFixed
    Font.Style = []
    HighlightColors.BackColor = clHighlight
    HighlightColors.TextColor = clHighlightText
    HighlightColors.UseDefault = False
    Options = [pefBeepOnError]
    ParentColor = False
    ParentFont = False
    PictureMask = 'iiiiiiiiiii'