home *** CD-ROM | disk | FTP | other *** search
/ PC World 1999 October / PCWorld_1999-10_cd2.bin / Supreme / _SETUP.1 / Contact.exe / 0 / RCDATA / TFORMLICENCE / TFORMLICENCE.txt
Encoding:
Text File  |  1999-09-06  |  7.6 KB  |  344 lines
  1. inherited FormLicence: TFormLicence
  2.   Left = 299
  3.   Top = 123
  4.   Caption = 'FormLicence'
  5.   ClientHeight = 362
  6.   ClientWidth = 301
  7.   PixelsPerInch = 96
  8.   TextHeight = 13
  9.   object Bevel1: TBevel [0]
  10.     Left = 8
  11.     Top = 8
  12.     Width = 285
  13.     Height = 317
  14.     Shape = bsFrame
  15.   end
  16.   object LabelPlus11: TLabelPlus [1]
  17.     Left = 24
  18.     Top = 20
  19.     Width = 31
  20.     Height = 13
  21.     Caption = '&Firma'
  22.     FocusControl = EditFirma
  23.     Attached = True
  24.     Font.Charset = DEFAULT_CHARSET
  25.     Font.Color = clWindowText
  26.     Font.Height = -11
  27.     Font.Name = 'MS Sans Serif'
  28.     Font.Style = [fsBold]
  29.     ParentFont = False
  30.   end
  31.   object LabelPlus10: TLabelPlus [2]
  32.     Left = 156
  33.     Top = 156
  34.     Width = 99
  35.     Height = 13
  36.     Caption = '&Intern∩┐╜ pracovn∩┐╜k'
  37.     FocusControl = EditPrac
  38.     Attached = True
  39.     Font.Charset = DEFAULT_CHARSET
  40.     Font.Color = clWindowText
  41.     Font.Height = -11
  42.     Font.Name = 'MS Sans Serif'
  43.     Font.Style = [fsBold]
  44.     ParentFont = False
  45.   end
  46.   object LabelPlus1: TLabelPlus [3]
  47.     Left = 24
  48.     Top = 156
  49.     Width = 51
  50.     Height = 13
  51.     Caption = '&Zaplaceno'
  52.     FocusControl = EditSuma
  53.     Attached = True
  54.   end
  55.   object LabelPlus2: TLabelPlus [4]
  56.     Left = 24
  57.     Top = 68
  58.     Width = 91
  59.     Height = 13
  60.     Caption = '&Registra∩┐╜n∩┐╜ k∩┐╜d'
  61.     FocusControl = EditReg
  62.     Attached = True
  63.     Font.Charset = DEFAULT_CHARSET
  64.     Font.Color = clWindowText
  65.     Font.Height = -11
  66.     Font.Name = 'MS Sans Serif'
  67.     Font.Style = [fsBold]
  68.     ParentFont = False
  69.   end
  70.   object LabelPlus3: TLabelPlus [5]
  71.     Left = 156
  72.     Top = 68
  73.     Width = 75
  74.     Height = 13
  75.     Caption = '&Licen∩┐╜n∩┐╜ k∩┐╜d'
  76.     FocusControl = EditLic
  77.     Attached = True
  78.     Font.Charset = DEFAULT_CHARSET
  79.     Font.Color = clWindowText
  80.     Font.Height = -11
  81.     Font.Name = 'MS Sans Serif'
  82.     Font.Style = [fsBold]
  83.     ParentFont = False
  84.   end
  85.   object LabelPlus4: TLabelPlus [6]
  86.     Left = 24
  87.     Top = 112
  88.     Width = 92
  89.     Height = 13
  90.     Caption = '&Datum zprovozn∩┐╜n∩┐╜'
  91.     FocusControl = EditStart
  92.     Attached = True
  93.   end
  94.   object LabelPlus5: TLabelPlus [7]
  95.     Left = 156
  96.     Top = 112
  97.     Width = 74
  98.     Height = 13
  99.     Caption = 'Datum &vypr∩┐╜en∩┐╜'
  100.     FocusControl = EditExpir
  101.     Attached = True
  102.   end
  103.   object Label1: TLabel [8]
  104.     Left = 132
  105.     Top = 176
  106.     Width = 13
  107.     Height = 13
  108.     Caption = 'K∩┐╜'
  109.   end
  110.   object LabelPlus6: TLabelPlus [9]
  111.     Left = 24
  112.     Top = 244
  113.     Width = 50
  114.     Height = 13
  115.     Caption = '&Pozn∩┐╜mka'
  116.     FocusControl = Memo
  117.     Attached = True
  118.   end
  119.   object LabelPlus7: TLabelPlus [10]
  120.     Left = 24
  121.     Top = 200
  122.     Width = 61
  123.     Height = 13
  124.     Caption = '&Sektor z∩┐╜jmu'
  125.     FocusControl = EditSektor
  126.     Attached = True
  127.     Font.Charset = DEFAULT_CHARSET
  128.     Font.Color = clWindowText
  129.     Font.Height = -11
  130.     Font.Name = 'MS Sans Serif'
  131.     Font.Style = []
  132.     ParentFont = False
  133.   end
  134.   inherited BtnOk: TButton
  135.     Left = 136
  136.     Top = 332
  137.     TabOrder = 10
  138.   end
  139.   inherited BtnCancel: TButton
  140.     Left = 216
  141.     Top = 332
  142.     TabOrder = 11
  143.   end
  144.   object EditFirma: TBrowserLookupEdit [13]
  145.     Left = 24
  146.     Top = 36
  147.     Width = 253
  148.     Height = 21
  149.     Separator = #0
  150.     AllowNull = False
  151.     AllVisible = False
  152.     BrowserOnly = False
  153.     ButtonHint = 'Vybrat z ∩┐╜∩┐╜seln∩┐╜ku'
  154.     FieldName = 'ico'
  155.     Font.Charset = DEFAULT_CHARSET
  156.     Font.Color = clWindowText
  157.     Font.Height = -11
  158.     Font.Name = 'MS Sans Serif'
  159.     Font.Style = [fsBold]
  160.     InputFilter = ifAlphaNumeric
  161.     LookupBrowser = DMmain.BrAllFirmy
  162.     LookupDatabase = 'BRAIN_'
  163.     LookupDispField = 'nazev'
  164.     LookupField = 'ico'
  165.     LookupSQL.Strings = (
  166.       'SELECT nazev, ico'
  167.       'FROM firmy'
  168.       'ORDER BY nazev')
  169.     MaxLength = 100
  170.     Params = <>
  171.     ParentFont = False
  172.     TabOrder = 0
  173.   end
  174.   object EditReg: TBrowserEdit [14]
  175.     Left = 24
  176.     Top = 84
  177.     Width = 121
  178.     Height = 21
  179.     AllowNull = False
  180.     DataType = dtString
  181.     FieldName = 'regcis'
  182.     FloatPrecision = 15
  183.     FloatDigits = 2
  184.     Font.Charset = DEFAULT_CHARSET
  185.     Font.Color = clWindowText
  186.     Font.Height = -11
  187.     Font.Name = 'MS Sans Serif'
  188.     Font.Style = [fsBold]
  189.     InputFilter = ifAlphaNumeric
  190.     MaxLength = 15
  191.     ParentFont = False
  192.     TabOrder = 1
  193.   end
  194.   object EditLic: TBrowserEdit [15]
  195.     Left = 156
  196.     Top = 84
  197.     Width = 121
  198.     Height = 21
  199.     AllowNull = False
  200.     DataType = dtString
  201.     FieldName = 'liccis'
  202.     FloatPrecision = 15
  203.     FloatDigits = 2
  204.     Font.Charset = DEFAULT_CHARSET
  205.     Font.Color = clWindowText
  206.     Font.Height = -11
  207.     Font.Name = 'MS Sans Serif'
  208.     Font.Style = [fsBold]
  209.     InputFilter = ifAlphaNumeric
  210.     MaxLength = 15
  211.     ParentFont = False
  212.     TabOrder = 2
  213.   end
  214.   object EditStart: TBrowserDateEdit [16]
  215.     Left = 24
  216.     Top = 128
  217.     Width = 121
  218.     Height = 21
  219.     Separator = #0
  220.     Duration = False
  221.     MaxLength = 0
  222.     TabOrder = 3
  223.     DefaultCurrent = False
  224.     FieldName = 'start'
  225.     DataType = ttDateTime
  226.   end
  227.   object EditExpir: TBrowserDateEdit [17]
  228.     Left = 156
  229.     Top = 128
  230.     Width = 121
  231.     Height = 21
  232.     Separator = #0
  233.     Duration = False
  234.     MaxLength = 0
  235.     TabOrder = 4
  236.     DefaultCurrent = False
  237.     FieldName = 'expir'
  238.     DataType = ttDateTime
  239.   end
  240.   object EditSuma: TBrowserNumEdit [18]
  241.     Left = 24
  242.     Top = 172
  243.     Width = 105
  244.     Height = 21
  245.     DataType = ntFloat
  246.     FieldName = 'zaplaceno'
  247.     FloatDigits = 2
  248.     FloatPrecision = 15
  249.     Increment = 1.000000000000000000
  250.     TabOrder = 5
  251.   end
  252.   object EditPrac: TBrowserLookupEdit [19]
  253.     Left = 156
  254.     Top = 172
  255.     Width = 121
  256.     Height = 21
  257.     Separator = #0
  258.     AllowNull = False
  259.     AllVisible = False
  260.     BrowserOnly = False
  261.     ButtonHint = 'Vybrat z ∩┐╜∩┐╜seln∩┐╜ku'
  262.     FieldName = 'id_pracovnik'
  263.     Font.Charset = DEFAULT_CHARSET
  264.     Font.Color = clWindowText
  265.     Font.Height = -11
  266.     Font.Name = 'MS Sans Serif'
  267.     Font.Style = [fsBold]
  268.     InputFilter = ifAlphaNumeric
  269.     LookupDatabase = 'BRAIN_'
  270.     LookupDispField = 'prijmeni'
  271.     LookupField = 'id'
  272.     LookupSQL.Strings = (
  273.       'SELECT id, prijmeni, jmeno, titul'
  274.       'FROM uzivatele'
  275.       'ORDER BY prijmeni')
  276.     MaxLength = 0
  277.     Params = <>
  278.     ParentFont = False
  279.     TabOrder = 6
  280.   end
  281.   object Memo: TBrowserMemo [20]
  282.     Left = 24
  283.     Top = 260
  284.     Width = 253
  285.     Height = 53
  286.     MaxLength = 255
  287.     TabOrder = 8
  288.     DataType = dtChar
  289.     FieldName = 'pozn'
  290.   end
  291.   object EditSektor: TBrowserLookupEdit [21]
  292.     Left = 24
  293.     Top = 216
  294.     Width = 253
  295.     Height = 21
  296.     Separator = #0
  297.     AllVisible = False
  298.     BrowserOnly = False
  299.     ButtonHint = 'Vybrat z ∩┐╜∩┐╜seln∩┐╜ku'
  300.     FieldName = 'id_sektor_zajmu'
  301.     Font.Charset = DEFAULT_CHARSET
  302.     Font.Color = clWindowText
  303.     Font.Height = -11
  304.     Font.Name = 'MS Sans Serif'
  305.     Font.Style = []
  306.     InputFilter = ifAlphaNumeric
  307.     LookupBrowser = DMmain.BrSektoryZajmu
  308.     LookupDatabase = 'BRAIN_'
  309.     LookupField = 'id'
  310.     LookupSQL.Strings = (
  311.       'SELECT id, popis'
  312.       'FROM sektory_zajmu'
  313.       'ORDER BY id')
  314.     MaxLength = 30
  315.     Params = <>
  316.     ParentFont = False
  317.     TabOrder = 7
  318.   end
  319.   object BtnLic: TBitBtn [22]
  320.     Left = 8
  321.     Top = 332
  322.     Width = 81
  323.     Height = 25
  324.     Caption = '&Licencer...'
  325.     TabOrder = 9
  326.     OnClick = BtnLicClick
  327.     Glyph.Data = {
  328.       B6000000424DB600000000000000760000002800000008000000100000000100
  329.       0400000000004000000000000000000000001000000010000000000000000000
  330.       8000008000000080800080000000800080008080000080808000C0C0C0000000
  331.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0088800888880B
  332.       B088880BB088888008888888888888800888883BB388880BB088880BB088883B
  333.       B388873BB37880BBBB0880BBBB0880BBBB08833BB33888300388}
  334.   end
  335.   inherited FormPos: TFormPos
  336.     Left = 260
  337.     Top = 288
  338.   end
  339.   inherited Wallpaper: TWallpaper
  340.     Left = 100
  341.     Top = 328
  342.   end
  343. end
  344.