home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 January / Chip_1999-01_cd.bin / zkuste / delphi / D1 / FINCALC.ZIP / fincalc.dfm / fincalc.txt next >
Text File  |  1996-02-11  |  14KB  |  531 lines

  1. object FormCalc: TFormCalc
  2.   Left = 444
  3.   Top = 98
  4.   BorderIcons = [biSystemMenu, biMinimize]
  5.   BorderStyle = bsSingle
  6.   Caption = '    FinCalc'
  7.   ClientHeight = 312
  8.   ClientWidth = 181
  9.   Color = clTeal
  10.   Font.Color = clWindowText
  11.   Font.Height = -13
  12.   Font.Name = 'System'
  13.   Font.Style = []
  14.   Icon.Data = {<image000.ico>}
  15.   KeyPreview = True
  16.   PixelsPerInch = 96
  17.   OnCreate = FormCreate
  18.   OnKeyDown = FormKeyDown
  19.   OnKeyPress = FormKeyPress
  20.   TextHeight = 16
  21.   object Notebook1: TNotebook
  22.     Left = 0
  23.     Top = -5
  24.     Width = 182
  25.     Height = 318
  26.     Color = clNavy
  27.     ParentColor = False
  28.     TabOrder = 0
  29.     object TPage
  30.       Left = 0
  31.       Top = 0
  32.       Caption = 'REingabe'
  33.       object ZurueckButton: TSpeedButton
  34.         Left = 59
  35.         Top = 104
  36.         Width = 30
  37.         Height = 30
  38.         Glyph.Data = {
  39.           20020000424D2002000000000000760000002800000019000000190000000100
  40.           0400000000009001000000000000000000000000000000000000000000000000
  41.           80000080000000808000800000008000800080800000C0C0C000808080000000
  42.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  43.           7777777777777000000077777777777777777777777770000000777777777777
  44.           7777777777777000000077777777777777777777777770000000777777777777
  45.           7777777777777000000077777777700077777777777770000000777777770007
  46.           7777777777777000000077777770007777777777777770000000777777000777
  47.           7777777777777000000077777000777777777777777770000000777700077777
  48.           7777777777777000000077700000000000000000007770000000770000000000
  49.           0000000000777000000077700000000000000000007770000000777700077777
  50.           7777777777777000000077777000777777777777777770000000777777000777
  51.           7777777777777000000077777770007777777777777770000000777777770007
  52.           7777777777777000000077777777700077777777777770000000777777777777
  53.           7777777777777000000077777777777777777777777770000000777777777777
  54.           7777777777777000000077777777777777777777777770000000777777777777
  55.           7777777777777000000000000000000000000000000000000000000000000000
  56.           00000000}
  57.         Spacing = 0
  58.         OnClick = ZurueckButtonClick
  59.       end
  60.       object VorzeichenButton: TSpeedButton
  61.         Left = 94
  62.         Top = 244
  63.         Width = 30
  64.         Height = 30
  65.         Glyph.Data = {
  66.           20020000424D2002000000000000760000002800000019000000190000000100
  67.           0400000000009001000000000000000000000000000000000000000000000000
  68.           80000080000000808000800000008000800080800000C0C0C000808080000000
  69.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  70.           7777777777777000000077777777777777777777777770000000777777777777
  71.           7777777777777000000077777777777777777777777770000000777077777777
  72.           7777777777777000000077770777777770000000000770000000777770777777
  73.           7000000000077000000077777707777777777777777770000000777777707777
  74.           7777777777777000000077777777077777777777777770000000777777777077
  75.           7777777777777000000077777777770777777777777770000000777777777770
  76.           7777777777777000000077777777777707777777777770000000777777007777
  77.           7077777777777000000077777700777777077777777770000000777777007777
  78.           7770777777777000000077777700777777770777777770000000770000000000
  79.           7777707777777000000077000000000077777707777770000000777777007777
  80.           7777777077777000000077777700777777777777077770000000777777007777
  81.           7777777777777000000077777700777777777777777770000000777777777777
  82.           7777777777777000000000000000000000000000000000000000000000000000
  83.           00000000}
  84.         OnClick = VorzeichenButtonClick
  85.       end
  86.       object LBDisplay: TListBox
  87.         Left = 24
  88.         Top = 16
  89.         Width = 135
  90.         Height = 76
  91.         Color = clWhite
  92.         Font.Color = clBlack
  93.         Font.Height = -13
  94.         Font.Name = 'MS Sans Serif'
  95.         Font.Style = [fsBold]
  96.         ItemHeight = 16
  97.         Items.Strings = (
  98.           '')
  99.         ParentFont = False
  100.         TabOrder = 0
  101.         OnEndDrag = LBDisplayEndDrag
  102.         OnMouseDown = LBDisplayMouseDown
  103.         OnMouseMove = LBDisplayMouseMove
  104.       end
  105.       object ClearButton: TButton
  106.         Left = 24
  107.         Top = 104
  108.         Width = 30
  109.         Height = 30
  110.         Caption = 'C'
  111.         Font.Color = clBlack
  112.         Font.Height = -16
  113.         Font.Name = 'Terminal'
  114.         Font.Style = []
  115.         ParentFont = False
  116.         TabOrder = 1
  117.         OnClick = ClearButtonClick
  118.       end
  119.       object ProzentButton: TButton
  120.         Left = 94
  121.         Top = 104
  122.         Width = 30
  123.         Height = 30
  124.         Caption = '%'
  125.         Font.Color = clBlack
  126.         Font.Height = -16
  127.         Font.Name = 'Terminal'
  128.         Font.Style = []
  129.         ParentFont = False
  130.         TabOrder = 2
  131.         OnClick = ProzentButtonClick
  132.       end
  133.       object GeteiltButton: TButton
  134.         Left = 129
  135.         Top = 104
  136.         Width = 30
  137.         Height = 30
  138.         Caption = '/'
  139.         Font.Color = clBlack
  140.         Font.Height = -16
  141.         Font.Name = 'Terminal'
  142.         Font.Style = []
  143.         ParentFont = False
  144.         TabOrder = 3
  145.         OnClick = Button_OperatorClick
  146.       end
  147.       object Eing7Button: TButton
  148.         Left = 24
  149.         Top = 139
  150.         Width = 30
  151.         Height = 30
  152.         Caption = '7'
  153.         Font.Color = clBlack
  154.         Font.Height = -16
  155.         Font.Name = 'Terminal'
  156.         Font.Style = []
  157.         ParentFont = False
  158.         TabOrder = 4
  159.         OnClick = ButtonZahlClick
  160.       end
  161.       object Eing8Button: TButton
  162.         Left = 59
  163.         Top = 139
  164.         Width = 30
  165.         Height = 30
  166.         Caption = '8'
  167.         Font.Color = clBlack
  168.         Font.Height = -16
  169.         Font.Name = 'Terminal'
  170.         Font.Style = []
  171.         ParentFont = False
  172.         TabOrder = 5
  173.         OnClick = ButtonZahlClick
  174.       end
  175.       object Eing9Button: TButton
  176.         Left = 94
  177.         Top = 139
  178.         Width = 30
  179.         Height = 30
  180.         Caption = '9'
  181.         Font.Color = clBlack
  182.         Font.Height = -16
  183.         Font.Name = 'Terminal'
  184.         Font.Style = []
  185.         ParentFont = False
  186.         TabOrder = 6
  187.         OnClick = ButtonZahlClick
  188.       end
  189.       object MalButton: TButton
  190.         Left = 129
  191.         Top = 139
  192.         Width = 30
  193.         Height = 30
  194.         Caption = 'x'
  195.         Font.Color = clBlack
  196.         Font.Height = -16
  197.         Font.Name = 'Terminal'
  198.         Font.Style = []
  199.         ParentFont = False
  200.         TabOrder = 7
  201.         OnClick = Button_OperatorClick
  202.       end
  203.       object Eing4Button: TButton
  204.         Left = 24
  205.         Top = 174
  206.         Width = 30
  207.         Height = 30
  208.         Caption = '4'
  209.         Font.Color = clBlack
  210.         Font.Height = -16
  211.         Font.Name = 'Terminal'
  212.         Font.Style = []
  213.         ParentFont = False
  214.         TabOrder = 8
  215.         OnClick = ButtonZahlClick
  216.       end
  217.       object Eing5Button: TButton
  218.         Left = 59
  219.         Top = 174
  220.         Width = 30
  221.         Height = 30
  222.         Caption = '5'
  223.         Font.Color = clBlack
  224.         Font.Height = -16
  225.         Font.Name = 'Terminal'
  226.         Font.Style = []
  227.         ParentFont = False
  228.         TabOrder = 9
  229.         OnClick = ButtonZahlClick
  230.       end
  231.       object Eing6Button: TButton
  232.         Left = 94
  233.         Top = 174
  234.         Width = 30
  235.         Height = 30
  236.         Caption = '6'
  237.         Font.Color = clBlack
  238.         Font.Height = -16
  239.         Font.Name = 'Terminal'
  240.         Font.Style = []
  241.         ParentFont = False
  242.         TabOrder = 10
  243.         OnClick = ButtonZahlClick
  244.       end
  245.       object MinusButton: TButton
  246.         Left = 129
  247.         Top = 174
  248.         Width = 30
  249.         Height = 30
  250.         Caption = '-'
  251.         Font.Color = clBlack
  252.         Font.Height = -16
  253.         Font.Name = 'Terminal'
  254.         Font.Style = []
  255.         ParentFont = False
  256.         TabOrder = 11
  257.         OnClick = Button_OperatorClick
  258.       end
  259.       object Eing1Button: TButton
  260.         Left = 24
  261.         Top = 209
  262.         Width = 30
  263.         Height = 30
  264.         Caption = '1'
  265.         Font.Color = clBlack
  266.         Font.Height = -16
  267.         Font.Name = 'Terminal'
  268.         Font.Style = []
  269.         ParentFont = False
  270.         TabOrder = 12
  271.         OnClick = ButtonZahlClick
  272.       end
  273.       object Eing2Button: TButton
  274.         Left = 59
  275.         Top = 209
  276.         Width = 30
  277.         Height = 30
  278.         Caption = '2'
  279.         Font.Color = clBlack
  280.         Font.Height = -16
  281.         Font.Name = 'Terminal'
  282.         Font.Style = []
  283.         ParentFont = False
  284.         TabOrder = 13
  285.         OnClick = ButtonZahlClick
  286.       end
  287.       object Eing3Button: TButton
  288.         Left = 94
  289.         Top = 209
  290.         Width = 30
  291.         Height = 30
  292.         Caption = '3'
  293.         Font.Color = clBlack
  294.         Font.Height = -16
  295.         Font.Name = 'Terminal'
  296.         Font.Style = []
  297.         ParentFont = False
  298.         TabOrder = 14
  299.         OnClick = ButtonZahlClick
  300.       end
  301.       object PlusButton: TButton
  302.         Left = 129
  303.         Top = 209
  304.         Width = 30
  305.         Height = 30
  306.         Caption = '+'
  307.         Font.Color = clBlack
  308.         Font.Height = -16
  309.         Font.Name = 'Terminal'
  310.         Font.Style = []
  311.         ParentFont = False
  312.         TabOrder = 15
  313.         OnClick = Button_OperatorClick
  314.       end
  315.       object Eing0Button: TButton
  316.         Left = 24
  317.         Top = 244
  318.         Width = 30
  319.         Height = 30
  320.         Caption = '0'
  321.         Font.Color = clBlack
  322.         Font.Height = -16
  323.         Font.Name = 'Terminal'
  324.         Font.Style = []
  325.         ParentFont = False
  326.         TabOrder = 16
  327.         OnClick = ButtonZahlClick
  328.       end
  329.       object PunktButton: TButton
  330.         Left = 59
  331.         Top = 244
  332.         Width = 30
  333.         Height = 30
  334.         Caption = '.'
  335.         Font.Color = clBlack
  336.         Font.Height = -16
  337.         Font.Name = 'Terminal'
  338.         Font.Style = []
  339.         ParentFont = False
  340.         TabOrder = 17
  341.         OnClick = PunktButtonClick
  342.       end
  343.       object ErgebnisButton: TButton
  344.         Left = 129
  345.         Top = 244
  346.         Width = 30
  347.         Height = 30
  348.         Caption = '='
  349.         Font.Color = clBlack
  350.         Font.Height = -16
  351.         Font.Name = 'Terminal'
  352.         Font.Style = []
  353.         ParentFont = False
  354.         TabOrder = 18
  355.         OnClick = ErgebnisButtonClick
  356.       end
  357.       object Panel1: TPanel
  358.         Left = 24
  359.         Top = 288
  360.         Width = 137
  361.         Height = 18
  362.         Caption = 'Financial - Calculator'
  363.         Font.Color = clBlack
  364.         Font.Height = -11
  365.         Font.Name = 'Times New Roman'
  366.         Font.Style = []
  367.         ParentFont = False
  368.         TabOrder = 19
  369.         OnClick = Panel1Click
  370.       end
  371.     end
  372.     object TPage
  373.       Left = 0
  374.       Top = 0
  375.       Caption = 'Info'
  376.       object Label1: TLabel
  377.         Left = 10
  378.         Top = 16
  379.         Width = 159
  380.         Height = 16
  381.         Caption = 'TFinCalcDlg Component '
  382.         Color = clNavy
  383.         Font.Color = clYellow
  384.         Font.Height = -13
  385.         Font.Name = 'System'
  386.         Font.Style = [fsBold]
  387.         ParentColor = False
  388.         ParentFont = False
  389.       end
  390.       object cLabel: TLabel
  391.         Left = 5
  392.         Top = 69
  393.         Width = 87
  394.         Height = 14
  395.         Caption = 'Copyright ∩┐╜ 1996 '
  396.         Color = clNavy
  397.         Font.Color = clYellow
  398.         Font.Height = -11
  399.         Font.Name = 'Arial'
  400.         Font.Style = []
  401.         ParentColor = False
  402.         ParentFont = False
  403.       end
  404.       object aLabel: TLabel
  405.         Left = 31
  406.         Top = 110
  407.         Width = 95
  408.         Height = 14
  409.         Caption = 'All Rights Reserved'
  410.         Color = clNavy
  411.         Font.Color = clYellow
  412.         Font.Height = -11
  413.         Font.Name = 'Arial'
  414.         Font.Style = []
  415.         ParentColor = False
  416.         ParentFont = False
  417.       end
  418.       object Label3: TLabel
  419.         Left = 20
  420.         Top = 216
  421.         Width = 145
  422.         Height = 14
  423.         Caption = '101360.756@compuserve.com'
  424.         Font.Color = clYellow
  425.         Font.Height = -11
  426.         Font.Name = 'Times New Roman'
  427.         Font.Style = []
  428.         ParentFont = False
  429.       end
  430.       object Label5: TLabel
  431.         Left = 20
  432.         Top = 232
  433.         Width = 145
  434.         Height = 14
  435.         Caption = '101365.321@compuserve.com'
  436.         Font.Color = clYellow
  437.         Font.Height = -11
  438.         Font.Name = 'Times New Roman'
  439.         Font.Style = []
  440.         ParentFont = False
  441.       end
  442.       object Label2: TLabel
  443.         Left = 23
  444.         Top = 168
  445.         Width = 126
  446.         Height = 14
  447.         Caption = 'E-Mail :   CIS 101360,756 '
  448.         Font.Color = clYellow
  449.         Font.Height = -11
  450.         Font.Name = 'Times New Roman'
  451.         Font.Style = []
  452.         ParentFont = False
  453.       end
  454.       object Label4: TLabel
  455.         Left = 10
  456.         Top = 40
  457.         Width = 115
  458.         Height = 16
  459.         Caption = '(V1.21) for Delphi '
  460.         Color = clNavy
  461.         Font.Color = clYellow
  462.         Font.Height = -13
  463.         Font.Name = 'System'
  464.         Font.Style = [fsBold]
  465.         ParentColor = False
  466.         ParentFont = False
  467.       end
  468.       object Label6: TLabel
  469.         Left = 5
  470.         Top = 85
  471.         Width = 167
  472.         Height = 14
  473.         Caption = 'by A.Haeber && S.Unterbarnscheidt'
  474.         Color = clNavy
  475.         Font.Color = clYellow
  476.         Font.Height = -11
  477.         Font.Name = 'Arial'
  478.         Font.Style = []
  479.         ParentColor = False
  480.         ParentFont = False
  481.       end
  482.       object Label7: TLabel
  483.         Left = 70
  484.         Top = 184
  485.         Width = 79
  486.         Height = 14
  487.         Caption = 'CIS 101365,321 '
  488.         Font.Color = clYellow
  489.         Font.Height = -11
  490.         Font.Name = 'Times New Roman'
  491.         Font.Style = []
  492.         ParentFont = False
  493.       end
  494.       object Label8: TLabel
  495.         Left = 71
  496.         Top = 200
  497.         Width = 43
  498.         Height = 14
  499.         Caption = 'InterNet '
  500.         Font.Color = clYellow
  501.         Font.Height = -11
  502.         Font.Name = 'Times New Roman'
  503.         Font.Style = []
  504.         ParentFont = False
  505.       end
  506.       object Panel2: TPanel
  507.         Left = 5
  508.         Top = 144
  509.         Width = 172
  510.         Height = 5
  511.         Caption = 'Panel2'
  512.         TabOrder = 0
  513.       end
  514.       object Panel3: TPanel
  515.         Left = 24
  516.         Top = 288
  517.         Width = 137
  518.         Height = 18
  519.         Caption = 'Financial - Calculator'
  520.         Font.Color = clBlack
  521.         Font.Height = -11
  522.         Font.Name = 'Times New Roman'
  523.         Font.Style = []
  524.         ParentFont = False
  525.         TabOrder = 1
  526.         OnClick = Panel3Click
  527.       end
  528.     end
  529.   end
  530. end
  531.