home *** CD-ROM | disk | FTP | other *** search
/ Secret Service 54a / SSERVCD_54A.bin / UTILS / CHEATS / PG2EDIT.ZIP / PG2UEdit.exe / 0 / RCDATA / TFRMSEARCH / TFRMSEARCH.txt
Text File  |  1997-12-03  |  3KB  |  141 lines
  1. object frmSearch: TfrmSearch
  2.   Left = 327
  3.   Top = 235
  4.   Width = 347
  5.   Height = 320
  6.   Caption = 'Find Unit'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   Position = poScreenCenter
  13.   PixelsPerInch = 96
  14.   TextHeight = 13
  15.   object lblSearch: TLabel
  16.     Left = 8
  17.     Top = 80
  18.     Width = 64
  19.     Height = 13
  20.     Caption = 'Search String'
  21.   end
  22.   object rgSearch: TRadioGroup
  23.     Left = 8
  24.     Top = 8
  25.     Width = 321
  26.     Height = 41
  27.     Caption = 'Search Criteria'
  28.     Columns = 2
  29.     ItemIndex = 0
  30.     Items.Strings = (
  31.       'Unit Code'
  32.       'Unit Name')
  33.     TabOrder = 0
  34.   end
  35.   object btnFind: TBitBtn
  36.     Left = 256
  37.     Top = 56
  38.     Width = 75
  39.     Height = 25
  40.     Hint = 'To click next matching unit, click Find again'
  41.     Caption = '&Find'
  42.     ParentShowHint = False
  43.     ShowHint = True
  44.     TabOrder = 1
  45.     OnClick = btnFindClick
  46.   end
  47.   object btnCancel: TBitBtn
  48.     Left = 200
  49.     Top = 256
  50.     Width = 75
  51.     Height = 25
  52.     Hint = 'Return to Main Form without any selection'
  53.     Caption = '&Cancel'
  54.     ParentShowHint = False
  55.     ShowHint = True
  56.     TabOrder = 2
  57.     OnClick = btnCancelClick
  58.   end
  59.   object edtSearch: TEdit
  60.     Left = 8
  61.     Top = 96
  62.     Width = 321
  63.     Height = 21
  64.     TabOrder = 3
  65.   end
  66.   object cbSearch: TCheckBox
  67.     Left = 8
  68.     Top = 56
  69.     Width = 241
  70.     Height = 17
  71.     Hint = 'Returns the first matching unit'
  72.     Caption = 'Search from beginning of File'
  73.     ParentShowHint = False
  74.     ShowHint = True
  75.     TabOrder = 4
  76.   end
  77.   object GroupBox1: TGroupBox
  78.     Left = 8
  79.     Top = 128
  80.     Width = 321
  81.     Height = 113
  82.     Caption = 'Search Result'
  83.     Enabled = False
  84.     TabOrder = 5
  85.     object Label1: TLabel
  86.       Left = 8
  87.       Top = 16
  88.       Width = 47
  89.       Height = 13
  90.       Caption = 'Unit Code'
  91.     end
  92.     object Label2: TLabel
  93.       Left = 88
  94.       Top = 16
  95.       Width = 36
  96.       Height = 13
  97.       Caption = 'Country'
  98.     end
  99.     object Label3: TLabel
  100.       Left = 8
  101.       Top = 64
  102.       Width = 50
  103.       Height = 13
  104.       Caption = 'Unit Name'
  105.     end
  106.     object edtUnitCode: TEdit
  107.       Left = 8
  108.       Top = 32
  109.       Width = 49
  110.       Height = 21
  111.       TabOrder = 0
  112.     end
  113.     object edtCountry: TEdit
  114.       Left = 88
  115.       Top = 32
  116.       Width = 169
  117.       Height = 21
  118.       TabOrder = 1
  119.     end
  120.     object edtUnitName: TEdit
  121.       Left = 8
  122.       Top = 80
  123.       Width = 305
  124.       Height = 21
  125.       TabOrder = 2
  126.     end
  127.   end
  128.   object btnOK: TBitBtn
  129.     Left = 72
  130.     Top = 256
  131.     Width = 75
  132.     Height = 25
  133.     Hint = 'Updates the main form with the current unit in Search Result'
  134.     Caption = '&OK'
  135.     ParentShowHint = False
  136.     ShowHint = True
  137.     TabOrder = 6
  138.     OnClick = btnOKClick
  139.   end
  140. end
  141.