unit1.dfm

电气控制仿真软件

            'd = AddUnit( "Text", 10, y, 400, 28 )'
            'y = y + d.Height'
            'd.Text="123456.789"'
            'd.NumberDigital = 3'
            'd.NumberAttr = 4 + 8 + 16'
            'd = AddUnit( "Text", 10, y, 400, 28 )'
            'y = y + d.Height'
            'd.Text="-123456.789"'
            'd.NumberDigital = 3'
            'd.NumberAttr = 2 + 8 + 64'
            'd = AddUnit( "Text", 10, y, 400, 28 )'
            'y = y + d.Height'
            'd.Text="0"'
            'd.NumberDigital = 3'
            'd.NumberAttr = 1'
            'd = AddUnit( "Text", 10, y, 400, 28 )'
            'y = y + d.Height'
            'd.Text="0.123"'
            'd.NumberDigital = 2'
            'd.NumberAttr = 1'
            '-------------------------------'
            #39#27880#37322#65306#25171#21360#32440#30340#35774#32622
            'Page.Visible=true'
            'Range.left = Page.left'
            'Range.top = Page.top'
            'Range.right = Page.Left + Page.Width'
            'Range.bottom = Page.Top + Page.Height'
            'BackColor=$808080'
            'ZoomFit()'
            '-------------------------------'
            #39#25968#20540#35745#31639
            'LoadFromFile("'#34920#26684#35745#31639'")'
            '-------------------------------'
            #39#21160#30011#26834#22270
            'LoadFromFile('#39#21160#24577#26834#22270#39')'
            '-------------------------------')
          TabOrder = 0
        end
        object Button1: TButton
          Left = 0
          Top = 390
          Width = 133
          Height = 128
          Anchors = [akRight, akBottom]
          Caption = #32487#32493
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -29
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          OnClick = Button1Click
        end
      end
      object Panel1: TPanel
        Left = 133
        Top = 0
        Width = 474
        Height = 511
        Align = alClient
        BevelInner = bvLowered
        BorderWidth = 4
        TabOrder = 1
        object vgctrl2: Tvgctrl
          Left = 6
          Top = 6
          Width = 462
          Height = 506
          Align = alClient
          TabOrder = 0
          ControlData = {
            545046300D544D7957696E436F6E74726F6C00044C656674020603546F700206
            05576964746803CE010648656967687403FA010000}
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = #35774#35745#22270#24418
      ImageIndex = 2
      object Panel4: TPanel
        Left = 0
        Top = 0
        Width = 607
        Height = 511
        Align = alClient
        BevelInner = bvLowered
        BorderWidth = 4
        TabOrder = 0
        object Panel6: TPanel
          Left = 6
          Top = 6
          Width = 211
          Height = 480
          Align = alLeft
          TabOrder = 0
          object SpeedButton1: TSpeedButton
            Left = 25
            Top = 4
            Width = 23
            Height = 22
            Hint = #25171#24320
            Glyph.Data = {
              66010000424D6601000000000000760000002800000014000000140000000100
              040000000000F0000000C40E0000C40E00001000000000000000000000000000
              80000080000000808000800000008000800080800000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
              7777777700007777777777777777777700007777777777777777777700007777
              7777777777777777000077000000000007777777000077003333333330777777
              0000770B03333333330777770000770FB0333333333077770000770BFB033333
              333307770000770FBFB00000000000770000770BFBFBFBFB077777770000770F
              BFBFBFBF077777770000770BFB00000007777777000077700077777777000777
              0000777777777777777007770000777777777707770707770000777777777770
              0077777700007777777777777777777700007777777777777777777700007777
              77777777777777770000}
            OnClick = SpeedButton1Click
          end
          object SpeedButton2: TSpeedButton
            Left = 48
            Top = 4
            Width = 23
            Height = 22
            Hint = #20445#23384
            Enabled = False
            Glyph.Data = {
              66010000424D6601000000000000760000002800000014000000140000000100
              040000000000F0000000C40E0000C40E00001000000000000000000000000000
              80000080000000808000800000008000800080800000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
              7777777700007777777777777777777700007777777777777777777700007777
              0000000000000777000077703300000077030777000077703300000077030777
              0000777033000000770307770000777033000000000307770000777033333333
              3333077700007770330000000033077700007770307777777703077700007770
              3077777777030777000077703077777777030777000077703077777777030777
              0000777030777777770007770000777030777777770707770000777000000000
              0000077700007777777777777777777700007777777777777777777700007777
              77777777777777770000}
            OnClick = SpeedButton2Click
          end
          object SpeedButton3: TSpeedButton
            Left = 94
            Top = 4
            Width = 23
            Height = 22
            Hint = #25171#21360
            Glyph.Data = {
              66010000424D6601000000000000760000002800000014000000140000000100
              040000000000F0000000C40E0000C40E00001000000000000000000000000000
              80000080000000808000800000008000800080800000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
              7777777700007777777777777777777700007700077777777770007700007000
              0000000000000007000070F77777777777777707000070F77777777777777707
              000070F77777777777997707000070FFFFFFFFFFFFFFFF070000780088888888
              88880087000077700000000000000777000077700FFFFFFFFFF0077700007777
              0F00000000F07777000077770FFFFFFFFFF07777000077770F00000000F07777
              000077770FFFFFFFFFF07777000077770F00FFFFFFF07777000077770FFFFFFF
              FFF0777700007777000000000000777700007777777777777777777700007777
              77777777777777770000}
            OnClick = SpeedButton3Click
          end
          object SpeedButton4: TSpeedButton
            Left = 117
            Top = 4
            Width = 23
            Height = 22
            Hint = #25171#21360#35774#32622
            Glyph.Data = {
              66010000424D6601000000000000760000002800000014000000140000000100
              040000000000F0000000C40E0000C40E00001000000000000000000000000000
              8000008000000080800080000000800080008080000080808000C0C0C0000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
              8888888800008888888888888888888800008888888888888888888800008880
              0888888800888888000088801088888080888888000088880108880808888888
              0000888880108080888888880000888888010808888888880000888888808088
              8888888800008888880801088880888800008800008080108803088800008800
              0008880100033088000088088008888003300888000088888008888033308888
              0000888800088800333088880000888888880033000888880000888888888000
              0888888800008888888888888888888800008888888888888888888800008888
              88888888888888880000}
            OnClick = SpeedButton4Click
          end
          object SpeedButton5: TSpeedButton
            Left = 94
            Top = 26
            Width = 23
            Height = 22
            Hint = #25764#38144#25805#20316
            Enabled = False
            Glyph.Data = {
              66010000424D6601000000000000760000002800000014000000140000000100
              040000000000F0000000C40E0000C40E00001000000000000000000000000000
              80000080000000808000800000008000800080800000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
              7777777700007777777777777777777700007777777777777777777700007777
              7777777777777777000077777777777777777777000077777777777777777777
              0000777777777777777777770000777777777777780777770000777700000777
              7708777700007777000077777770777700007777000777777770777700007777
              0070777777707777000077770777007777087777000077777777770000877777
              0000777777777777777777770000777777777777777777770000777777777777
              7777777700007777777777777777777700007777777777777777777700007777
              77777777777777770000}
            OnClick = SpeedButton5Click
          end
          object SpeedButton6: TSpeedButton
            Left = 117
            Top = 26
            Width = 23
            Height = 22
            Hint = #24674#22797#25805#20316
            Enabled = False
            Glyph.Data = {
              66010000424D6601000000000000760000002800000014000000140000000100
              040000000000F0000000C40E0000C40E00001000000000000000000000000000
              80000080000000808000800000008000800080800000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
              7777777700007777777777777777777700007777777777777777777700007777
              7777777777777777000077777777777777777777000077777777777777777777
              0000777777777777777777770000777770877777777777770000777780777770
              0000777700007777077777770000777700007777077777777000777700007777
              0777777707007777000077778077770077707777000077777800007777777777
              0000777777777777777777770000777777777777777777770000777777777777
              7777777700007777777777777777777700007777777777777777777700007777
              77777777777777770000}
            OnClick = SpeedButton6Click
          end
          object SpeedButton7: TSpeedButton
            Left = 140
            Top = 26
            Width = 23
            Height = 22
            Hint = #35009#21098
            Enabled = False
            Glyph.Data = {
              66010000424D6601000000000000760000002800000014000000140000000100
              040000000000F0000000C40E0000C40E00001000000000000000000000000000
              80000080000000808000800000008000800080800000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
              7777777700007777777777777777777700007777777777777777777700007777
              7700777777777777000077777077077007777777000077777077070770777777
              0000777770770707707777770000777777000707707777770000777777770700
              0777777700007777777700077777777700007777777770777777777700007777
              7777000777777777000077777777070777777777000077777770070077777777
              0000777777707770777777770000777777707770777777770000777777707770
              7777777700007777777777777777777700007777777777777777777700007777
              77777777777777770000}
            OnClick = SpeedButton7Click
          end
          object SpeedButton8: TSpeedButton
            Left = 163
            Top = 26
            Width = 23
            Height = 22
            Hint = #25335#36125
            Enabled = False
            Glyph.Data = {
              66010000424D6601000000000000760000002800000014000000140000000100
              040000000000F0000000C40E0000C40E00001000000000000000000000000000
              80000080000000808000800000008000800080800000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
              7777777700007777777777777777777700007777777777777777777700007777
              77777777777777770000777777774444444447770000777777774FFFFFFF4777
              0000777777774F00000F47770000770000004FFFFFFF47770000770FFFFF4F00
              000F47770000770F00004FFFFFFF47770000770FFFFF4F00F44447770000770F
              00004FFFF4F477770000770FFFFF4FFFF44777770000770F00F0444444777777
              0000770FFFF0F077777777770000770FFFF00777777777770000770000007777
              7777777700007777777777777777777700007777777777777777777700007777
              77777777777777770000}