mainunit.~dfm

一个从UML的状态图的MDL文件获取测试用例的源码

object Form1: TForm1
  Left = 57
  Top = 118
  Width = 971
  Height = 732
  Align = alClient
  Caption = 'TCG'#31995#32479
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Memo1: TMemo
    Left = 8
    Top = 16
    Width = 489
    Height = 449
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clOlive
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    ScrollBars = ssBoth
    TabOrder = 0
  end
  object Memo2: TMemo
    Left = 520
    Top = 16
    Width = 433
    Height = 657
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    ScrollBars = ssBoth
    TabOrder = 1
  end
  object Memo3: TMemo
    Left = 8
    Top = 472
    Width = 489
    Height = 201
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clTeal
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    ScrollBars = ssBoth
    TabOrder = 2
  end
  object MainMenu1: TMainMenu
    Left = 624
    Top = 80
    object N1: TMenuItem
      Caption = #25991#20214
      object openfile: TMenuItem
        Caption = #25171#24320'MDL'#25991#20214
        OnClick = openfileClick
      end
      object save: TMenuItem
        Caption = #20445#23384
      end
    end
    object N3: TMenuItem
      Caption = #29992#20363#29983#25104
      object statecover: TMenuItem
        Caption = #29366#24577#35206#30422
        object stateCoverFile: TMenuItem
          Caption = #25991#26412#26174#31034
          OnClick = stateCoverFileClick
        end
        object stateCoverGrafh: TMenuItem
          Caption = #22270#24418#26174#31034
          OnClick = stateCoverGrafhClick
        end
      end
      object N5: TMenuItem
        Caption = #36801#31227#35206#30422
        object N9: TMenuItem
          Caption = #25991#26412#26174#31034
        end
        object N10: TMenuItem
          Caption = #22270#24418#26174#31034
        end
      end
      object N6: TMenuItem
        Caption = #36801#31227#23545#35206#30422
        object N11: TMenuItem
          Caption = #25991#26412#26174#31034
        end
        object N12: TMenuItem
          Caption = #22270#24418#26174#31034
        end
      end
      object N7: TMenuItem
        Caption = #20840#35859#35789#35206#30422
        object N13: TMenuItem
          Caption = #25991#26412#26174#31034
        end
        object N14: TMenuItem
          Caption = #22270#24418#26174#31034
        end
      end
    end
    object N8: TMenuItem
      Caption = #24110#21161
      object N2: TMenuItem
        Caption = #24110#21161#35828#26126
        OnClick = N2Click
      end
    end
  end
  object OpenDialog1: TOpenDialog
    FileName = '*.md~'
    Filter = '(*.md~)|*.md~'
    Left = 600
    Top = 8
  end
end