home *** CD-ROM | disk | FTP | other *** search
/ Kompuutteri Kaikille K-CD 2001 #15 / K-CD_2001-15.iso / K.EXE / 0 / RCDATA / TUDGIFTFORM / TUDGIFTFORM.txt < prev   
Text File  |  2001-10-12  |  38KB  |  1,359 lines
  1. object UdgiftForm: TUdgiftForm
  2.   Left = 144
  3.   Top = 259
  4.   BorderIcons = []
  5.   BorderStyle = bsNone
  6.   Caption = 'UdgiftForm'
  7.   ClientHeight = 600
  8.   ClientWidth = 801
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -13
  13.   Font.Name = 'Arial'
  14.   Font.Style = []
  15.   OldCreateOrder = False
  16.   Scaled = False
  17.   OnCreate = FormCreate
  18.   OnShow = FormShow
  19.   PixelsPerInch = 96
  20.   TextHeight = 16
  21.   object Baggrund: TLMDBackPanel
  22.     Left = 0
  23.     Top = 0
  24.     Width = 801
  25.     Height = 601
  26.     UseDockManager = False
  27.     Bevel.Mode = bmCustom
  28.     ImageList = Hovedform.Baggrund
  29.     ListIndex = 1
  30.     TabOrder = 0
  31.     object Overskrift: TLabel
  32.       Left = 32
  33.       Top = 16
  34.       Width = 344
  35.       Height = 27
  36.       Caption = 'Regn ud, hvad din pc koster dig'
  37.       Font.Charset = DEFAULT_CHARSET
  38.       Font.Color = clWhite
  39.       Font.Height = -24
  40.       Font.Name = 'Arial'
  41.       Font.Style = []
  42.       ParentFont = False
  43.       Transparent = True
  44.     end
  45.     object Diversegruppe: TLMDGroupBox
  46.       Left = 24
  47.       Top = 352
  48.       Width = 753
  49.       Height = 233
  50.       BackFX.AlphaBlend.Strength = 0.600000023841858000
  51.       Bevel.Mode = bmStandard
  52.       Bevel.StandardStyle = lsFrameInset
  53.       Caption = 'Diverse'
  54.       CaptionFont.Charset = DEFAULT_CHARSET
  55.       CaptionFont.Color = clWhite
  56.       CaptionFont.Height = -16
  57.       CaptionFont.Name = 'Arial'
  58.       CaptionFont.Style = []
  59.       CaptionParentFont = False
  60.       TabOrder = 2
  61.       Transparent = True
  62.       object SWLabel: TLabel
  63.         Left = 16
  64.         Top = 32
  65.         Width = 62
  66.         Height = 18
  67.         Caption = 'Software'
  68.         Font.Charset = DEFAULT_CHARSET
  69.         Font.Color = clWhite
  70.         Font.Height = -16
  71.         Font.Name = 'Arial'
  72.         Font.Style = []
  73.         ParentFont = False
  74.         Transparent = True
  75.       end
  76.       object NetLabel: TLabel
  77.         Left = 16
  78.         Top = 64
  79.         Width = 124
  80.         Height = 18
  81.         Caption = 'Internet pr. m'#229'ned'
  82.         Font.Charset = DEFAULT_CHARSET
  83.         Font.Color = clWhite
  84.         Font.Height = -16
  85.         Font.Name = 'Arial'
  86.         Font.Style = []
  87.         ParentFont = False
  88.         Transparent = True
  89.       end
  90.       object AndetLabel: TLabel
  91.         Left = 16
  92.         Top = 96
  93.         Width = 41
  94.         Height = 18
  95.         Caption = 'Andet'
  96.         Font.Charset = DEFAULT_CHARSET
  97.         Font.Color = clWhite
  98.         Font.Height = -16
  99.         Font.Name = 'Arial'
  100.         Font.Style = []
  101.         ParentFont = False
  102.         Transparent = True
  103.       end
  104.       object Label19: TLabel
  105.         Left = 152
  106.         Top = 96
  107.         Width = 9
  108.         Height = 18
  109.         Caption = '+'
  110.         Font.Charset = DEFAULT_CHARSET
  111.         Font.Color = clWhite
  112.         Font.Height = -16
  113.         Font.Name = 'Arial'
  114.         Font.Style = []
  115.         ParentFont = False
  116.         Transparent = True
  117.       end
  118.       object AarTotalLabel: TLabel
  119.         Left = 120
  120.         Top = 192
  121.         Width = 156
  122.         Height = 22
  123.         Caption = 'Samlet '#229'rlig udgift:'
  124.         Font.Charset = DEFAULT_CHARSET
  125.         Font.Color = clWhite
  126.         Font.Height = -19
  127.         Font.Name = 'Arial'
  128.         Font.Style = []
  129.         ParentFont = False
  130.         Transparent = True
  131.       end
  132.       object LMDDrawEdge1: TLMDDrawEdge
  133.         Left = 1
  134.         Top = 136
  135.         Width = 650
  136.         Height = 1
  137.         Style = esDiagonal
  138.       end
  139.       object LMDLImage1: TLMDLImage
  140.         Left = 464
  141.         Top = 8
  142.         Width = 289
  143.         Height = 225
  144.         Bevel.Mode = bmCustom
  145.         ForceTransparent = True
  146.         ImageList = LMDGraphicList1
  147.       end
  148.       object SWPris: TLMDMaskEdit
  149.         Tag = 5
  150.         Left = 168
  151.         Top = 32
  152.         Width = 65
  153.         Height = 21
  154.         Cursor = crIBeam
  155.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  156.         Bevel.Mode = bmWindows
  157.         Caret.BlinkRate = 530
  158.         Caret.ImageIndex = 0
  159.         Caret.ListIndex = 0
  160.         TabOrder = 0
  161.         OnChange = SWPrisChange
  162.         Alignment = taRightJustify
  163.         CurrencySettings.SystemDefaults = cmSystem
  164.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  165.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  166.         CurrencySettings.Symbol = 'kr'
  167.         CustomButtons = <>
  168.         Decimals = 2
  169.         MaskType = meFloatFixed
  170.         Text = '0,00'
  171.         DateTime = 0
  172.       end
  173.       object AndenSWUdgift: TLMDMaskEdit
  174.         Left = 344
  175.         Top = 32
  176.         Width = 97
  177.         Height = 21
  178.         Cursor = crIBeam
  179.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  180.         Bevel.Mode = bmWindows
  181.         Caret.BlinkRate = 530
  182.         Caret.ImageIndex = 0
  183.         Caret.ListIndex = 0
  184.         TabOrder = 1
  185.         OnChange = UdgiftChange
  186.         Font.Charset = DEFAULT_CHARSET
  187.         Font.Color = clWindowText
  188.         Font.Height = -13
  189.         Font.Name = 'Arial'
  190.         Font.Style = []
  191.         AutoSelect = True
  192.         ParentFont = False
  193.         Alignment = taRightJustify
  194.         CurrencySettings.SystemDefaults = cmSystem
  195.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  196.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  197.         CurrencySettings.Symbol = 'kr'
  198.         CustomButtons = <>
  199.         Decimals = 2
  200.         MaskType = meCurrency
  201.         Text = 'kr 0,00'
  202.         DateTime = 0
  203.       end
  204.       object InternetPris: TLMDMaskEdit
  205.         Tag = 6
  206.         Left = 168
  207.         Top = 64
  208.         Width = 65
  209.         Height = 21
  210.         Cursor = crIBeam
  211.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  212.         Bevel.Mode = bmWindows
  213.         Caret.BlinkRate = 530
  214.         Caret.ImageIndex = 0
  215.         Caret.ListIndex = 0
  216.         TabOrder = 2
  217.         OnChange = InternetChange
  218.         Alignment = taRightJustify
  219.         CurrencySettings.SystemDefaults = cmSystem
  220.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  221.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  222.         CurrencySettings.Symbol = 'kr'
  223.         CustomButtons = <>
  224.         Decimals = 2
  225.         MaskType = meFloatFixed
  226.         Text = '0,00'
  227.         DateTime = 0
  228.       end
  229.       object InternetUdgift: TLMDMaskEdit
  230.         Left = 344
  231.         Top = 64
  232.         Width = 97
  233.         Height = 21
  234.         Cursor = crIBeam
  235.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  236.         Bevel.Mode = bmWindows
  237.         Caret.BlinkRate = 530
  238.         Caret.ImageIndex = 0
  239.         Caret.ListIndex = 0
  240.         TabOrder = 3
  241.         OnChange = UdgiftChange
  242.         Font.Charset = DEFAULT_CHARSET
  243.         Font.Color = clWindowText
  244.         Font.Height = -13
  245.         Font.Name = 'Arial'
  246.         Font.Style = []
  247.         AutoSelect = True
  248.         ParentFont = False
  249.         Alignment = taRightJustify
  250.         CurrencySettings.SystemDefaults = cmSystem
  251.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  252.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  253.         CurrencySettings.Symbol = 'kr'
  254.         CustomButtons = <>
  255.         Decimals = 2
  256.         MaskType = meCurrency
  257.         Text = 'kr 0,00'
  258.         DateTime = 0
  259.       end
  260.       object Andet2: TLMDMaskEdit
  261.         Tag = 6
  262.         Left = 80
  263.         Top = 96
  264.         Width = 65
  265.         Height = 21
  266.         Cursor = crIBeam
  267.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  268.         Bevel.Mode = bmWindows
  269.         Caret.BlinkRate = 530
  270.         Caret.ImageIndex = 0
  271.         Caret.ListIndex = 0
  272.         TabOrder = 4
  273.         OnChange = AndetChange
  274.         Alignment = taRightJustify
  275.         CurrencySettings.SystemDefaults = cmSystem
  276.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  277.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  278.         CurrencySettings.Symbol = 'kr'
  279.         CustomButtons = <>
  280.         Decimals = 2
  281.         MaskType = meFloatFixed
  282.         Text = '0,00'
  283.         DateTime = 0
  284.       end
  285.       object Andet3: TLMDMaskEdit
  286.         Tag = 6
  287.         Left = 168
  288.         Top = 96
  289.         Width = 65
  290.         Height = 21
  291.         Cursor = crIBeam
  292.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  293.         Bevel.Mode = bmWindows
  294.         Caret.BlinkRate = 530
  295.         Caret.ImageIndex = 0
  296.         Caret.ListIndex = 0
  297.         TabOrder = 5
  298.         OnChange = AndetChange
  299.         Alignment = taRightJustify
  300.         CurrencySettings.SystemDefaults = cmSystem
  301.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  302.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  303.         CurrencySettings.Symbol = 'kr'
  304.         CustomButtons = <>
  305.         Decimals = 2
  306.         MaskType = meFloatFixed
  307.         Text = '0,00'
  308.         DateTime = 0
  309.       end
  310.       object AndetUdgift: TLMDMaskEdit
  311.         Left = 344
  312.         Top = 96
  313.         Width = 97
  314.         Height = 21
  315.         Cursor = crIBeam
  316.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  317.         Bevel.Mode = bmWindows
  318.         Caret.BlinkRate = 530
  319.         Caret.ImageIndex = 0
  320.         Caret.ListIndex = 0
  321.         TabOrder = 6
  322.         OnChange = UdgiftChange
  323.         Font.Charset = DEFAULT_CHARSET
  324.         Font.Color = clWindowText
  325.         Font.Height = -13
  326.         Font.Name = 'Arial'
  327.         Font.Style = []
  328.         AutoSelect = True
  329.         ParentFont = False
  330.         Alignment = taRightJustify
  331.         CurrencySettings.SystemDefaults = cmSystem
  332.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  333.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  334.         CurrencySettings.Symbol = 'kr'
  335.         CustomButtons = <>
  336.         Decimals = 2
  337.         MaskType = meCurrency
  338.         Text = 'kr 0,00'
  339.         DateTime = 0
  340.       end
  341.       object AarTotal: TLMDMaskEdit
  342.         Left = 312
  343.         Top = 184
  344.         Width = 129
  345.         Height = 28
  346.         Cursor = crIBeam
  347.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  348.         Bevel.Mode = bmWindows
  349.         Caret.BlinkRate = 530
  350.         Caret.ImageIndex = 0
  351.         Caret.ListIndex = 0
  352.         TabOrder = 7
  353.         Font.Charset = DEFAULT_CHARSET
  354.         Font.Color = clWindowText
  355.         Font.Height = -19
  356.         Font.Name = 'Arial'
  357.         Font.Style = []
  358.         ParentFont = False
  359.         Alignment = taRightJustify
  360.         CurrencySettings.SystemDefaults = cmSystem
  361.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  362.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  363.         CurrencySettings.Symbol = 'kr'
  364.         CustomButtons = <>
  365.         Decimals = 2
  366.         MaskType = meCurrency
  367.         ReadOnly = True
  368.         Text = 'kr 0,00'
  369.         DateTime = 0
  370.       end
  371.       object NulstilKnap: TLMDButton
  372.         Left = 16
  373.         Top = 152
  374.         Width = 65
  375.         Height = 25
  376.         Caption = 'Nulstil'
  377.         Font.Charset = DEFAULT_CHARSET
  378.         Font.Color = clWindowText
  379.         Font.Height = -13
  380.         Font.Name = 'Arial'
  381.         Font.Style = [fsBold]
  382.         ParentFont = False
  383.         TabOrder = 8
  384.         Visible = True
  385.         OnClick = NulstilKnapClick
  386.       end
  387.       object Luk: TLMDButton
  388.         Left = 16
  389.         Top = 192
  390.         Width = 65
  391.         Height = 25
  392.         Caption = 'Luk'
  393.         Font.Charset = DEFAULT_CHARSET
  394.         Font.Color = clWindowText
  395.         Font.Height = -13
  396.         Font.Name = 'Arial'
  397.         Font.Style = [fsBold]
  398.         ParentFont = False
  399.         TabOrder = 9
  400.         Visible = True
  401.         OnClick = LukClick
  402.       end
  403.     end
  404.     object StroemGruppe: TLMDGroupBox
  405.       Left = 24
  406.       Top = 48
  407.       Width = 753
  408.       Height = 121
  409.       BackFX.AlphaBlend.Strength = 0.600000023841858000
  410.       Bevel.Mode = bmStandard
  411.       Bevel.StandardStyle = lsFrameInset
  412.       Caption = 'Str'#248'mudgift'
  413.       CaptionFont.Charset = DEFAULT_CHARSET
  414.       CaptionFont.Color = clWhite
  415.       CaptionFont.Height = -16
  416.       CaptionFont.Name = 'Arial'
  417.       CaptionFont.Style = []
  418.       CaptionParentFont = False
  419.       Font.Charset = DEFAULT_CHARSET
  420.       Font.Color = clBlack
  421.       Font.Height = -13
  422.       Font.Name = 'Arial'
  423.       Font.Style = []
  424.       ParentFont = False
  425.       TabOrder = 0
  426.       Transparent = True
  427.       object PCLabel: TLabel
  428.         Left = 16
  429.         Top = 24
  430.         Width = 80
  431.         Height = 18
  432.         Caption = 'Selve pc'#39'en'
  433.         Font.Charset = DEFAULT_CHARSET
  434.         Font.Color = clWhite
  435.         Font.Height = -16
  436.         Font.Name = 'Arial'
  437.         Font.Style = []
  438.         ParentFont = False
  439.         Transparent = True
  440.       end
  441.       object WattLabel: TLabel
  442.         Left = 240
  443.         Top = 24
  444.         Width = 28
  445.         Height = 18
  446.         Caption = 'watt'
  447.         Font.Charset = DEFAULT_CHARSET
  448.         Font.Color = clWhite
  449.         Font.Height = -16
  450.         Font.Name = 'Arial'
  451.         Font.Style = []
  452.         ParentFont = False
  453.         Transparent = True
  454.       end
  455.       object PCTimerUgeLabel: TLabel
  456.         Left = 416
  457.         Top = 24
  458.         Width = 99
  459.         Height = 18
  460.         Caption = 'timer om ugen'
  461.         Font.Charset = DEFAULT_CHARSET
  462.         Font.Color = clWhite
  463.         Font.Height = -16
  464.         Font.Name = 'Arial'
  465.         Font.Style = []
  466.         ParentFont = False
  467.         Transparent = True
  468.       end
  469.       object Label7: TLabel
  470.         Left = 576
  471.         Top = 24
  472.         Width = 46
  473.         Height = 18
  474.         Caption = 'X 52 ='
  475.         Font.Charset = DEFAULT_CHARSET
  476.         Font.Color = clWhite
  477.         Font.Height = -16
  478.         Font.Name = 'Arial'
  479.         Font.Style = []
  480.         ParentFont = False
  481.         Transparent = True
  482.       end
  483.       object Label3: TLabel
  484.         Left = 706
  485.         Top = 24
  486.         Width = 31
  487.         Height = 18
  488.         Caption = 'kWh'
  489.         Font.Charset = DEFAULT_CHARSET
  490.         Font.Color = clWhite
  491.         Font.Height = -16
  492.         Font.Name = 'Arial'
  493.         Font.Style = []
  494.         ParentFont = False
  495.         Transparent = True
  496.       end
  497.       object TilbehoerLabel: TLabel
  498.         Left = 16
  499.         Top = 56
  500.         Width = 56
  501.         Height = 18
  502.         Caption = 'Tilbeh'#248'r'
  503.         Font.Charset = DEFAULT_CHARSET
  504.         Font.Color = clWhite
  505.         Font.Height = -16
  506.         Font.Name = 'Arial'
  507.         Font.Style = []
  508.         ParentFont = False
  509.         Transparent = True
  510.       end
  511.       object WattLabel2: TLabel
  512.         Left = 240
  513.         Top = 56
  514.         Width = 28
  515.         Height = 18
  516.         Caption = 'watt'
  517.         Font.Charset = DEFAULT_CHARSET
  518.         Font.Color = clWhite
  519.         Font.Height = -16
  520.         Font.Name = 'Arial'
  521.         Font.Style = []
  522.         ParentFont = False
  523.         Transparent = True
  524.       end
  525.       object TilbehoerTimerUgeLabel: TLabel
  526.         Left = 416
  527.         Top = 56
  528.         Width = 99
  529.         Height = 18
  530.         Caption = 'timer om ugen'
  531.         Font.Charset = DEFAULT_CHARSET
  532.         Font.Color = clWhite
  533.         Font.Height = -16
  534.         Font.Name = 'Arial'
  535.         Font.Style = []
  536.         ParentFont = False
  537.         Transparent = True
  538.       end
  539.       object Label10: TLabel
  540.         Left = 576
  541.         Top = 56
  542.         Width = 46
  543.         Height = 18
  544.         Caption = 'X 52 ='
  545.         Font.Charset = DEFAULT_CHARSET
  546.         Font.Color = clWhite
  547.         Font.Height = -16
  548.         Font.Name = 'Arial'
  549.         Font.Style = []
  550.         ParentFont = False
  551.         Transparent = True
  552.       end
  553.       object Label9: TLabel
  554.         Left = 706
  555.         Top = 56
  556.         Width = 31
  557.         Height = 18
  558.         Caption = 'kWh'
  559.         Font.Charset = DEFAULT_CHARSET
  560.         Font.Color = clWhite
  561.         Font.Height = -16
  562.         Font.Name = 'Arial'
  563.         Font.Style = []
  564.         ParentFont = False
  565.         Transparent = True
  566.       end
  567.       object kWhIaltLabel: TLabel
  568.         Left = 16
  569.         Top = 88
  570.         Width = 66
  571.         Height = 18
  572.         Caption = 'Str'#248'm ialt'
  573.         Font.Charset = DEFAULT_CHARSET
  574.         Font.Color = clWhite
  575.         Font.Height = -16
  576.         Font.Name = 'Arial'
  577.         Font.Style = []
  578.         ParentFont = False
  579.         Transparent = True
  580.       end
  581.       object kWhAar: TLabel
  582.         Left = 240
  583.         Top = 88
  584.         Width = 71
  585.         Height = 18
  586.         Caption = 'kWh pr. '#229'r'
  587.         Font.Charset = DEFAULT_CHARSET
  588.         Font.Color = clWhite
  589.         Font.Height = -16
  590.         Font.Name = 'Arial'
  591.         Font.Style = []
  592.         ParentFont = False
  593.         Transparent = True
  594.       end
  595.       object kWhLabel: TLabel
  596.         Left = 416
  597.         Top = 88
  598.         Width = 80
  599.         Height = 18
  600.         Caption = #248're pr. kWh'
  601.         Font.Charset = DEFAULT_CHARSET
  602.         Font.Color = clWhite
  603.         Font.Height = -16
  604.         Font.Name = 'Arial'
  605.         Font.Style = []
  606.         ParentFont = False
  607.         Transparent = True
  608.       end
  609.       object UdgiftLabel: TLabel
  610.         Left = 576
  611.         Top = 88
  612.         Width = 41
  613.         Height = 18
  614.         Caption = 'Udgift'
  615.         Font.Charset = DEFAULT_CHARSET
  616.         Font.Color = clWhite
  617.         Font.Height = -16
  618.         Font.Name = 'Arial'
  619.         Font.Style = []
  620.         ParentFont = False
  621.         Transparent = True
  622.       end
  623.       object PCWattForbrug: TLMDMaskEdit
  624.         Left = 168
  625.         Top = 24
  626.         Width = 65
  627.         Height = 21
  628.         Cursor = crIBeam
  629.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  630.         Bevel.Mode = bmWindows
  631.         Caret.BlinkRate = 500
  632.         Caret.ImageIndex = 0
  633.         Caret.ListIndex = 0
  634.         TabOrder = 0
  635.         OnChange = PCWattForbrugChange
  636.         Alignment = taRightJustify
  637.         CurrencySettings.SystemDefaults = cmSystem
  638.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  639.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  640.         CurrencySettings.Symbol = 'kr'
  641.         CustomButtons = <>
  642.         Decimals = 0
  643.         Mask = '999'
  644.         MaskType = meInteger
  645.         Text = '80'
  646.         DateTime = 0
  647.       end
  648.       object PCUgeTimer: TLMDMaskEdit
  649.         Left = 344
  650.         Top = 24
  651.         Width = 65
  652.         Height = 21
  653.         Cursor = crIBeam
  654.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  655.         Bevel.Mode = bmWindows
  656.         Caret.BlinkRate = 500
  657.         Caret.ImageIndex = 0
  658.         Caret.ListIndex = 0
  659.         TabOrder = 1
  660.         OnChange = PCWattForbrugChange
  661.         Alignment = taRightJustify
  662.         CurrencySettings.SystemDefaults = cmSystem
  663.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  664.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  665.         CurrencySettings.Symbol = 'kr'
  666.         CustomButtons = <>
  667.         Decimals = 0
  668.         Mask = '999'
  669.         MaskType = meInteger
  670.         Text = '40'
  671.         DateTime = 0
  672.       end
  673.       object PCkWhTotal: TLMDMaskEdit
  674.         Left = 632
  675.         Top = 24
  676.         Width = 65
  677.         Height = 21
  678.         Cursor = crIBeam
  679.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  680.         Bevel.Mode = bmWindows
  681.         Caret.BlinkRate = 530
  682.         Caret.ImageIndex = 0
  683.         Caret.ListIndex = 0
  684.         Color = clMoneyGreen
  685.         TabOrder = 2
  686.         OnChange = KWhChange
  687.         AutoSelect = True
  688.         Alignment = taRightJustify
  689.         CurrencySettings.SystemDefaults = cmSystem
  690.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  691.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  692.         CurrencySettings.Symbol = 'kr'
  693.         CustomButtons = <>
  694.         Decimals = 0
  695.         Mask = '999'
  696.         MaskType = meInteger
  697.         Text = '3'
  698.         DateTime = 0
  699.       end
  700.       object TilbehoerWattForbrug: TLMDMaskEdit
  701.         Left = 168
  702.         Top = 56
  703.         Width = 65
  704.         Height = 21
  705.         Cursor = crIBeam
  706.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  707.         Bevel.Mode = bmWindows
  708.         Caret.BlinkRate = 500
  709.         Caret.ImageIndex = 0
  710.         Caret.ListIndex = 0
  711.         TabOrder = 3
  712.         OnChange = TilbehoerWattForbrugChange
  713.         Alignment = taRightJustify
  714.         CurrencySettings.SystemDefaults = cmSystem
  715.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  716.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  717.         CurrencySettings.Symbol = 'kr'
  718.         CustomButtons = <>
  719.         Mask = '999'
  720.         MaskType = meInteger
  721.         Text = '20'
  722.         DateTime = 0
  723.       end
  724.       object TilbehoerUgeTimer: TLMDMaskEdit
  725.         Left = 344
  726.         Top = 56
  727.         Width = 65
  728.         Height = 21
  729.         Cursor = crIBeam
  730.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  731.         Bevel.Mode = bmWindows
  732.         Caret.BlinkRate = 500
  733.         Caret.ImageIndex = 0
  734.         Caret.ListIndex = 0
  735.         TabOrder = 4
  736.         OnChange = TilbehoerWattForbrugChange
  737.         Alignment = taRightJustify
  738.         CurrencySettings.SystemDefaults = cmSystem
  739.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  740.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  741.         CurrencySettings.Symbol = 'kr'
  742.         CustomButtons = <>
  743.         Mask = '999'
  744.         MaskType = meInteger
  745.         Text = '20'
  746.         DateTime = 0
  747.       end
  748.       object TilbehoerkWhTotal: TLMDMaskEdit
  749.         Left = 632
  750.         Top = 56
  751.         Width = 65
  752.         Height = 21
  753.         Cursor = crIBeam
  754.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  755.         Bevel.Mode = bmWindows
  756.         Caret.BlinkRate = 530
  757.         Caret.ImageIndex = 0
  758.         Caret.ListIndex = 0
  759.         Color = clMoneyGreen
  760.         TabOrder = 5
  761.         OnChange = KWhChange
  762.         AutoSelect = True
  763.         Alignment = taRightJustify
  764.         CurrencySettings.SystemDefaults = cmSystem
  765.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  766.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  767.         CurrencySettings.Symbol = 'kr'
  768.         CustomButtons = <>
  769.         Decimals = 0
  770.         Mask = '999'
  771.         MaskType = meInteger
  772.         Text = '3'
  773.         DateTime = 0
  774.       end
  775.       object TotalWattForbrug: TLMDMaskEdit
  776.         Left = 168
  777.         Top = 88
  778.         Width = 65
  779.         Height = 21
  780.         Cursor = crIBeam
  781.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  782.         Bevel.Mode = bmWindows
  783.         Caret.BlinkRate = 530
  784.         Caret.ImageIndex = 0
  785.         Caret.ListIndex = 0
  786.         TabOrder = 6
  787.         OnChange = TotalWattForbrugChange
  788.         AutoSelect = True
  789.         Alignment = taRightJustify
  790.         CurrencySettings.SystemDefaults = cmSystem
  791.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  792.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  793.         CurrencySettings.Symbol = 'kr'
  794.         CustomButtons = <>
  795.         Decimals = 0
  796.         Mask = '999'
  797.         MaskType = meInteger
  798.         Text = '0'
  799.         DateTime = 0
  800.       end
  801.       object KWhPris: TLMDMaskEdit
  802.         Tag = 1
  803.         Left = 344
  804.         Top = 88
  805.         Width = 65
  806.         Height = 21
  807.         Cursor = crIBeam
  808.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  809.         Bevel.Mode = bmWindows
  810.         Caret.BlinkRate = 530
  811.         Caret.ImageIndex = 0
  812.         Caret.ListIndex = 0
  813.         TabOrder = 7
  814.         OnChange = TotalWattForbrugChange
  815.         Alignment = taRightJustify
  816.         CurrencySettings.SystemDefaults = cmSystem
  817.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  818.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  819.         CurrencySettings.Symbol = 'kr'
  820.         CustomButtons = <>
  821.         Decimals = 2
  822.         Mask = '999'
  823.         MaskType = meInteger
  824.         Text = '162'
  825.         DateTime = 0
  826.       end
  827.       object KWhUdgift: TLMDMaskEdit
  828.         Left = 632
  829.         Top = 88
  830.         Width = 97
  831.         Height = 21
  832.         Cursor = crIBeam
  833.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  834.         Bevel.Mode = bmWindows
  835.         Caret.BlinkRate = 530
  836.         Caret.ImageIndex = 0
  837.         Caret.ListIndex = 0
  838.         TabOrder = 8
  839.         OnChange = UdgiftChange
  840.         AutoSelect = True
  841.         Alignment = taRightJustify
  842.         CurrencySettings.SystemDefaults = cmSystem
  843.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  844.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  845.         CurrencySettings.Symbol = 'kr'
  846.         CustomButtons = <>
  847.         Decimals = 2
  848.         MaskType = meCurrency
  849.         Text = 'kr 0,00'
  850.         DateTime = 0
  851.       end
  852.     end
  853.     object ForbrugGruppe: TLMDGroupBox
  854.       Left = 24
  855.       Top = 184
  856.       Width = 753
  857.       Height = 153
  858.       BackFX.AlphaBlend.Strength = 0.600000023841858000
  859.       Bevel.Mode = bmStandard
  860.       Bevel.StandardStyle = lsFrameInset
  861.       Caption = 'Forbrug'
  862.       CaptionFont.Charset = DEFAULT_CHARSET
  863.       CaptionFont.Color = clWhite
  864.       CaptionFont.Height = -16
  865.       CaptionFont.Name = 'Arial'
  866.       CaptionFont.Style = []
  867.       CaptionParentFont = False
  868.       TabOrder = 1
  869.       Transparent = True
  870.       object PrintPatronLabel: TLabel
  871.         Left = 8
  872.         Top = 24
  873.         Width = 104
  874.         Height = 18
  875.         Caption = 'Printerpatroner'
  876.         Font.Charset = DEFAULT_CHARSET
  877.         Font.Color = clWhite
  878.         Font.Height = -16
  879.         Font.Name = 'Arial'
  880.         Font.Style = []
  881.         ParentFont = False
  882.         Transparent = True
  883.       end
  884.       object PrintPapirLabel: TLabel
  885.         Left = 8
  886.         Top = 56
  887.         Width = 82
  888.         Height = 18
  889.         Caption = 'Printerpapir'
  890.         Font.Charset = DEFAULT_CHARSET
  891.         Font.Color = clWhite
  892.         Font.Height = -16
  893.         Font.Name = 'Arial'
  894.         Font.Style = []
  895.         ParentFont = False
  896.         Transparent = True
  897.       end
  898.       object CDRLabel: TLabel
  899.         Left = 8
  900.         Top = 88
  901.         Width = 97
  902.         Height = 18
  903.         Caption = 'Tomme CD-R'
  904.         Font.Charset = DEFAULT_CHARSET
  905.         Font.Color = clWhite
  906.         Font.Height = -16
  907.         Font.Name = 'Arial'
  908.         Font.Style = []
  909.         ParentFont = False
  910.         Transparent = True
  911.       end
  912.       object SpilLabel: TLabel
  913.         Left = 8
  914.         Top = 120
  915.         Width = 93
  916.         Height = 18
  917.         Caption = 'Computerspil'
  918.         Font.Charset = DEFAULT_CHARSET
  919.         Font.Color = clWhite
  920.         Font.Height = -16
  921.         Font.Name = 'Arial'
  922.         Font.Style = []
  923.         ParentFont = False
  924.         Transparent = True
  925.       end
  926.       object StkLabel: TLabel
  927.         Left = 240
  928.         Top = 24
  929.         Width = 24
  930.         Height = 18
  931.         Caption = 'stk.'
  932.         Font.Charset = DEFAULT_CHARSET
  933.         Font.Color = clWhite
  934.         Font.Height = -16
  935.         Font.Name = 'Arial'
  936.         Font.Style = []
  937.         ParentFont = False
  938.         Transparent = True
  939.       end
  940.       object StkLabel2: TLabel
  941.         Left = 240
  942.         Top = 56
  943.         Width = 24
  944.         Height = 18
  945.         Caption = 'stk.'
  946.         Font.Charset = DEFAULT_CHARSET
  947.         Font.Color = clWhite
  948.         Font.Height = -16
  949.         Font.Name = 'Arial'
  950.         Font.Style = []
  951.         ParentFont = False
  952.         Transparent = True
  953.       end
  954.       object StkLabel3: TLabel
  955.         Left = 240
  956.         Top = 88
  957.         Width = 24
  958.         Height = 18
  959.         Caption = 'stk.'
  960.         Font.Charset = DEFAULT_CHARSET
  961.         Font.Color = clWhite
  962.         Font.Height = -16
  963.         Font.Name = 'Arial'
  964.         Font.Style = []
  965.         ParentFont = False
  966.         Transparent = True
  967.       end
  968.       object StkLabel4: TLabel
  969.         Left = 240
  970.         Top = 120
  971.         Width = 24
  972.         Height = 18
  973.         Caption = 'stk.'
  974.         Font.Charset = DEFAULT_CHARSET
  975.         Font.Color = clWhite
  976.         Font.Height = -16
  977.         Font.Name = 'Arial'
  978.         Font.Style = []
  979.         ParentFont = False
  980.         Transparent = True
  981.       end
  982.       object StkPrisLabel: TLabel
  983.         Left = 416
  984.         Top = 24
  985.         Width = 46
  986.         Height = 18
  987.         Caption = 'pr. stk.'
  988.         Font.Charset = DEFAULT_CHARSET
  989.         Font.Color = clWhite
  990.         Font.Height = -16
  991.         Font.Name = 'Arial'
  992.         Font.Style = []
  993.         ParentFont = False
  994.         Transparent = True
  995.       end
  996.       object StkPrisLabel2: TLabel
  997.         Left = 416
  998.         Top = 56
  999.         Width = 46
  1000.         Height = 18
  1001.         Caption = 'pr. stk.'
  1002.         Font.Charset = DEFAULT_CHARSET
  1003.         Font.Color = clWhite
  1004.         Font.Height = -16
  1005.         Font.Name = 'Arial'
  1006.         Font.Style = []
  1007.         ParentFont = False
  1008.         Transparent = True
  1009.       end
  1010.       object StkPrisLabel3: TLabel
  1011.         Left = 416
  1012.         Top = 88
  1013.         Width = 46
  1014.         Height = 18
  1015.         Caption = 'pr. stk.'
  1016.         Font.Charset = DEFAULT_CHARSET
  1017.         Font.Color = clWhite
  1018.         Font.Height = -16
  1019.         Font.Name = 'Arial'
  1020.         Font.Style = []
  1021.         ParentFont = False
  1022.         Transparent = True
  1023.       end
  1024.       object StkPrisLabel4: TLabel
  1025.         Left = 416
  1026.         Top = 120
  1027.         Width = 46
  1028.         Height = 18
  1029.         Caption = 'pr. stk.'
  1030.         Font.Charset = DEFAULT_CHARSET
  1031.         Font.Color = clWhite
  1032.         Font.Height = -16
  1033.         Font.Name = 'Arial'
  1034.         Font.Style = []
  1035.         ParentFont = False
  1036.         Transparent = True
  1037.       end
  1038.       object PatronAntal: TLMDMaskEdit
  1039.         Left = 168
  1040.         Top = 24
  1041.         Width = 65
  1042.         Height = 21
  1043.         Cursor = crIBeam
  1044.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  1045.         Bevel.Mode = bmWindows
  1046.         Caret.BlinkRate = 500
  1047.         Caret.ImageIndex = 0
  1048.         Caret.ListIndex = 0
  1049.         TabOrder = 0
  1050.         OnChange = PatronChange
  1051.         Alignment = taRightJustify
  1052.         CurrencySettings.SystemDefaults = cmSystem
  1053.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  1054.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  1055.         CurrencySettings.Symbol = 'kr'
  1056.         CustomButtons = <>
  1057.         Mask = '999'
  1058.         MaskType = meInteger
  1059.         Text = '4'
  1060.         DateTime = 0
  1061.       end
  1062.       object PapirAntal: TLMDMaskEdit
  1063.         Left = 168
  1064.         Top = 56
  1065.         Width = 65
  1066.         Height = 21
  1067.         Cursor = crIBeam
  1068.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  1069.         Bevel.Mode = bmWindows
  1070.         Caret.BlinkRate = 500
  1071.         Caret.ImageIndex = 0
  1072.         Caret.ListIndex = 0
  1073.         TabOrder = 1
  1074.         OnChange = PapirChange
  1075.         Alignment = taRightJustify
  1076.         CurrencySettings.SystemDefaults = cmSystem
  1077.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  1078.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  1079.         CurrencySettings.Symbol = 'kr'
  1080.         CustomButtons = <>
  1081.         Mask = '999'
  1082.         MaskType = meInteger
  1083.         Text = '2'
  1084.         DateTime = 0
  1085.       end
  1086.       object CDRAntal: TLMDMaskEdit
  1087.         Left = 168
  1088.         Top = 88
  1089.         Width = 65
  1090.         Height = 21
  1091.         Cursor = crIBeam
  1092.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  1093.         Bevel.Mode = bmWindows
  1094.         Caret.BlinkRate = 500
  1095.         Caret.ImageIndex = 0
  1096.         Caret.ListIndex = 0
  1097.         TabOrder = 2
  1098.         OnChange = CDRChange
  1099.         Alignment = taRightJustify
  1100.         CurrencySettings.SystemDefaults = cmSystem
  1101.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  1102.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  1103.         CurrencySettings.Symbol = 'kr'
  1104.         CustomButtons = <>
  1105.         Mask = '999'
  1106.         MaskType = meInteger
  1107.         Text = '100'
  1108.         DateTime = 0
  1109.       end
  1110.       object SpilAntal: TLMDMaskEdit
  1111.         Left = 168
  1112.         Top = 120
  1113.         Width = 65
  1114.         Height = 21
  1115.         Cursor = crIBeam
  1116.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  1117.         Bevel.Mode = bmWindows
  1118.         Caret.BlinkRate = 500
  1119.         Caret.ImageIndex = 0
  1120.         Caret.ListIndex = 0
  1121.         TabOrder = 3
  1122.         OnChange = SpilChange
  1123.         Alignment = taRightJustify
  1124.         CurrencySettings.SystemDefaults = cmSystem
  1125.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  1126.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  1127.         CurrencySettings.Symbol = 'kr'
  1128.         CustomButtons = <>
  1129.         Mask = '999'
  1130.         MaskType = meInteger
  1131.         Text = '5'
  1132.         DateTime = 0
  1133.       end
  1134.       object PatronPris: TLMDMaskEdit
  1135.         Tag = 4
  1136.         Left = 344
  1137.         Top = 24
  1138.         Width = 65
  1139.         Height = 21
  1140.         Cursor = crIBeam
  1141.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  1142.         Bevel.Mode = bmWindows
  1143.         Caret.BlinkRate = 530
  1144.         Caret.ImageIndex = 0
  1145.         Caret.ListIndex = 0
  1146.         TabOrder = 4
  1147.         OnChange = PatronChange
  1148.         Alignment = taRightJustify
  1149.         CurrencySettings.SystemDefaults = cmSystem
  1150.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  1151.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  1152.         CurrencySettings.Symbol = 'kr'
  1153.         CustomButtons = <>
  1154.         Decimals = 2
  1155.         MaskType = meFloatFixed
  1156.         Text = '0,00'
  1157.         DateTime = 0
  1158.       end
  1159.       object PapirPris: TLMDMaskEdit
  1160.         Tag = 3
  1161.         Left = 344
  1162.         Top = 56
  1163.         Width = 65
  1164.         Height = 21
  1165.         Cursor = crIBeam
  1166.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  1167.         Bevel.Mode = bmWindows
  1168.         Caret.BlinkRate = 530
  1169.         Caret.ImageIndex = 0
  1170.         Caret.ListIndex = 0
  1171.         TabOrder = 5
  1172.         OnChange = PapirChange
  1173.         Alignment = taRightJustify
  1174.         CurrencySettings.SystemDefaults = cmSystem
  1175.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  1176.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  1177.         CurrencySettings.Symbol = 'kr'
  1178.         CustomButtons = <>
  1179.         Decimals = 2
  1180.         MaskType = meFloatFixed
  1181.         Text = '0,00'
  1182.         DateTime = 0
  1183.       end
  1184.       object CDRPris: TLMDMaskEdit
  1185.         Tag = 2
  1186.         Left = 344
  1187.         Top = 88
  1188.         Width = 65
  1189.         Height = 21
  1190.         Cursor = crIBeam
  1191.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  1192.         Bevel.Mode = bmWindows
  1193.         Caret.BlinkRate = 530
  1194.         Caret.ImageIndex = 0
  1195.         Caret.ListIndex = 0
  1196.         TabOrder = 6
  1197.         OnChange = CDRChange
  1198.         Alignment = taRightJustify
  1199.         CurrencySettings.SystemDefaults = cmSystem
  1200.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  1201.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  1202.         CurrencySettings.Symbol = 'kr'
  1203.         CustomButtons = <>
  1204.         Decimals = 2
  1205.         MaskType = meFloatFixed
  1206.         Text = '0,00'
  1207.         DateTime = 0
  1208.       end
  1209.       object SpilPris: TLMDMaskEdit
  1210.         Tag = 5
  1211.         Left = 344
  1212.         Top = 120
  1213.         Width = 65
  1214.         Height = 21
  1215.         Cursor = crIBeam
  1216.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  1217.         Bevel.Mode = bmWindows
  1218.         Caret.BlinkRate = 530
  1219.         Caret.ImageIndex = 0
  1220.         Caret.ListIndex = 0
  1221.         TabOrder = 7
  1222.         OnChange = SpilChange
  1223.         Alignment = taRightJustify
  1224.         CurrencySettings.SystemDefaults = cmSystem
  1225.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  1226.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  1227.         CurrencySettings.Symbol = 'kr'
  1228.         CustomButtons = <>
  1229.         Decimals = 2
  1230.         MaskType = meFloatFixed
  1231.         Text = '0,00'
  1232.         DateTime = 0
  1233.       end
  1234.       object PatronUdgift: TLMDMaskEdit
  1235.         Left = 632
  1236.         Top = 24
  1237.         Width = 97
  1238.         Height = 21
  1239.         Cursor = crIBeam
  1240.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  1241.         Bevel.Mode = bmWindows
  1242.         Caret.BlinkRate = 530
  1243.         Caret.ImageIndex = 0
  1244.         Caret.ListIndex = 0
  1245.         TabOrder = 8
  1246.         OnChange = UdgiftChange
  1247.         AutoSelect = True
  1248.         Alignment = taRightJustify
  1249.         CurrencySettings.SystemDefaults = cmSystem
  1250.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  1251.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  1252.         CurrencySettings.Symbol = 'kr'
  1253.         CustomButtons = <>
  1254.         Decimals = 2
  1255.         MaskType = meCurrency
  1256.         Text = 'kr 0,00'
  1257.         DateTime = 0
  1258.       end
  1259.       object PapirUdgift: TLMDMaskEdit
  1260.         Left = 632
  1261.         Top = 56
  1262.         Width = 97
  1263.         Height = 21
  1264.         Cursor = crIBeam
  1265.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  1266.         Bevel.Mode = bmWindows
  1267.         Caret.BlinkRate = 530
  1268.         Caret.ImageIndex = 0
  1269.         Caret.ListIndex = 0
  1270.         TabOrder = 9
  1271.         OnChange = UdgiftChange
  1272.         AutoSelect = True
  1273.         Alignment = taRightJustify
  1274.         CurrencySettings.SystemDefaults = cmSystem
  1275.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  1276.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  1277.         CurrencySettings.Symbol = 'kr'
  1278.         CustomButtons = <>
  1279.         Decimals = 2
  1280.         MaskType = meCurrency
  1281.         Text = 'kr 0,00'
  1282.         DateTime = 0
  1283.       end
  1284.       object CDRUdgift: TLMDMaskEdit
  1285.         Left = 632
  1286.         Top = 88
  1287.         Width = 97
  1288.         Height = 21
  1289.         Cursor = crIBeam
  1290.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  1291.         Bevel.Mode = bmWindows
  1292.         Caret.BlinkRate = 530
  1293.         Caret.ImageIndex = 0
  1294.         Caret.ListIndex = 0
  1295.         TabOrder = 10
  1296.         OnChange = UdgiftChange
  1297.         Font.Charset = DEFAULT_CHARSET
  1298.         Font.Color = clWindowText
  1299.         Font.Height = -13
  1300.         Font.Name = 'Arial'
  1301.         Font.Style = []
  1302.         AutoSelect = True
  1303.         ParentFont = False
  1304.         Alignment = taRightJustify
  1305.         CurrencySettings.SystemDefaults = cmSystem
  1306.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  1307.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  1308.         CurrencySettings.Symbol = 'kr'
  1309.         CustomButtons = <>
  1310.         Decimals = 2
  1311.         MaskType = meCurrency
  1312.         Text = 'kr 0,00'
  1313.         DateTime = 0
  1314.       end
  1315.       object SpilUdgift: TLMDMaskEdit
  1316.         Left = 632
  1317.         Top = 120
  1318.         Width = 97
  1319.         Height = 21
  1320.         Cursor = crIBeam
  1321.         BackFX.AlphaBlend.Strength = 0.600000023841858000
  1322.         Bevel.Mode = bmWindows
  1323.         Caret.BlinkRate = 530
  1324.         Caret.ImageIndex = 0
  1325.         Caret.ListIndex = 0
  1326.         TabOrder = 11
  1327.         OnChange = UdgiftChange
  1328.         Font.Charset = DEFAULT_CHARSET
  1329.         Font.Color = clWindowText
  1330.         Font.Height = -13
  1331.         Font.Name = 'Arial'
  1332.         Font.Style = []
  1333.         AutoSelect = True
  1334.         ParentFont = False
  1335.         Alignment = taRightJustify
  1336.         CurrencySettings.SystemDefaults = cmSystem
  1337.         CurrencySettings.PositiveFormatStr = #164' 1,1'
  1338.         CurrencySettings.NegativeFormatStr = #164' -1,1'
  1339.         CurrencySettings.Symbol = 'kr'
  1340.         CustomButtons = <>
  1341.         Decimals = 2
  1342.         MaskType = meCurrency
  1343.         Text = 'kr 0,00'
  1344.         DateTime = 0
  1345.       end
  1346.     end
  1347.   end
  1348.   object LMDGraphicList1: TLMDGraphicList
  1349.     Graphics = <
  1350.       item
  1351.         Name = 'Pung'
  1352.         Picture.Data = {<image000.bmp>}
  1353.         Index = 0
  1354.       end>
  1355.     Left = 760
  1356.     Top = 16
  1357.   end
  1358. end
  1359.