home *** CD-ROM | disk | FTP | other *** search
/ PC World 1999 October / PCWorld_1999-10_cd2.bin / Supreme / _SETUP.1 / Contact.exe / 0 / RCDATA / TFORMREGISTRACE / TFORMREGISTRACE.txt
Text File  |  1999-09-06  |  4KB  |  142 lines

  1. object FormRegistrace: TFormRegistrace
  2.   Left = 265
  3.   Top = 129
  4.   BorderStyle = bsDialog
  5.   Caption = 'Registrace'
  6.   ClientHeight = 358
  7.   ClientWidth = 357
  8.   Color = clBtnFace
  9.   ParentFont = True
  10.   OldCreateOrder = True
  11.   Position = poScreenCenter
  12.   OnShow = FormShow
  13.   PixelsPerInch = 96
  14.   TextHeight = 13
  15.   object Bevel2: TBevel
  16.     Left = 8
  17.     Top = 8
  18.     Width = 341
  19.     Height = 313
  20.     Shape = bsFrame
  21.   end
  22.   object StaticStatus: TStatic
  23.     Left = 108
  24.     Top = 224
  25.     Width = 133
  26.     Height = 21
  27.   end
  28.   object StaticReg: TStatic
  29.     Left = 108
  30.     Top = 252
  31.     Width = 105
  32.     Height = 21
  33.   end
  34.   object Label1: TLabel
  35.     Left = 30
  36.     Top = 228
  37.     Width = 70
  38.     Height = 13
  39.     Caption = 'Sou∩┐╜asn∩┐╜ stav'
  40.     Transparent = True
  41.   end
  42.   object Label2: TLabel
  43.     Left = 22
  44.     Top = 256
  45.     Width = 79
  46.     Height = 13
  47.     Caption = 'Registra∩┐╜n∩┐╜ ∩┐╜∩┐╜slo'
  48.     Transparent = True
  49.   end
  50.   object LabelPlus1: TLabelPlus
  51.     Left = 35
  52.     Top = 284
  53.     Width = 66
  54.     Height = 13
  55.     AttachType = atLeft
  56.     Caption = 'Licen∩┐╜n∩┐╜ ∩┐╜∩┐╜slo'
  57.     FocusControl = EditLic
  58.     Attached = True
  59.   end
  60.   object BtnCopy: TSpeedButton
  61.     Left = 216
  62.     Top = 252
  63.     Width = 23
  64.     Height = 22
  65.     Hint = 'Kop∩┐╜rovat do schr∩┐╜nky'
  66.     Glyph.Data = {
  67.       F6000000424DF600000000000000760000002800000010000000100000000100
  68.       0400000000008000000000000000000000001000000010000000000000000000
  69.       8000008000000080800080000000800080008080000080808000C0C0C0000000
  70.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
  71.       8888888888888888888888888844444444488888884FFFFFFF488888884F0000
  72.       0F480000004FFFFFFF480FFFFF4F00000F480F00004FFFFFFF480FFFFF4F00F4
  73.       44480F00004FFFF4F4880FFFFF4FFFF448880F00F044444488880FFFF0F08888
  74.       88880FFFF0088888888800000088888888888888888888888888}
  75.     ParentShowHint = False
  76.     ShowHint = True
  77.     OnClick = BtnCopyClick
  78.   end
  79.   object BtnRegister: TButton
  80.     Left = 216
  81.     Top = 280
  82.     Width = 78
  83.     Height = 22
  84.     Caption = 'Zaregistrovat'
  85.     Enabled = False
  86.     TabOrder = 1
  87.     OnClick = BtnRegisterClick
  88.   end
  89.   object BtnClose: TButton
  90.     Left = 271
  91.     Top = 328
  92.     Width = 75
  93.     Height = 25
  94.     Cancel = True
  95.     Caption = 'Zav∩┐╜∩┐╜t'
  96.     ModalResult = 2
  97.     TabOrder = 2
  98.   end
  99.   object Memo1: TMemo
  100.     Left = 20
  101.     Top = 20
  102.     Width = 317
  103.     Height = 185
  104.     TabStop = False
  105.     Color = clInfoBk
  106.     Lines.Strings = (
  107.       'V∩┐╜en∩┐╜ u∩┐╜ivateli !'
  108.       ''
  109.       'Registrace programu Contact spo∩┐╜∩┐╜v∩┐╜ ve dvou kroc∩┐╜ch:'
  110.       ''
  111.       '1. Sestaven∩┐╜ a doru∩┐╜en∩┐╜ objedn∩┐╜vky licence do spole∩┐╜nosti'
  112.       '   Supreme Technologies. To lze u∩┐╜init nap∩┐╜. volbou v menu'
  113.       '   Program-Objedn∩┐╜vka. Sou∩┐╜∩┐╜st∩┐╜ objedn∩┐╜vky je registra∩┐╜n∩┐╜'
  114.       '   ∩┐╜∩┐╜slo, kter∩┐╜ je nezbytn∩┐╜ k tomu, aby V∩┐╜m mohlo b∩┐╜t zasl∩┐╜no'
  115.       '   licen∩┐╜n∩┐╜ ∩┐╜∩┐╜slo.'
  116.       ''
  117.       '2. Zad∩┐╜n∩┐╜ licen∩┐╜n∩┐╜ho ∩┐╜∩┐╜sla do programu Supreme Contact.'
  118.       '   T∩┐╜m je registrace dokon∩┐╜ena a program m∩┐╜∩┐╜ete za∩┐╜∩┐╜t pln∩┐╜'
  119.       '   vyu∩┐╜∩┐╜vat. Tuto operaci provedete v tomto okn∩┐╜.'
  120.       ' ')
  121.     ReadOnly = True
  122.     TabOrder = 3
  123.   end
  124.   object EditLic: TMaskEditPlus
  125.     Left = 108
  126.     Top = 280
  127.     Width = 105
  128.     Height = 21
  129.     CharCase = ecUpperCase
  130.     EditMask = 'AA AA AA AA AA;0;∩┐╜'
  131.     MaxLength = 14
  132.     TabOrder = 0
  133.     OnChange = EditLicChange
  134.     OnKeyPress = EditLicKeyPress
  135.   end
  136.   object Wallpaper1: TWallpaper
  137.     ResourceName = 'WALLPAPER'
  138.     Left = 8
  139.     Top = 328
  140.   end
  141. end
  142.