Komputer for Alle 2002 #10/K-CD-10-2002.ISO/Tools/InterCent/_SETUP.1/Intercent99.exe/0/RCDATA/TFRMCALCWAY/TFRMCALCWAY.txt

Text File | 1999-06-01 | 32.5 KB | 1,177 lines

object FrmCalcWay: TFrmCalcWay
  Left = 182
  Top = 69
  HelpContext = 8900
  BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
  BorderStyle = bsDialog
  Caption = 'Wizard telefoonkosten instellen'
  ClientHeight = 364
  ClientWidth = 417
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel6: TBevel
    Left = 8
    Top = 72
    Width = 313
    Height = 9
    Shape = bsTopLine
  end
  object Label12: TLabel
    Left = 24
    Top = 24
    Width = 290
    Height = 26
    Alignment = taCenter
    Caption =
      'Met deze wizard kunt u de juiste telefoontarieven, daluren en wi' +
      'jze van berekening instellen.'
    WordWrap = True
  end
  object Bevel9: TBevel
    Left = 0
    Top = 322
    Width = 409
    Height = 9
    Shape = bsTopLine
    Style = bsRaised
  end
  object BtnNext: TBitBtn
    Left = 224
    Top = 332
    Width = 89
    Height = 25
    HelpContext = 9908
    Caption = '&Verder'
    Default = True
    TabOrder = 0
    OnClick = BtnNextClick
    Layout = blGlyphRight
  end
  object BtnBack: TBitBtn
    Left = 126
    Top = 332
    Width = 91
    Height = 25
    HelpContext = 9907
    Caption = '&Terug'
    Default = True
    Enabled = False
    TabOrder = 1
    OnClick = BtnBackClick
  end
  object Ntb: TNotebook
    Left = 8
    Top = 8
    Width = 401
    Height = 313
    HelpContext = 8900
    TabOrder = 3
    object TPage
      Left = 0
      Top = 0
      Caption = 'Start'
      object L1: TLabel
        Left = 40
        Top = 8
        Width = 353
        Height = 57
        Alignment = taCenter
        Caption =
          'Met deze wizard kunt u de juiste telefoontarieven, daluren en wi' +
          'jze van berekening instellen. U kunt ook in ��n keer de juiste i' +
          'nstellingen kiezen door een land te selekteren.'
        WordWrap = True
      end
      object Bevel3: TBevel
        Left = 0
        Top = 72
        Width = 401
        Height = 9
        Shape = bsTopLine
      end
      object l2: TLabel
        Left = 16
        Top = 104
        Width = 361
        Height = 41
        Alignment = taCenter
        AutoSize = False
        Caption =
          'Selecteer het land waarin u zich bevindt of kies '#39'Zelf instellen' +
          ' om zelf alle gegevens in te stellen indien uw land niet voorkom' +
          't in de lijst'
        WordWrap = True
      end
      object Image2: TImage
        Left = 8
        Top = 8
        Width = 32
        Height = 32
        Picture.Data = {<image000.ico>}
      end
      object CmbCountries: TComboBox
        Left = 16
        Top = 160
        Width = 361
        Height = 21
        Hint = 'Preset'
        Style = csDropDownList
        ItemHeight = 13
        Sorted = True
        TabOrder = 0
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Startcosts'
      object Bevel4: TBevel
        Left = 0
        Top = 72
        Width = 401
        Height = 9
        Shape = bsTopLine
      end
      object l3: TLabel
        Left = 48
        Top = 8
        Width = 345
        Height = 57
        Alignment = taCenter
        AutoSize = False
        Caption =
          'Hier geeft u aan of er startkosten worden berekend of dat er spr' +
          'ake is van een starttarief voor een bepaalde periode.'
        WordWrap = True
      end
      object Bevel2: TBevel
        Left = 0
        Top = 145
        Width = 401
        Height = 25
        Shape = bsTopLine
      end
      object Image1: TImage
        Left = 8
        Top = 8
        Width = 32
        Height = 32
        Picture.Data = {<image001.ico>}
      end
      object NtbInitCosts: TNotebook
        Left = 8
        Top = 168
        Width = 385
        Height = 129
        TabOrder = 1
        object TPage
          Left = 0
          Top = 0
          Caption = 'Init1'
          object L_single1: TLabel
            Left = 16
            Top = 24
            Width = 129
            Height = 13
            AutoSize = False
            Caption = 'E�nmalige kosten'
          end
          object CurrLabel3: TCurrLabel
            Left = 120
            Top = 24
            Width = 40
            Height = 13
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'F'
            Transparent = True
            ShowSymbol = True
            InEuros = False
          end
          object eeSingleCost: TEasyEdit
            Left = 168
            Top = 20
            Width = 57
            Height = 21
            Hint = 'Start1_Single'
            HelpContext = 8902
            TabOrder = 0
            Text = '0,1000'
            FocusColor = clWindow
            Alignment = taRightJustify
            EditType = etFloat
            EditDec = 4
            EditDecSep = esComma
            DisplayAsLabel = False
            TextAsInteger = 0
            TextAsFloat = 0.100000000000000000
            About = 'EasyEdit 1.00 (C) 98,Finiware'
            Registered = 'Yes'
          end
        end
        object TPage
          Left = 0
          Top = 0
          Caption = 'Init2'
          object L_Minimum1: TLabel
            Left = 16
            Top = 24
            Width = 105
            Height = 13
            AutoSize = False
            Caption = 'Minimumkosten'
          end
          object L_HighRate1: TLabel
            Left = 216
            Top = 24
            Width = 153
            Height = 13
            AutoSize = False
            Caption = 'hoog tarief'
          end
          object L_OtherRates1: TLabel
            Left = 216
            Top = 56
            Width = 161
            Height = 13
            AutoSize = False
            Caption = 'overige tarieven'
          end
          object CurrLabel1: TCurrLabel
            Left = 96
            Top = 24
            Width = 40
            Height = 13
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'F'
            Transparent = True
            ShowSymbol = True
            InEuros = False
          end
          object CurrLabel2: TCurrLabel
            Left = 96
            Top = 56
            Width = 40
            Height = 13
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'F'
            Transparent = True
            ShowSymbol = True
            InEuros = False
          end
          object eeMinCost: TEasyEdit
            Left = 144
            Top = 20
            Width = 57
            Height = 21
            Hint = 'Start2_Minimum'
            HelpContext = 8902
            TabOrder = 0
            Text = '0,0000'
            FocusColor = clWindow
            Alignment = taRightJustify
            EditType = etFloat
            EditDec = 4
            EditDecSep = esComma
            DisplayAsLabel = False
            TextAsInteger = 0
            TextAsFloat = 0.100000000000000000
            About = 'EasyEdit 1.00 (C) 98,Finiware'
            Registered = 'Yes'
          end
          object EasyEdit1: TEasyEdit
            Left = 144
            Top = 52
            Width = 57
            Height = 21
            Hint = 'Start2_Minimum_Low'
            HelpContext = 8902
            TabOrder = 1
            Text = '0,0000'
            FocusColor = clWindow
            Alignment = taRightJustify
            EditType = etFloat
            EditDec = 4
            EditDecSep = esComma
            DisplayAsLabel = False
            TextAsInteger = 0
            TextAsFloat = 0.100000000000000000
            About = 'EasyEdit 1.00 (C) 98,Finiware'
            Registered = 'Yes'
          end
        end
        object TPage
          Left = 0
          Top = 0
          Caption = 'Init3'
          object L_forfirst: TLabel
            Left = 148
            Top = 24
            Width = 61
            Height = 13
            AutoSize = False
            Caption = 'voor eerste'
          end
          object L_Sec1: TLabel
            Left = 258
            Top = 24
            Width = 47
            Height = 13
            Caption = 'seconden'
          end
          object L_startcost: TLabel
            Left = 16
            Top = 24
            Width = 57
            Height = 13
            Caption = 'Startkosten'
          end
          object L_InfoStart: TLabel
            Left = 16
            Top = 56
            Width = 361
            Height = 49
            AutoSize = False
            Caption =
              'Gebruik deze instelling alleen indien deze startkosten voor alle' +
              ' tariefsoorten geldt. Is dat niet het geval, kies dan voor '#39'Verv' +
              'olgtarieven'#39' verderop in deze wizard.'
            WordWrap = True
          end
          object eeStartCost: TEasyEdit
            Left = 80
            Top = 20
            Width = 57
            Height = 21
            Hint = 'Start3_Cost'
            HelpContext = 8902
            TabOrder = 0
            Text = '0,1000'
            FocusColor = clWindow
            Alignment = taRightJustify
            EditType = etFloat
            EditDec = 4
            EditDecSep = esComma
            DisplayAsLabel = False
            TextAsInteger = 0
            TextAsFloat = 0.100000000000000000
            About = 'EasyEdit 1.00 (C) 98,Finiware'
            Registered = 'Yes'
          end
          object eeStartSec: TEasyEdit
            Left = 216
            Top = 20
            Width = 33
            Height = 21
            Hint = 'Start3_Seconds'
            HelpContext = 8902
            TabOrder = 1
            Text = '0'
            FocusColor = clWindow
            Alignment = taRightJustify
            EditType = etInteger
            EditDec = 0
            EditDecSep = esComma
            DisplayAsLabel = False
            TextAsInteger = 0
            About = 'EasyEdit 1.00 (C) 98,Finiware'
            Registered = 'Yes'
          end
        end
      end
      object LbxStartCost: TListBox
        Left = 24
        Top = 84
        Width = 353
        Height = 57
        HelpContext = 8902
        BorderStyle = bsNone
        Color = clBtnFace
        ItemHeight = 13
        Items.Strings = (
          'E�nmalige kosten'
          'Minimum kosten'
          'Startkosten gedurende eerste ... sec')
        TabOrder = 0
        OnClick = LbxStartCostClick
        OnKeyDown = LbxStartCostKeyDown
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Calculation'
      object Bevel5: TBevel
        Left = 0
        Top = 72
        Width = 401
        Height = 9
        Shape = bsTopLine
      end
      object l4: TLabel
        Left = 48
        Top = 8
        Width = 345
        Height = 57
        Alignment = taCenter
        AutoSize = False
        Caption = 'Geef hier aan op welke wijze de telefoonkosten worden berekend. '
        WordWrap = True
      end
      object C: TBevel
        Left = 0
        Top = 145
        Width = 401
        Height = 9
        Shape = bsTopLine
      end
      object Image3: TImage
        Left = 8
        Top = 8
        Width = 32
        Height = 32
        Picture.Data = {<image002.ico>}
      end
      object NtbCalc: TNotebook
        Left = 8
        Top = 160
        Width = 385
        Height = 89
        HelpContext = 8903
        TabOrder = 1
        object TPage
          Left = 0
          Top = 0
          Caption = 'Init1'
        end
        object TPage
          Left = 0
          Top = 0
          Caption = 'Init2'
          object Label4: TLabel
            Left = 277
            Top = 28
            Width = 17
            Height = 13
            Caption = 'sec'
          end
          object L_CalcFixedTime: TLabel
            Left = 16
            Top = 28
            Width = 175
            Height = 13
            Caption = 'Eenheid met een vaste tijdsduur van '
          end
          object eeCalcFixedTime: TEasyEdit
            Left = 205
            Top = 25
            Width = 49
            Height = 21
            Hint = 'Phone2_Seconds'
            HelpContext = 602
            TabOrder = 0
            Text = '0'
            FocusColor = clWindow
            Alignment = taRightJustify
            EditType = etInteger
            EditDec = 0
            EditDecSep = esSystem
            DisplayAsLabel = False
            TextAsInteger = 0
            About = 'EasyEdit 1.00 (C) 98,Finiware'
            Registered = 'Yes'
          end
        end
        object TPage
          Left = 0
          Top = 0
          Caption = 'Init3'
          object L_sec4: TLabel
            Left = 293
            Top = 52
            Width = 17
            Height = 13
            Caption = 'sec'
            Visible = False
          end
          object L_FixedRateUnit: TLabel
            Left = 16
            Top = 52
            Width = 201
            Height = 13
            AutoSize = False
            Caption = '&Tijdsduur van 1 eenheid'
            Visible = False
          end
          object L_FixedRate1: TLabel
            Left = 16
            Top = 17
            Width = 193
            Height = 13
            AutoSize = False
            Caption = 'Eenheid met een vaste tarief van'
          end
          object CurrLabel4: TCurrLabel
            Left = 192
            Top = 18
            Width = 40
            Height = 13
            Alignment = taRightJustify
            AutoSize = False
            Caption = 'F'
            Transparent = True
            ShowSymbol = True
            InEuros = False
          end
          object eeCalcFixedRate: TEasyEdit
            Left = 237
            Top = 14
            Width = 49
            Height = 21
            Hint = 'Phone3_Rate'
            HelpContext = 603
            TabOrder = 0
            Text = '0,0000'
            FocusColor = clWindow
            Alignment = taRightJustify
            EditType = etFloat
            EditDec = 4
            EditDecSep = esComma
            DisplayAsLabel = False
            TextAsInteger = 0
            About = 'EasyEdit 1.00 (C) 98,Finiware'
            Registered = 'Yes'
          end
          object eeCalcUnit: TEasyEdit
            Left = 237
            Top = 49
            Width = 49
            Height = 21
            Hint = 'Phone3_Seconds'
            TabOrder = 1
            Text = '60'
            Visible = False
            FocusColor = clWindow
            Alignment = taRightJustify
            EditDec = 0
            EditDecSep = esSystem
            DisplayAsLabel = False
            TextAsInteger = 0
            TextAsFloat = 60.000000000000000000
            About = 'EasyEdit 1.00 (C) 98,Finiware'
            Registered = 'Yes'
          end
        end
      end
      object LbxCalcWay: TListBox
        Left = 24
        Top = 84
        Width = 353
        Height = 49
        HelpContext = 8903
        BorderStyle = bsNone
        Color = clBtnFace
        ItemHeight = 13
        Items.Strings = (
          'Per seconde'
          'Eenheid met een vaste tijdsduur van ... sec'
          'Eenheid met een vast tarief van ... per ... sec')
        TabOrder = 0
        OnClick = LbxCalcWayClick
        OnKeyDown = LbxCalcWayKeyDown
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Followup'
      object Bevel12: TBevel
        Left = 0
        Top = 80
        Width = 401
        Height = 9
        Shape = bsTopLine
      end
      object l5: TLabel
        Left = 48
        Top = 8
        Width = 345
        Height = 65
        Alignment = taCenter
        AutoSize = False
        Caption =
          'Hier geeft u aan of de telefoonmaatschappij een vervolgtarief ke' +
          'nt. Een vervolgtarief wil zeggen dat bijvoorbeeld gedurende de e' +
          'erste tien minuten een ander tarief van toepassing is, waarna he' +
          't vervolgtarief start.'
        WordWrap = True
      end
      object Bevel10: TBevel
        Left = 0
        Top = 144
        Width = 401
        Height = 9
        Shape = bsTopLine
      end
      object Image4: TImage
        Left = 8
        Top = 8
        Width = 32
        Height = 32
        Picture.Data = {<image003.ico>}
      end
      object LbxFollowUpRates: TListBox
        Left = 24
        Top = 100
        Width = 353
        Height = 37
        BorderStyle = bsNone
        Color = clBtnFace
        ItemHeight = 13
        Items.Strings = (
          'Nee, de telefoonmaatschappij kent geen vervolgtarieven'
          'Ja, de telefoonmaatschappij gebruikt vervolgtarieven')
        TabOrder = 0
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Rates'
      object L_Unit1: TLabel
        Left = 256
        Top = 188
        Width = 81
        Height = 13
        AutoSize = False
        Caption = 'per uur'
      end
      object Bevel7: TBevel
        Left = 0
        Top = 80
        Width = 401
        Height = 9
        Shape = bsTopLine
      end
      object l6: TLabel
        Left = 48
        Top = 8
        Width = 337
        Height = 65
        Alignment = taCenter
        AutoSize = False
        Caption =
          'Hier stelt u de tarieven en periodes in. Kies een tariefsoort ui' +
          't de lijst en klik op de rechthoeken om de uren en dagen in te s' +
          'tellen. Klik met de rechtermuisknop om halve uren in te stellen.' +
          ' Stel vervolgens de overige tarieven in.'
        WordWrap = True
      end
      object L_Kosten: TLabel
        Left = 104
        Top = 188
        Width = 65
        Height = 13
        AutoSize = False
        Caption = 'Kosten'
      end
      object L_AutoHighRate: TLabel
        Left = 96
        Top = 98
        Width = 217
        Height = 49
        AutoSize = False
        Caption =
          'Iedere periode dat niet is geselecteerd bij een van de andere ta' +
          'rieven valt automatisch onder het hoge tarief'
        WordWrap = True
      end
      object L_Currency: TCurrLabel
        Left = 144
        Top = 188
        Width = 40
        Height = 13
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'F'
        Transparent = True
        ShowSymbol = True
        InEuros = False
      end
      object BtnCalc: TExplorerButton
        Left = 320
        Top = 184
        Width = 20
        Height = 25
        Alignment = taLeftJustify
        Bitmap.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
          73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
          0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
          0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
          0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
          0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
          0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
          0333337F777777737F333308888888880333337F333333337F33330888888888
          03333373FFFFFFFF7333337000000000733333377777777733330000}
        Options = [boPopupMark, boShowBevel]
        OnClick = BtnCalcClick
        IBitmap = {
          424D360600000000000036000000280000002000000010000000010018000000
          00000006000000000000000000000000000000000000007F7F007F7FFFFFFF00
          0000000000000000000000000000000000000000000000000000FFFFFF007F7F
          007F7F007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFF007F7FFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFFFFFFFF007F7FFFFFFF007F7FFFFFFF007F
          7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFF000000FFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFF007F7FFFFFFF007F7FFFFF
          FFFFFFFFFFFFFF007F7FFFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFFFFFFFF007F7FFFFFFF007F7FFFFFFF007F
          7FFFFFFF007F7FFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFF000000FFFFFF000000FFFFFF000000FFFFFF000000FFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFF007F7FFFFFFF007F7FFFFF
          FF007F7FFFFFFF007F7FFFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFFFFFFFF007F7FFFFFFF007F7FFFFFFF007F
          7FFFFFFF007F7FFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFF000000FFFFFF000000FFFFFF000000FFFFFF000000FFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFF007F7FFFFFFF007F7FFFFF
          FF007F7FFFFFFF007F7FFFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFFFFFFFF007F7FFFFFFF007F7FFFFFFF007F
          7FFFFFFF007F7FFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFF000000FFFFFF000000FFFFFF000000FFFFFF000000FFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFF007F7FFFFFFF007F7FFFFF
          FF007F7FFFFFFF007F7FFFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFFFFFFFF007F7FFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFF000000000000000000000000000000000000000000FFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFF000000000000000000FFFFFF000000FFFFFF000000FFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFF000000000000000000000000000000000000000000FFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFF007F7FFFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFFFFFFFF007F7F007F7F007F7F007F7F007F
          7F007F7F007F7F007F7FFFFFFFFFFFFF007F7F007F7F007F7F007F7F000000FF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000007F7F
          007F7F007F7F007F7F007F7FFFFFFF007F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F007F7F007F7FFFFFFF00
          0000000000000000000000000000000000000000000000000000FFFFFF007F7F
          007F7F007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F007F7F}
      end
      object Image5: TImage
        Left = 8
        Top = 8
        Width = 32
        Height = 32
        Picture.Data = {<image004.ico>}
      end
      object eeRate: TEasyEdit
        Left = 192
        Top = 184
        Width = 57
        Height = 21
        HelpContext = 8907
        TabOrder = 2
        Text = '3,6026'
        OnExit = eeRateExit
        OnKeyPress = eeRateKeyPress
        FocusColor = clWindow
        Alignment = taRightJustify
        EditType = etFloat
        EditDec = 4
        EditDecSep = esSystem
        DisplayAsLabel = False
        TextAsInteger = 0
        About = 'EasyEdit 1.00 (C) 98,Finiware'
        Registered = 'Yes'
      end
      object PanSelPeriod: TPanel
        Left = 96
        Top = 90
        Width = 240
        Height = 81
        BevelOuter = bvNone
        TabOrder = 1
        Visible = False
      end
      object LbxRates: TListBox
        Left = 8
        Top = 98
        Width = 81
        Height = 143
        HelpContext = 8904
        BorderStyle = bsNone
        Color = clBtnFace
        ItemHeight = 13
        Items.Strings = (
          'Hoog tarief'
          'Laag tarief'
          'Tarief 3'
          'Tarief 4'
          'Tarief 5'
          'Tarief 6'
          'Tarief 7'
          'Tarief 8')
        TabOrder = 0
        OnClick = LbxRatesClick
        OnKeyDown = LbxRatesKeyDown
      end
      object PanFollowUp: TPanel
        Left = 96
        Top = 212
        Width = 241
        Height = 65
        BevelOuter = bvNone
        TabOrder = 3
        object L_Unit2: TLabel
          Left = 160
          Top = 6
          Width = 81
          Height = 13
          AutoSize = False
          Caption = 'per uur'
        end
        object l_following: TLabel
          Left = 8
          Top = 8
          Width = 81
          Height = 13
          AutoSize = False
          Caption = 'Vervolgens'
        end
        object L_aftersec: TLabel
          Left = 8
          Top = 38
          Width = 73
          Height = 13
          AutoSize = False
          Caption = 'na'
        end
        object L_secs: TLabel
          Left = 162
          Top = 38
          Width = 79
          Height = 13
          AutoSize = False
          Caption = 'sec'
        end
        object eeFollowSec: TEasyEdit
          Left = 96
          Top = 36
          Width = 57
          Height = 21
          HelpContext = 8907
          TabOrder = 0
          Text = '0'
          OnExit = eeFollowSecExit
          OnKeyPress = eeRateKeyPress
          FocusColor = clWindow
          Alignment = taRightJustify
          EditType = etInteger
          EditDec = 0
          EditDecSep = esSystem
          DisplayAsLabel = False
          TextAsInteger = 0
          About = 'EasyEdit 1.00 (C) 98,Finiware'
          Registered = 'Yes'
        end
        object eeFollow: TEasyEdit
          Left = 96
          Top = 4
          Width = 57
          Height = 21
          HelpContext = 8907
          TabOrder = 1
          Text = '0,0000'
          OnExit = eeFollowExit
          OnKeyPress = eeRateKeyPress
          FocusColor = clWindow
          Alignment = taRightJustify
          EditType = etFloat
          EditDec = 4
          EditDecSep = esSystem
          DisplayAsLabel = False
          TextAsInteger = 0
          About = 'EasyEdit 1.00 (C) 98,Finiware'
          Registered = 'Yes'
        end
      end
      object PanDay: TPanel
        Left = 104
        Top = 88
        Width = 289
        Height = 41
        HelpContext = 8905
        BevelOuter = bvNone
        Locked = True
        TabOrder = 4
        object HrsDays: THourSel
          Left = 0
          Top = 8
          Width = 289
          About =
            'THourSel 1.41 (C) , Finiware, FREEWARE D2/D4-component. Created ' +
            'by Mike/Finiware.'
          AllowHalfAnHour = False
          AutoHint = False
          AutoSelect = asSelectDeselect
          DayNames = 'ma /di /wo /do /vr /za /zo /'
          HsBorderColor = clActiveCaption
          HsDeselectColor = clInactiveCaption
          HsSelectColor = clActiveCaption
          HintTitle = 'Selected hours'
          RangeIndex = 1
          RegistryValue = '000000000000000000000000'
          ShowLabels = True
          TypeSelect = tsDays
        end
      end
      object PanHrs: TPanel
        Left = 104
        Top = 136
        Width = 289
        Height = 41
        HelpContext = 8906
        BevelOuter = bvNone
        TabOrder = 5
        object HrsHours: THourSel
          Left = 0
          Top = 0
          Width = 289
          Hint = 'Selected hours'#13#10#13#10
          About =
            'THourSel 1.41 (C) , Finiware, FREEWARE D2/D4-component. Created ' +
            'by Mike/Finiware.'
          AllowHalfAnHour = True
          AutoHint = True
          AutoSelect = asSelectDeselect
          DayNames = 'zo /ma /di /wo /do /vr /za /'
          HsBorderColor = clActiveCaption
          HsDeselectColor = clInactiveCaption
          HsSelectColor = clActiveCaption
          HintTitle = 'Selected hours'
          RangeIndex = 1
          RegistryValue = '000000000000000000000000'
          ShowLabels = True
          TypeSelect = tsHours
          ShowHint = True
          OnMouseDown = HrsHoursMouseDown
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Holidays'
      object L_Rate: TLabel
        Left = 128
        Top = 244
        Width = 57
        Height = 13
        AutoSize = False
        Caption = '&Tariefsoort'
      end
      object Bevel1: TBevel
        Left = 0
        Top = 88
        Width = 401
        Height = 17
        Shape = bsTopLine
      end
      object l7: TLabel
        Left = 48
        Top = 8
        Width = 337
        Height = 73
        Alignment = taCenter
        AutoSize = False
        Caption =
          'U kunt hier vakantieperiodes selecteren, waarop een ander tarief' +
          ' geldt. Selecteer links een maand en klik op de kalender om dage' +
          'n te selecteren. Geef vervolgens de tariefsoort aan. Deze is van' +
          ' toepassing op alle vakantie- en feestdagen.'
        WordWrap = True
      end
      object Image6: TImage
        Left = 8
        Top = 8
        Width = 32
        Height = 32
        Picture.Data = {<image005.ico>}
      end
      object CmbRateVak: TComboBox
        Left = 192
        Top = 240
        Width = 193
        Height = 21
        HelpContext = 8910
        Style = csDropDownList
        ItemHeight = 13
        Items.Strings = (
          'Hoog tarief'
          'Laag tarief'
          'Tarief 3'
          'Tarief 4'
          'Tarief 5'
          'Tarief 6'
          'Tarief 7'
          'Tarief 8')
        TabOrder = 2
      end
      object LbxMonth: TListBox
        Left = 8
        Top = 104
        Width = 105
        Height = 177
        BorderStyle = bsNone
        Color = clBtnFace
        ItemHeight = 13
        Items.Strings = (
          'Januari'
          'Februari'
          'Maart'
          'April'
          'Mei'
          'Juni'
          'Juli'
          'Augustus'
          'September'
          'Oktober'
          'November'
          'December')
        TabOrder = 0
        OnClick = LbxMonthClick
        OnKeyDown = LbxMonthKeyDown
      end
      object CalSel: TCalSel
        Left = 128
        Top = 104
        Width = 257
        Height = 129
        HelpContext = 8909
        FontColorSel = clWhite
        ColorSel = clActiveCaption
        DayNames = 'ma/di/wo/do/vr/za/zo'
        Color = clInactiveCaption
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        StartOfWeek = 1
        TabOrder = 1
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Finish'
      object l8: TLabel
        Left = 48
        Top = 8
        Width = 337
        Height = 57
        Alignment = taCenter
        AutoSize = False
        Caption =
          'Hieronder is de samenvatting van de instellingen weergegeven. Kl' +
          'ik op de VOLTOOIEN-knop om het instellen te voltooien.'
        WordWrap = True
      end
      object Bevel8: TBevel
        Left = 0
        Top = 68
        Width = 401
        Height = 9
        Shape = bsTopLine
      end
      object Image7: TImage
        Left = 8
        Top = 8
        Width = 32
        Height = 32
        Picture.Data = {<image006.ico>}
      end
      object AsgRep: TAdvStringGrid
        Left = 8
        Top = 80
        Width = 385
        Height = 225
        HelpContext = 8911
        ColCount = 3
        Ctl3D = True
        DefaultRowHeight = 18
        FixedCols = 0
        RowCount = 14
        GridLineWidth = 0
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goRowSelect]
        ParentCtl3D = False
        ScrollBars = ssVertical
        TabOrder = 0
        AutoSize = False
        SortDirection = sdAscending
        PrintTime = False
        PrintDate = False
        PrintPageNum = False
        PrintBorders = False
        PrintFont.Color = clWindowText
        PrintFont.Height = -11
        PrintFont.Name = 'MS Sans Serif'
        PrintFont.Style = []
        SortShow = False
        SortColumn = 0
        HintColor = clYellow
        ColWidths = (
          98
          265
          170)
      end
    end
  end
  object BtnCancel: TBitBtn
    Left = 320
    Top = 332
    Width = 89
    Height = 25
    HelpContext = 9906
    Cancel = True
    Caption = '&Annuleren'
    ModalResult = 2
    TabOrder = 2
    NumGlyphs = 2
  end
  object EasyReg: TEasyReg
    About = 'Easyreg 1.20 , (C) 99, Finiware '
    Registered = 'Yes'
    ShowMessages = False
    KeyNames = UseHints
    AutoCreateKeys = True
    Company = 'Finiware'
    ProgramName = 'Intercent\99\Phonewizard'
    Root = rkHKEY_LOCAL_MACHINE
    Left = 8
    Top = 328
  end
end