object PagesDlg: TPagesDlg
  Left = 190
  Top = 107
  ActiveControl = ComboBox3
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'The Freeware Currency Converter'
  ClientHeight = 173
  ClientWidth = 548
  Color = clBtnFace
  ParentFont = True
  Icon.Data = {<image000.ico>}
  OldCreateOrder = True
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl2: TPageControl
    Left = 0
    Top = 0
    Width = 548
    Height = 173
    ActivePage = Settings
    Align = alClient
    TabOrder = 0
    object Euroland: TTabSheet
      Caption = 'User'
      object GroupBox1: TGroupBox
        Left = 8
        Top = 8
        Width = 521
        Height = 97
        Caption = ' Preferred Currency '
        TabOrder = 0
        object Label1: TLabel
          Left = 107
          Top = 44
          Width = 22
          Height = 13
          Alignment = taRightJustify
          Caption = 'NLG'
        end
        object Label2: TLabel
          Left = 280
          Top = 44
          Width = 46
          Height = 13
          Caption = '=  EURO:'
        end
        object Edit2: TEdit
          Left = 384
          Top = 40
          Width = 121
          Height = 21
          TabOrder = 1
          OnChange = Edit2Change
          OnEnter = Edit2Enter
        end
        object Edit1: TEdit
          Left = 144
          Top = 40
          Width = 121
          Height = 21
          TabOrder = 0
          OnChange = Edit1Change
          OnEnter = Edit1Enter
        end
      end
      object Button1: TButton
        Left = 374
        Top = 112
        Width = 75
        Height = 25
        Hint = 'Copy to Clipboard'
        Caption = 'C&opy'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        OnClick = Button1Click
      end
      object Button4: TButton
        Left = 8
        Top = 112
        Width = 75
        Height = 25
        Hint = 'Copy to clipboard'
        Caption = '&Copy'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = Button4Click
      end
      object Button5: TButton
        Left = 88
        Top = 112
        Width = 75
        Height = 25
        Hint = 'Past from Clipboard'
        Caption = '&Paste'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnClick = Button5Click
      end
      object Button6: TButton
        Left = 454
        Top = 112
        Width = 75
        Height = 25
        Hint = 'Past from Clipboard'
        Caption = 'P&aste'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        OnClick = Button6Click
      end
    end
    object European: TTabSheet
      Caption = 'World'
      object GroupBox2: TGroupBox
        Left = 8
        Top = 8
        Width = 521
        Height = 97
        Caption = ' World Currency '
        TabOrder = 0
        object Label3: TLabel
          Left = 256
          Top = 44
          Width = 6
          Height = 13
          Caption = '='
        end
        object Edit3: TEdit
          Left = 16
          Top = 40
          Width = 89
          Height = 21
          TabOrder = 0
          OnChange = Edit3Change
          OnEnter = Edit3Enter
        end
        object Edit4: TEdit
          Left = 272
          Top = 40
          Width = 89
          Height = 21
          TabStop = False
          AutoSelect = False
          Color = clBtnFace
          ReadOnly = True
          TabOrder = 3
          OnEnter = Edit4Enter
        end
        object ComboBox1: TComboBox
          Left = 112
          Top = 40
          Width = 137
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 1
          OnChange = ComboBox1Change
        end
        object ComboBox2: TComboBox
          Left = 368
          Top = 40
          Width = 137
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 2
          OnChange = ComboBox2Change
        end
      end
      object Button2: TButton
        Left = 454
        Top = 112
        Width = 75
        Height = 25
        Hint = 'Copy to Clipboard'
        Caption = '&Copy'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        OnClick = Button2Click
      end
      object Button7: TButton
        Left = 8
        Top = 112
        Width = 75
        Height = 25
        Hint = 'Past from Clipboard'
        Caption = '&Paste'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = Button7Click
      end
      object SwitchButton: TButton
        Left = 232
        Top = 112
        Width = 75
        Height = 25
        Hint = 'Switch Left and Right'
        Caption = '&Switch'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnClick = SwitchButtonClick
      end
    end
    object Settings: TTabSheet
      Caption = 'Settings'
      ImageIndex = 3
      object Label11: TLabel
        Left = 272
        Top = 116
        Width = 37
        Height = 13
        Caption = 'Source:'
      end
      object CheckBox2: TCheckBox
        Left = 272
        Top = 88
        Width = 89
        Height = 17
        Hint = 'Automatically save settings at exit'
        BiDiMode = bdLeftToRight
        Caption = 'Save Settings'
        ParentBiDiMode = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
      end
      object GroupBox4: TGroupBox
        Left = 8
        Top = 8
        Width = 249
        Height = 69
        Caption = ' User '
        TabOrder = 0
        object Label6: TLabel
          Left = 8
          Top = 18
          Width = 39
          Height = 13
          Caption = 'Curr 1st:'
        end
        object Label7: TLabel
          Left = 8
          Top = 42
          Width = 43
          Height = 13
          Caption = 'Curr 2nd:'
        end
        object ComboBox5: TComboBox
          Left = 64
          Top = 38
          Width = 169
          Height = 21
          Hint = 'Select currency'
          Style = csDropDownList
          ItemHeight = 13
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnChange = ComboBox5Change
        end
        object ComboBox3: TComboBox
          Left = 64
          Top = 14
          Width = 169
          Height = 21
          Hint = 'Select currency'
          Style = csDropDownList
          Ctl3D = True
          ItemHeight = 13
          ParentCtl3D = False
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          OnChange = ComboBox3Change
        end
      end
      object CheckBox4: TCheckBox
        Left = 360
        Top = 88
        Width = 81
        Height = 17
        Hint = 'Automatically save settings at exit'
        Caption = 'Save Rates'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
      end
      object SaveButton: TButton
        Left = 450
        Top = 112
        Width = 79
        Height = 25
        Hint = 'Save Settings Now'
        Caption = 'Save Now'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 6
        OnClick = SaveButtonClick
      end
      object GroupBox3: TGroupBox
        Left = 264
        Top = 8
        Width = 265
        Height = 69
        Caption = ' Internet '
        TabOrder = 1
        object Label10: TLabel
          Left = 188
          Top = 24
          Width = 22
          Height = 13
          Caption = 'Port:'
        end
        object Label9: TLabel
          Left = 8
          Top = 24
          Width = 29
          Height = 13
          Caption = 'Proxy:'
        end
        object Edit7: TEdit
          Left = 214
          Top = 20
          Width = 41
          Height = 21
          Hint = 'Enter Proxyserver port number'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnChange = Edit7Change
        end
        object Edit6: TEdit
          Left = 40
          Top = 20
          Width = 145
          Height = 21
          Hint = 'Enter Proxy-address'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          OnChange = Edit6Change
        end
        object CheckBox3: TCheckBox
          Left = 72
          Top = 46
          Width = 73
          Height = 17
          Hint = 'Use http-proxy'
          Caption = 'Use Proxy'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          OnClick = CheckBox3Click
        end
        object CheckBox5: TCheckBox
          Left = 8
          Top = 46
          Width = 65
          Height = 17
          Caption = 'Use File'
          TabOrder = 2
          OnClick = CheckBox5Click
        end
        object CheckBox1: TCheckBox
          Left = 152
          Top = 46
          Width = 97
          Height = 17
          Hint = 'Automatically update once a day'
          Caption = 'Auto-Update'
          TabOrder = 4
        end
      end
      object GroupBox5: TGroupBox
        Left = 8
        Top = 80
        Width = 249
        Height = 57
        Caption = ' Decimals '
        TabOrder = 3
        object Label8: TLabel
          Left = 8
          Top = 24
          Width = 46
          Height = 13
          Caption = 'Decimals:'
        end
        object ComboBox4: TComboBox
          Left = 64
          Top = 20
          Width = 33
          Height = 21
          Hint = 'Select number of decimals'
          Style = csDropDownList
          BiDiMode = bdLeftToRight
          ItemHeight = 13
          ParentBiDiMode = False
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          OnChange = ComboBox4Change
        end
        object ComboBox6: TComboBox
          Left = 104
          Top = 20
          Width = 129
          Height = 21
          Hint = 'Select the use of number-grouping'
          Style = csDropDownList
          ItemHeight = 13
          Items.Strings = (
            'Decimal '#39'.'#39' '
            'Decimal '#39','#39' '
            'Grouping '#39','#39' Decimal '#39'.'#39
            'Grouping '#39'.'#39' Decimal '#39','#39)
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnChange = ComboBox6Change
        end
      end
      object ComboBox7: TComboBox
        Left = 312
        Top = 112
        Width = 129
        Height = 21
        Hint = 'Select Currency-source'
        Style = csDropDownList
        ItemHeight = 13
        Items.Strings = (
          'Pacific'
          'IMF')
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
        OnChange = ComboBox7Change
      end
      object CheckBox6: TCheckBox
        Left = 440
        Top = 88
        Width = 97
        Height = 17
        Caption = 'Save Position'
        TabOrder = 7
      end
    end
    object Rates: TTabSheet
      Caption = 'Rates'
      ImageIndex = 4
      OnExit = RatesExit
      object Label12: TLabel
        Left = 320
        Top = 14
        Width = 37
        Height = 13
        Caption = 'Search:'
      end
      object Button3: TButton
        Left = 8
        Top = 8
        Width = 97
        Height = 25
        Hint = 'Load update from Internet'
        Caption = '&Internet Update'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnClick = Button3Click
      end
      object ListView1: TListView
        Left = 0
        Top = 40
        Width = 539
        Height = 105
        AllocBy = 400
        Checkboxes = True
        Columns = <
          item
            Caption = 'Currency'
            Width = 210
          end
          item
            Caption = 'Units/USD'
            Width = 100
          end
          item
            Caption = 'Last Updated'
            Width = 200
          end>
        HotTrackStyles = []
        ReadOnly = True
        RowSelect = True
        PopupMenu = ValutaPop
        TabOrder = 6
        ViewStyle = vsReport
        OnChange = ListView1Change
        OnDblClick = ListView1DblClick
      end
      object Button8: TButton
        Left = 112
        Top = 8
        Width = 57
        Height = 25
        Hint = 'Save Exchange Rates'
        Caption = '&Save'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        OnClick = Button8Click
      end
      object Button9: TButton
        Left = 168
        Top = 8
        Width = 57
        Height = 25
        Hint = 'Reload Exchange Rates'
        Caption = '&Reload'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        OnClick = Button9Click
      end
      object Button12: TButton
        Left = 232
        Top = 8
        Width = 75
        Height = 25
        Hint = 'Add user-currency'
        Caption = '&Add'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
        OnClick = Button12Click
      end
      object Edit9: TEdit
        Left = 362
        Top = 10
        Width = 89
        Height = 21
        Hint = 'Enter text to search for'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnChange = Edit9Change
      end
      object Button10: TButton
        Left = 456
        Top = 8
        Width = 75
        Height = 25
        Hint = 'Find next'
        Caption = 'Find next'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnClick = Button10Click
      end
    end
    object About: TTabSheet
      Caption = 'About'
      ImageIndex = 2
      object Image1: TImage
        Left = 0
        Top = 8
        Width = 41
        Height = 33
        Center = True
        Picture.Data = {<image001.ico>}
      end
      object Label4: TLabel
        Left = 48
        Top = 8
        Width = 166
        Height = 13
        Caption = 'Copyright (c) 1999 Alex Belgraver - '
      end
      object Label5: TLabel
        Left = 48
        Top = 28
        Width = 51
        Height = 13
        Caption = 'WebPage:'
      end
      object Memo1: TMemo
        Left = 0
        Top = 48
        Width = 539
        Height = 97
        ReadOnly = True
        ScrollBars = ssVertical
        TabOrder = 0
        WantReturns = False
      end
      object Edit5: TEdit
        Left = 104
        Top = 28
        Width = 233
        Height = 18
        Cursor = crHandPoint
        Hint = 'Visit the webpage'
        BorderStyle = bsNone
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsUnderline]
        ParentFont = False
        ParentShowHint = False
        ReadOnly = True
        ShowHint = True
        TabOrder = 1
        Text = 'http://www.belgraver.demon.nl/currconv/'
        OnClick = Edit5Click
      end
      object Edit8: TEdit
        Left = 216
        Top = 8
        Width = 129
        Height = 21
        Cursor = crHandPoint
        Hint = 'E-mail Alex'
        BorderStyle = bsNone
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsUnderline]
        ParentFont = False
        ParentShowHint = False
        ReadOnly = True
        ShowHint = True
        TabOrder = 2
        Text = 'alex@belgraver.demon.nl'
        OnClick = Edit8Click
      end
    end
  end
  object ClientSocket1: TClientSocket
    Active = False
    ClientType = ctNonBlocking
    Port = 80
    OnConnect = ClientSocket1Connect
    OnDisconnect = ClientSocket1Disconnect
    OnRead = ClientSocket1Read
    OnError = ClientSocket1Error
    Left = 504
    Top = 8
  end
  object ValutaPop: TPopupMenu
    OnPopup = ValutaPopPopup
    Left = 472
    Top = 8
    object VPopUse1: TMenuItem
      Caption = 'Use'
      OnClick = VPopUse1Click
      OnDrawItem = VPopUse1DrawItem
    end
    object VPopEdit1: TMenuItem
      Caption = 'Edit...'
      OnClick = VPopEdit1Click
    end
    object VPopRemove1: TMenuItem
      Caption = 'Remove'
      OnClick = VPopRemove1Click
    end
  end
  object ImageList1: TImageList
    Left = 440
    Top = 8
    Bitmap = {
      3604000002000000424D36040000000000003600000028000000200000001000
      0000010010000000000000040000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000EF0100000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000EF01EF010000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000EF01EF01EF01EF01EF01EF01EF01000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000EF01EF01EF01EF01EF01EF01EF01EF0100000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000EF01EF01EF01EF01EF01EF01EF01000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000EF01EF010000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000EF0100000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000000000000000424D
      7E000000000000003E0000002800000020000000100000000100010000000000
      400000000000000000000000020000000000000000000000FFFFFF00FFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFEFFFFFFFE7FFFFFFE3FFFFFE01FFFFFE00FFFFFE007
      FFFFE00FFFFFE01FFFFFFE3FFFFFFE7FFFFFFEFFFFFFFFFFFFFFFFFF}
  end
  object OpenDialog1: TOpenDialog
    Filter = 
      'Currency HTML Files|rates.html;8101.htm|HTML Files|*.html;*.htm|' +
      'All Files (*.*)|*.*'
    Left = 408
    Top = 8
  end
end