home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 January / Pcwk0198.iso / Zadarmo / CLARION / CLARION.EXE / 0 / RCDATA / TFMNEWCD / TFMNEWCD.txt
Text File  |  1997-10-06  |  3KB  |  132 lines
  1. object fmNewCD: TfmNewCD
  2.   Left = 192
  3.   Top = 73
  4.   BorderIcons = [biSystemMenu]
  5.   BorderStyle = bsDialog
  6.   Caption = 'New CD Detected'
  7.   ClientHeight = 419
  8.   ClientWidth = 407
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -13
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   Position = poScreenCenter
  15.   PixelsPerInch = 120
  16.   TextHeight = 16
  17.   object Label1: TLabel
  18.     Left = 16
  19.     Top = 8
  20.     Width = 357
  21.     Height = 29
  22.     AutoSize = False
  23.     Caption = 
  24.       'This appears to be a new CD.  You have several choices of action' +
  25.       ':'
  26.     Font.Charset = DEFAULT_CHARSET
  27.     Font.Color = clWindowText
  28.     Font.Height = -13
  29.     Font.Name = 'MS Sans Serif'
  30.     Font.Style = [fsBold]
  31.     ParentFont = False
  32.     WordWrap = True
  33.   end
  34.   object Label2: TLabel
  35.     Left = 20
  36.     Top = 61
  37.     Width = 281
  38.     Height = 32
  39.     Caption = 
  40.       '1. You can manually  enter the CD info yourself.  Begin by enter' +
  41.       'ing the disc title then click Okay'
  42.     WordWrap = True
  43.   end
  44.   object Label4: TLabel
  45.     Left = 20
  46.     Top = 324
  47.     Width = 325
  48.     Height = 32
  49.     Caption = 
  50.       '3. If this is not an Audio CD or you don'#39't want to play this CD ' +
  51.       'now, click Ignore CD'
  52.     WordWrap = True
  53.   end
  54.   object Bevel1: TBevel
  55.     Left = 12
  56.     Top = 48
  57.     Width = 385
  58.     Height = 97
  59.     Shape = bsFrame
  60.   end
  61.   object Bevel2: TBevel
  62.     Left = 12
  63.     Top = 188
  64.     Width = 385
  65.     Height = 113
  66.     Shape = bsFrame
  67.   end
  68.   object Bevel3: TBevel
  69.     Left = 12
  70.     Top = 312
  71.     Width = 385
  72.     Height = 93
  73.     Shape = bsFrame
  74.   end
  75.   object Label3: TLabel
  76.     Left = 20
  77.     Top = 200
  78.     Width = 336
  79.     Height = 48
  80.     Caption = 
  81.       '2. If you have an internet connection and you are not behind a f' +
  82.       'irewall, you can look up the disc and track titles by connecting' +
  83.       ' to the internet CD database (CDDB)'
  84.     WordWrap = True
  85.   end
  86.   object edTitle: TEdit
  87.     Left = 28
  88.     Top = 107
  89.     Width = 285
  90.     Height = 25
  91.     AutoSize = False
  92.     TabOrder = 0
  93.   end
  94.   object cbOpen: TCheckBox
  95.     Left = 28
  96.     Top = 153
  97.     Width = 345
  98.     Height = 25
  99.     Caption = '&Open a new play list and link it to this CD (for 1. and 2.)'
  100.     TabOrder = 2
  101.   end
  102.   object bOk: TButton
  103.     Left = 320
  104.     Top = 108
  105.     Width = 65
  106.     Height = 25
  107.     Caption = 'O&kay'
  108.     Default = True
  109.     ModalResult = 1
  110.     TabOrder = 1
  111.     OnClick = bOkClick
  112.   end
  113.   object Button1: TButton
  114.     Left = 25
  115.     Top = 368
  116.     Width = 356
  117.     Height = 25
  118.     Caption = '&Ignore CD'
  119.     ModalResult = 5
  120.     TabOrder = 4
  121.   end
  122.   object bCDDB: TButton
  123.     Left = 28
  124.     Top = 264
  125.     Width = 349
  126.     Height = 25
  127.     Caption = 'CDDB lookup (requires internet connection)'
  128.     ModalResult = 4
  129.     TabOrder = 3
  130.   end
  131. end
  132.