inherited CDLookupForm: TCDLookupForm
  HorzScrollBar.Range = 0
  VertScrollBar.Range = 0
  AutoScroll = False
  Caption = 'CD Database Internet Connection'
  ClientHeight = 75
  ClientWidth = 368
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited ButtonOk: TButton
    Left = 147
    Top = 41
    Anchors = [akRight, akBottom]
    Default = False
    Enabled = False
    Visible = False
  end
  inherited ButtonCancel: TButton
    Left = 147
    Top = 41
    Anchors = [akRight, akBottom]
    Default = True
    OnClick = ButtonCancelClick
  end
  object Status: TStaticText
    Left = 5
    Top = 13
    Width = 358
    Height = 17
    Alignment = taCenter
    Anchors = [akLeft, akTop, akRight]
    AutoSize = False
    BorderStyle = sbsSunken
    Caption = 'Status'
    TabOrder = 2
  end
  object Socket: TClientSocket
    Active = False
    ClientType = ctNonBlocking
    Host = 'freedb.freedb.org'
    Port = 8880
    OnLookup = SocketLookup
    OnConnecting = SocketConnecting
    OnConnect = SocketConnect
    OnDisconnect = SocketDisconnect
    OnRead = SocketRead
    OnError = SocketError
    Left = 30
    Top = 34
  end
end