pmainform.dfm

tin生成源代码

object MainForm: TMainForm
  Left = 215
  Top = 168
  Width = 692
  Height = 431
  Caption = 'TIN生成'
  Color = 15987699
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnMouseDown = FormMouseDown
  OnMouseMove = FormMouseMove
  OnMouseUp = FormMouseUp
  OnPaint = FormPaint
  OnResize = FormResize
  PixelsPerInch = 120
  TextHeight = 16
  object ToolBar: TToolBar
    Left = 0
    Top = 0
    Width = 684
    Height = 28
    ButtonHeight = 23
    Caption = 'ToolBar'
    Color = clMenu
    ParentColor = False
    TabOrder = 0
    object sButton1: TSpeedButton
      Left = 0
      Top = 2
      Width = 23
      Height = 23
      Hint = '退出系统'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        77778888888888F787F788888888888F8F88444400888FFF44447774C4008FFF
        477777744C40FFFF47777774C4C0FFFF477777744C40FEFE47777774C4C0EFEF
        477777744C40FEFE47777774C4C0EFEF47777774444444444777777777777777
        7777777770000007777777777022220777777777700000077777}
      ParentShowHint = False
      ShowHint = True
      OnClick = sButton1Click
    end
    object sButton2: TSpeedButton
      Left = 23
      Top = 2
      Width = 23
      Height = 23
      Hint = '打开图形文件'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFF77777777777777777000000000007777700333333333077770B033333333
        307770FB03333333330770BFB0333333333070FBFB000000000070BFBFBFBFB0
        777770FBFBFBFBF0777770BFB000000077777700077777777000777777777777
        7700777777777077707077777777770007777777777777777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = N2Click
    end
    object sButton3: TSpeedButton
      Left = 46
      Top = 2
      Width = 23
      Height = 23
      Hint = '文件信息'
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000FFFFFFFFFFFFFFFFFFFFFFFFF
        FFF000FFFFFFFFFFFFFFFFFFFFFFFFFFFFF000FFFFFFFFFFFFFFFFFFFFFFFFFF
        FFF000FFFFFFFFFFFFFFFFFFFFFFFFFFFFF000FFFFFFFFFFFFFFFFFFFFFFFFFF
        FFF000FFFFFFFFFFFFFFFFFFFFFFFFFFFFF000FFFFFFFFFFFFFFFFFFFFFFFFFF
        FF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFF000FFFFFFFFFFFFFFFFFFFFFFFFFFFFF000FFFFFFFFFFFFFFFFFFFFFFFFFF
        FFF000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
      ParentShowHint = False
      ShowHint = True
    end
    object sButton4: TSpeedButton
      Left = 69
      Top = 2
      Width = 23
      Height = 23
      Hint = '全幅显示'
      AllowAllUp = True
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000007
        7777FFFFFFFFFFF077770FFFFFFFFFFF077700000000000FF077FFFFFFFFFFF0
        FF070FFFFFFFFFFF0FF000000000000FF0FFFFFFFFFFFFF0FF0F0FFFFF0FFFFF
        0FF070FFF000FFFFF0FF770F00000FFFFF0F7770000000FFFFF077777000FFFF
        FFFF777770007000000077777000777777777777700077777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = sButton4Click
    end
    object sButton5: TSpeedButton
      Left = 92
      Top = 2
      Width = 23
      Height = 23
      Hint = '放大'
      GroupIndex = 1
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        88887777777777777000777770000777000777700FFFF0070077770FFFFFFFF0
        777770FFFFFFFFFF077770FFFF00FFFF07770FFFFF00FFFFF0770FFF000000FF
        F0770FFF000000FFF0770FFFFF00FFFFF07770FFFF00FFFF077770FFFFFFFFFF
        0777770FFFFFFFF0777777700FFFF00777777777700007777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = sButton5Click
    end
    object sButton6: TSpeedButton
      Left = 115
      Top = 2
      Width = 23
      Height = 23
      Hint = '缩小'
      GroupIndex = 1
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        88887777777777777000777770000777000777700FFFF0070077770FFFFFFFF0
        777770FFFFFFFFFF077770FFFFFFFFFF07770FFFFFFFFFFFF0770FFF000000FF
        F0770FFF000000FFF0770FFFFFFFFFFFF07770FFFFFFFFFF077770FFFFFFFFFF
        0777770FFFFFFFF0777777700FFFF00777777777700007777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = sButton6Click
    end
    object sButton7: TSpeedButton
      Left = 138
      Top = 2
      Width = 23
      Height = 23
      Hint = '平移'
      GroupIndex = 1
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8888777770FFFFFF077777770FFFFFFF07777770FFFFFFFFF077770FFFFFFFFF
        F077770FFFFFFFFFFF0770FFFFFFFFFFFF070FFF0FFFFFFFFF070FF00FFFFFFF
        FFF0700F0FFFFFFF0FF07770FF0FF0FF0FF07770FF0FF0FF00F0770FF00FF0FF
        0707770FF00FF0FF07777770070FF00077777777777007777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = sButton7Click
    end
    object sButton8: TSpeedButton
      Left = 161
      Top = 2
      Width = 23
      Height = 23
      Hint = '开窗'
      GroupIndex = 1
      Glyph.Data = {
        7E010000424D7E01000000000000760000002800000016000000160000000100
        0400000000000801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFFFFFF00FFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFFFFFFFFFFFF00FFFF
        FFFFFFFFFFFFFFFFFF00FFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFFFFFFFF0F
        FF00FFFFFFFFFFFFFFFFFF0FFF00FFF000000000000000000F00FFF0FFFFFFFF
        FFFFFF0FFF00FFF0FFFFFFFFFFFFFF0FFF00FFF0FFFFFFFFFFFFFF0FFF00FFF0
        FFFFFFFFFFFFFF0FFF00FFF0FFFFFFFFFFFFFF0FFF00FFF0FFFFFFFFFFFFFF0F
        FF00FFF0FFFFFFFFFFFFFF0FFF00F000000000000000000FFF00FFF0FFFFFFFF
        FFFFFFFFFF00FFF0FFFFFFFFFFFFFFFFFF00FFFFFFFFFFFFFFFFFFFFFF00FFFF
        FFFFFFFFFFFFFFFFFF00FFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFFFFFFFFFF
        FF00}
      ParentShowHint = False
      ShowHint = True
      OnClick = sButton8Click
    end
  end
  object sBar: TStatusBar
    Left = 0
    Top = 352
    Width = 684
    Height = 23
    Panels = <>
    SimplePanel = True
  end
  object MainMenu1: TMainMenu
    Left = 8
    Top = 40
    object N1: TMenuItem
      Caption = '系统'
      object N2: TMenuItem
        Caption = '读文件'
        OnClick = N2Click
      end
      object TIN1: TMenuItem
        Caption = '生成TIN'
        OnClick = TIN1Click
      end
      object N3: TMenuItem
        Caption = '退出'
        OnClick = N3Click
      end
    end
  end
  object OpenDialog: TOpenDialog
    Left = 48
    Top = 40
  end
end