DOS/V Power Report 2001 June/VPR0106A.BIN/OLS/SCHWATCH/schwatch.lzh/Schwatch.exe/0/RCDATA/TFORMEDIT/TFORMEDIT.txt

Text File | 2000-11-11 | 13KB | 420 lines

object FormEdit: TFormEdit
  Left = 205
  Top = 257
  Width = 620
  Height = 427
  ActiveControl = ListView
  BorderIcons = [biSystemMenu]
  Caption = 'ｿｽ齬'
  Font.Charset = SHIFTJIS_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'MS UI Gothic'
  Font.Style = []
  Menu = MainMenu1
  Scaled = False
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Image1: TImage
    Left = 208
    Top = 200
    Width = 16
    Height = 16
    AutoSize = True
    Picture.Data = {<image000.bmp>}
  end
  object Image2: TImage
    Left = 232
    Top = 200
    Width = 16
    Height = 16
    AutoSize = True
    Picture.Data = {<image001.bmp>}
  end
  object Image3: TImage
    Left = 256
    Top = 200
    Width = 16
    Height = 16
    AutoSize = True
    Picture.Data = {<image002.bmp>}
  end
  object ListView: TListView
    Left = 0
    Top = 50
    Width = 612
    Height = 312
    Align = alClient
    OnClick = ListViewClick
    OnDblClick = RepClick
    Columns = <>
    ReadOnly = True
    Font.Charset = SHIFTJIS_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS UI Gothic'
    Font.Style = []
    MultiSelect = True
    RowSelect = True
    OnColumnClick = ListViewColumnClick
    ParentFont = False
    SortType = stText
    TabOrder = 0
    ViewStyle = vsReport
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 612
    Height = 50
    ButtonHeight = 42
    ButtonWidth = 8
    EdgeBorders = [ebLeft, ebTop, ebRight, ebBottom]
    TabOrder = 1
    object BtnView1: TSpeedButton
      Left = 0
      Top = 2
      Width = 54
      Height = 42
      GroupIndex = 1
      Down = True
      Caption = 'ｿｽPｿｽｿｽ'
      Flat = True
      Font.Charset = SHIFTJIS_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS UI Gothic'
      Font.Style = []
      Glyph.Data = {
        42010000424D4201000000000000760000002800000012000000110000000100
        040000000000CC000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
        66666600000060000000000000000600000060FF7FF7FF7FF7FF0600000060FF
        7FF7FF7FF7FF0600000060777777447777770600000060FF7FF7447FF7FF0600
        000060FF7FF7447FF7FF0600000060777777447777770600000060FF7F47447F
        F7FF0600000060FF7F44447FF7FF0600000060777774447777770600000060FF
        7FF7447FF7FF0600000060FF7FF7FF7FF7FF0600000060CCCCCCCCCCCCCC0600
        000060CCCCCCCCCCCCCC06000000600000000000000006000000666666666666
        666666000000}
      Layout = blGlyphTop
      ParentFont = False
      OnClick = View1Click
    end
    object BtnView2: TSpeedButton
      Left = 54
      Top = 2
      Width = 54
      Height = 42
      GroupIndex = 1
      Caption = 'ｿｽｿｽｿｽｿｽ'
      Flat = True
      Font.Charset = SHIFTJIS_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS UI Gothic'
      Font.Style = []
      Glyph.Data = {
        42010000424D4201000000000000760000002800000012000000110000000100
        040000000000CC000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
        66666600000060000000000000000600000060FF7FF7FF7FF7FF0600000060FF
        7FF7FF7FF7FF0600000060777444777744770600000060FF44F44F7F44FF0600
        000060FF7FF44F7F44FF0600000060777774477744770600000060FF7F44FF4F
        44FF0600000060FF7FF44F4444FF0600000060774474477444770600000060FF
        7444FF7F44FF0600000060FF7FF7FF7FF7FF0600000060CCCCCCCCCCCCCC0600
        000060CCCCCCCCCCCCCC06000000600000000000000006000000666666666666
        666666000000}
      Layout = blGlyphTop
      ParentFont = False
      OnClick = View2Click
    end
    object BtnView3: TSpeedButton
      Left = 108
      Top = 2
      Width = 54
      Height = 42
      GroupIndex = 1
      Caption = 'ｿｽNｿｽｿｽ'
      Flat = True
      Font.Charset = SHIFTJIS_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS UI Gothic'
      Font.Style = []
      Glyph.Data = {
        42010000424D4201000000000000760000002800000012000000110000000100
        040000000000CC000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
        66666600000060000000000000000600000060FF7FF7FF7FF7FF0600000060FF
        7FF7FF7FF7FF06000000607447774477744706000000604F74F4FF4F47F40600
        000060FF74F4FF4FF7F406000000607747744477444F0600000060FF74F4FF7F
        47FF06000000604F74F4FF4F47FF0600000060F44FF7447F4444060000006077
        7777777777770600000060FF7FF7FF7FF7FF0600000060CCCCCCCCCCCCCC0600
        000060CCCCCCCCCCCCCC06000000600000000000000006000000666666666666
        666666000000}
      Layout = blGlyphTop
      ParentFont = False
      OnClick = View3Click
    end
    object BtnView4: TSpeedButton
      Left = 162
      Top = 2
      Width = 54
      Height = 42
      GroupIndex = 1
      Caption = 'ｿｽ`ｿｽkｿｽk'
      Flat = True
      Font.Charset = SHIFTJIS_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS UI Gothic'
      Font.Style = []
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
        6666666666666666666666666666666666666666666666666666666666666666
        6666606660606066606666060666660606666600066666000666600000666000
        0066000000060000000666000666660006666660666666606666666666666666
        6666666666666666666666666666666666666666666666666666}
      Layout = blGlyphTop
      ParentFont = False
      OnClick = AllClick
    end
    object ToolButton1: TToolButton
      Left = 216
      Top = 2
      Width = 8
      Height = 42
      Caption = 'ToolButton1'
      ImageIndex = 0
      Style = tbsDivider
    end
    object BtnAdd: TSpeedButton
      Left = 224
      Top = 2
      Width = 54
      Height = 42
      Caption = 'ｿｽﾇ会ｿｽ'
      Flat = True
      Font.Charset = SHIFTJIS_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS UI Gothic'
      Font.Style = []
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
        66666600000000000666660FFFFFFFFF0666660FFFFFFFFF0666660FFFFFFFFF
        0666660FFFFFFFFF0666660FFFFFFF8F0666660FFFF8F8F80666660FFFFF88B8
        0F66660FFFFFB8B8B866660FFF888BBB8886660FFFFBBBFBBBF6660FFFFFFBBB
        866666000000B8B8B8666666666F86B86F666666666666F86666}
      Layout = blGlyphTop
      ParentFont = False
      OnClick = AddClick
    end
    object BtnRep: TSpeedButton
      Left = 278
      Top = 2
      Width = 54
      Height = 42
      Caption = 'ｿｽｿｽｿｽｿｽ'
      Enabled = False
      Flat = True
      Font.Charset = SHIFTJIS_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS UI Gothic'
      Font.Style = []
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
        66666600000000000666660FFFFFFFFF0666660FFFFFFFFF0666660FFFFFFFFF
        0666660FFF10FFFF0666660FFF310FFF0666660FFF3B10FF0666660FFFF3B10F
        0666660FFFFF3B100666660FFFFFF3B10666660FFFFFF03B1066660FFFFFF003
        D166660000000066996666666666666666666666666666666666}
      Layout = blGlyphTop
      ParentFont = False
      OnClick = RepClick
    end
    object BtnDel: TSpeedButton
      Left = 332
      Top = 2
      Width = 54
      Height = 42
      Caption = 'ｿｽ尞'
      Enabled = False
      Flat = True
      Font.Charset = SHIFTJIS_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS UI Gothic'
      Font.Style = []
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
        666666600000000000666660FFFFFFFFF0666600FFFFFFFF006666000FFFFFF0
        0066666000FFFF00F0666660000FF00FF0666660F00000FFF0666660FF000FFF
        F0666660F00000FFF0666660000FF0000066660000FFFF00066660000FFFFF00
        0666600000000006006666666666666666666666666666666666}
      Layout = blGlyphTop
      ParentFont = False
      OnClick = DelClick
    end
    object BtnCopy: TSpeedButton
      Left = 386
      Top = 2
      Width = 54
      Height = 42
      Caption = 'ｿｽRｿｽsｿｽ['
      Enabled = False
      Flat = True
      Font.Charset = SHIFTJIS_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS UI Gothic'
      Font.Style = []
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666660000000
        0000666660FFFFFFFFF0666660FFFFFFFFF0000000FFFFFFFFF00FFFF0FFFFFF
        FFF00FFFF0F4444FFFF00FFFF0FF444FFFF00FFFF0FF444FFFF00FF4F0F4FF4F
        FFF00FFF444FFFFF00000FFFF0FFFFFF0F060FFFF0FFFFFF00660FFFF0000000
        06660FFFFFF0F06666660FFFFFF0066666660000000066666666}
      Layout = blGlyphTop
      ParentFont = False
      OnClick = RepClick
    end
    object BtnMove: TSpeedButton
      Left = 440
      Top = 2
      Width = 54
      Height = 42
      Caption = 'ｿｽﾚ難ｿｽ'
      Enabled = False
      Flat = True
      Font.Charset = SHIFTJIS_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS UI Gothic'
      Font.Style = []
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000C40E0000C40E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666660000000
        0000666660FFFFFFFFF0666660FFFFFFFFF0060600FFFFFFFFF0666660FFFFFF
        FFF0066660F4444FFFF0666660FF444FFFF0066660FF444FFFF0666460F4FF4F
        FFF00666444FFFFF0000666660FFFFFF0F06066660FFFFFF0066666660000000
        0666066666606066666666666666066666660606060066666666}
      Layout = blGlyphTop
      ParentFont = False
      OnClick = RepClick
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 362
    Width = 612
    Height = 19
    Panels = <
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object MainMenu1: TMainMenu
    Left = 120
    Top = 168
    object MenuFile: TMenuItem
      Caption = 'ｿｽtｿｽ@ｿｽCｿｽｿｽ(&F)'
      object MenuCsvSave: TMenuItem
        Caption = 'CSVｿｽ`ｿｽｿｽｿｽﾅ保托ｿｽ(&C)'
        OnClick = MenuCsvSaveClick
      end
      object MenuFileSep1: TMenuItem
        Caption = '-'
      end
      object MenuExit: TMenuItem
        Caption = 'ｿｽIｿｽｿｽ(&X)'
        OnClick = FormClose
      end
    end
    object MenuEdit: TMenuItem
      Caption = 'ｿｽﾒ集(&E)'
      object MenuAdd: TMenuItem
        Caption = 'ｿｽﾇ会ｿｽ(&A)'
        OnClick = AddClick
      end
      object MenuRep: TMenuItem
        Caption = 'ｿｽｿｽｿｽｿｽ(&R)'
        Enabled = False
        OnClick = RepClick
      end
      object MenuDel: TMenuItem
        Caption = 'ｿｽ尞(&D)'
        Enabled = False
        OnClick = DelClick
      end
      object MenuCopy: TMenuItem
        Caption = 'ｿｽRｿｽsｿｽ[(&C)'
        Enabled = False
        OnClick = RepClick
      end
      object MenuMove: TMenuItem
        Caption = 'ｿｽﾚ難ｿｽ(&M)...'
        Enabled = False
        OnClick = RepClick
      end
    end
    object MenuShow: TMenuItem
      Caption = 'ｿｽ\ｿｽｿｽ(&V)'
      object MenuView1: TMenuItem
        Caption = 'ｿｽPｿｽｿｽ(&D)'
        Checked = True
        GroupIndex = 1
        RadioItem = True
        OnClick = View1Click
      end
      object MenuView2: TMenuItem
        Caption = 'ｿｽｿｽｿｽｿｽ(&M)'
        GroupIndex = 1
        RadioItem = True
        OnClick = View2Click
      end
      object MenuView3: TMenuItem
        Caption = 'ｿｽNｿｽｿｽ(&Y)'
        GroupIndex = 1
        RadioItem = True
        OnClick = View3Click
      end
      object MenuView4: TMenuItem
        Caption = 'ｿｽｿｽｿｽﾗゑｿｽ(&A)'
        GroupIndex = 1
        RadioItem = True
        OnClick = AllClick
      end
    end
  end
  object SaveDialog1: TSaveDialog
    Filter = 'CSV (*.csv)|*.csv|ｿｽｿｽｿｽﾗてのフｿｽ@ｿｽCｿｽｿｽ (*.*)|*.*'
    Left = 152
    Top = 168
  end
end