Chip 2003 April (Special)/Chip-Special_2003-04_Vypalujeme-cd-i-dvd.bin/soft/instantcopy/InstantCopy.msi/Cabs.w1.cab/CDWizard.EXE/0/RCDATA/TCDDBSETTINGSFORM/TCDDBSETTINGSFORM.txt

Text File | 2002-12-06 | 3.1 KB | 146 lines

object CDDBSettingsForm: TCDDBSettingsForm
  Left = 378
  Top = 461
  BorderStyle = bsDialog
  Caption = 'Title Recognition Settings'
  ClientHeight = 286
  ClientWidth = 428
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object pcCDDB: TPageControl
    Left = 8
    Top = 8
    Width = 411
    Height = 241
    ActivePage = tsCDDBServers
    TabOrder = 0
    object tsGeneral: TTabSheet
      Caption = 'General'
      ImageIndex = 1
      object Label1: TLabel
        Left = 16
        Top = 24
        Width = 117
        Height = 13
        Caption = 'e-mail address (required):'
      end
      object edEMail: TEdit
        Left = 144
        Top = 20
        Width = 161
        Height = 21
        TabOrder = 0
      end
      object rgNotExact: TRadioGroup
        Left = 16
        Top = 64
        Width = 369
        Height = 57
        Caption = 'If the server returns more than one match'
        ItemIndex = 0
        Items.Strings = (
          'automatically choose the first match (best match)'
          'let the user choose from the list of matches')
        TabOrder = 1
      end
    end
    object tsCDDBServers: TTabSheet
      Caption = 'Title Database Server'
      object Label3: TLabel
        Left = 8
        Top = 8
        Width = 105
        Height = 13
        Caption = 'Database server sites:'
      end
      object lblState: TLabel
        Left = 64
        Top = 160
        Width = 249
        Height = 13
        AutoSize = False
      end
      object Label4: TLabel
        Left = 8
        Top = 160
        Width = 33
        Height = 13
        Caption = 'Status:'
      end
      object lvCDDBSites: TListView
        Left = 8
        Top = 28
        Width = 305
        Height = 121
        Columns = <
          item
            Caption = 'Sitename'
            Width = 90
          end
          item
            Caption = 'Port'
            Width = 70
          end
          item
            Caption = 'Location'
            Width = 120
          end>
        HideSelection = False
        ReadOnly = True
        RowSelect = True
        TabOrder = 0
        ViewStyle = vsReport
      end
      object btnGetSites: TButton
        Left = 8
        Top = 182
        Width = 89
        Height = 23
        Caption = 'Get server list'
        TabOrder = 1
        OnClick = btnGetSitesClick
      end
    end
  end
  object btnOK: TButton
    Left = 256
    Top = 256
    Width = 75
    Height = 23
    Caption = 'OK'
    ModalResult = 1
    TabOrder = 1
  end
  object btnCancel: TButton
    Left = 344
    Top = 256
    Width = 75
    Height = 23
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 2
  end
  object MMCDDB: TMMCDDB
    OnState = MMCDDBState
    ConnectTimeOut = 30000
    AppName = 'testapp'
    Revision = '1.0'
    Email = '[e-mail]'
    Port = 8880
    Server = 'freedb.freedb.org'
    UseFirstMatch = False
    Left = 12
    Top = 256
  end
end