home *** CD-ROM | disk | FTP | other *** search
/ PC World 1999 October / PCWorld_1999-10_cd2.bin / Supreme / _SETUP.1 / Contact.exe / 0 / RCDATA / TFORMZAJMY / TFORMZAJMY.txt
Text File  |  1999-09-06  |  3KB  |  124 lines
  1. inherited FormZajmy: TFormZajmy
  2.   Left = 312
  3.   Top = 220
  4.   Caption = 'FormZajmy'
  5.   ClientHeight = 166
  6.   ClientWidth = 286
  7.   PixelsPerInch = 96
  8.   TextHeight = 13
  9.   object BrowserDataGrabber1: TBrowserDataGrabber [0]
  10.     Left = 74
  11.     Top = 138
  12.     Width = 20
  13.     Height = 19
  14.     FieldNames.Strings = (
  15.       'ico')
  16.     GroupIndex = 0
  17.   end
  18.   object Frame1: TFrame [1]
  19.     Left = 8
  20.     Top = 4
  21.     Width = 269
  22.     Height = 125
  23.   end
  24.   object LabelPlus1: TLabelPlus [2]
  25.     Left = 28
  26.     Top = 24
  27.     Width = 74
  28.     Height = 13
  29.     Caption = '&Sektor z∩┐╜jmu'
  30.     FocusControl = EditSektor
  31.     Attached = True
  32.     Font.Charset = DEFAULT_CHARSET
  33.     Font.Color = clWindowText
  34.     Font.Height = -11
  35.     Font.Name = 'MS Sans Serif'
  36.     Font.Style = [fsBold]
  37.     ParentFont = False
  38.   end
  39.   object LabelPlus2: TLabelPlus [3]
  40.     Left = 28
  41.     Top = 72
  42.     Width = 77
  43.     Height = 13
  44.     Caption = 'Stav s&polupr∩┐╜ce'
  45.     FocusControl = EditStavSpolu
  46.     Attached = True
  47.   end
  48.   inherited BtnOk: TButton
  49.     Left = 124
  50.     Top = 136
  51.     TabOrder = 2
  52.   end
  53.   inherited BtnCancel: TButton
  54.     Left = 204
  55.     Top = 136
  56.     TabOrder = 3
  57.   end
  58.   object EditSektor: TBrowserLookupEdit [6]
  59.     Left = 28
  60.     Top = 40
  61.     Width = 229
  62.     Height = 21
  63.     Separator = #0
  64.     AllowNull = False
  65.     AllVisible = False
  66.     BrowserOnly = False
  67.     ButtonHint = 'Vybrat z ∩┐╜∩┐╜seln∩┐╜ku'
  68.     FieldName = 'id_sektor_zajmu'
  69.     Font.Charset = DEFAULT_CHARSET
  70.     Font.Color = clWindowText
  71.     Font.Height = -11
  72.     Font.Name = 'MS Sans Serif'
  73.     Font.Style = [fsBold]
  74.     InputFilter = ifAlphaNumeric
  75.     LookupBrowser = DMmain.BrSektoryZajmu
  76.     LookupDatabase = 'BRAIN_'
  77.     LookupField = 'id'
  78.     LookupSQL.Strings = (
  79.       'SELECT id, popis'
  80.       'FROM sektory_zajmu'
  81.       'ORDER BY id')
  82.     MaxLength = 30
  83.     Params = <>
  84.     ParentFont = False
  85.     TabOrder = 0
  86.   end
  87.   object EditStavSpolu: TBrowserLookupEdit [7]
  88.     Left = 28
  89.     Top = 88
  90.     Width = 229
  91.     Height = 21
  92.     Separator = #0
  93.     AllVisible = False
  94.     BrowserOnly = False
  95.     ButtonHint = 'Vybrat z ∩┐╜∩┐╜seln∩┐╜ku'
  96.     DirectInput = False
  97.     FieldName = 'id_stav_spoluprace'
  98.     Font.Charset = DEFAULT_CHARSET
  99.     Font.Color = clWindowText
  100.     Font.Height = -11
  101.     Font.Name = 'MS Sans Serif'
  102.     Font.Style = []
  103.     InputFilter = ifAlphaNumeric
  104.     LookupBrowser = DMmain.BrSpoluprace
  105.     LookupDatabase = 'BRAIN_'
  106.     LookupField = 'id'
  107.     LookupSQL.Strings = (
  108.       'SELECT id, popis'
  109.       'FROM stavy_spoluprace'
  110.       'ORDER BY id')
  111.     MaxLength = 30
  112.     Params = <>
  113.     ParentFont = False
  114.     TabOrder = 1
  115.     BeforeLookup = EditStavSpoluBeforeLookup
  116.   end
  117.   inherited FormPos: TFormPos
  118.     Top = 136
  119.   end
  120.   inherited Wallpaper: TWallpaper
  121.     Top = 136
  122.   end
  123. end
  124.