main.dfm

Jesse Livermore 方法,和三线翻转方法

object MainForm: TMainForm
  Left = 209
  Top = 267
  Width = 376
  Height = 301
  Caption = #26480#35199#26041#27861#21644#19977#32447#21453#36716#26041#27861
  Color = clAppWorkSpace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'Default'
  Font.Style = []
  FormStyle = fsMDIForm
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poDefault
  WindowState = wsMaximized
  WindowMenu = Window1
  PixelsPerInch = 96
  TextHeight = 13
  object StatusBar: TStatusBar
    Left = 0
    Top = 236
    Width = 368
    Height = 19
    AutoHint = True
    Panels = <>
    SimplePanel = True
  end
  object ToolBar2: TToolBar
    Left = 0
    Top = 0
    Width = 368
    Height = 30
    BorderWidth = 1
    Color = clBtnFace
    Images = ImageList1
    Indent = 5
    ParentColor = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    Wrapable = False
    object ToolButton9: TToolButton
      Left = 5
      Top = 2
      Action = FileNew1
    end
    object ToolButton1: TToolButton
      Left = 28
      Top = 2
      Action = FileOpen1
      Caption = '&'#25991#20214
    end
    object ToolButton2: TToolButton
      Left = 51
      Top = 2
      Action = FileSave1
    end
    object ToolButton3: TToolButton
      Left = 74
      Top = 2
      Width = 8
      Caption = 'ToolButton3'
      ImageIndex = 2
      Style = tbsSeparator
    end
    object ToolButton4: TToolButton
      Left = 82
      Top = 2
      Action = EditCut1
    end
    object ToolButton5: TToolButton
      Left = 105
      Top = 2
      Action = EditCopy1
    end
    object ToolButton6: TToolButton
      Left = 128
      Top = 2
      Action = EditPaste1
    end
    object ToolButton7: TToolButton
      Left = 151
      Top = 2
      Width = 8
      Caption = 'ToolButton7'
      ImageIndex = 3
      Style = tbsSeparator
    end
    object ToolButton8: TToolButton
      Left = 159
      Top = 2
      Action = WindowCascade1
    end
    object ToolButton10: TToolButton
      Left = 182
      Top = 2
      Action = WindowTileHorizontal1
    end
    object ToolButton11: TToolButton
      Left = 205
      Top = 2
      Action = WindowTileVertical1
    end
  end
  object MainMenu1: TMainMenu
    Images = ImageList1
    Left = 40
    Top = 200
    object File1: TMenuItem
      Caption = #25991#20214
      Hint = 'File related commands'
      object FileNewItem: TMenuItem
        Action = FileNew1
        Caption = #26032#24314
      end
      object FileOpenItem: TMenuItem
        Action = FileOpen1
        Caption = #25171#24320
      end
      object FileCloseItem: TMenuItem
        Action = FileClose1
        Caption = #20851#38381
      end
      object FileSaveItem: TMenuItem
        Action = FileSave1
        Caption = #20445#23384'&S'
      end
      object FileSaveAsItem: TMenuItem
        Action = FileSaveAs1
        Caption = #21478#23384#20026' &As...'
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object FileExitItem: TMenuItem
        Action = FileExit1
        Caption = #36864#20986'&X'
      end
    end
    object Edit1: TMenuItem
      Caption = #32534#36753
      Hint = 'Edit commands'
      object N10: TMenuItem
        Caption = #25972#29702#36755#20986#25991#26412#25968#25454
        OnClick = N10Click
      end
      object CutItem: TMenuItem
        Action = EditCut1
        Caption = #21098#20999
      end
      object CopyItem: TMenuItem
        Action = EditCopy1
        Caption = #22797#21046
      end
      object PasteItem: TMenuItem
        Action = EditPaste1
        Caption = #31896#36148
      end
    end
    object Window1: TMenuItem
      Caption = #31383#21475
      Hint = 'Window related commands'
      object WindowCascadeItem: TMenuItem
        Action = WindowCascade1
        Caption = '&'#32423#32852
      end
      object WindowTileItem: TMenuItem
        Action = WindowTileHorizontal1
        Caption = #27700#24179#24179#38138
      end
      object WindowTileItem2: TMenuItem
        Action = WindowTileVertical1
        Caption = #22402#30452#24179#38138
      end
      object WindowMinimizeItem: TMenuItem
        Action = WindowMinimizeAll1
        Caption = #20840#37096#26368#23567#21270
      end
      object WindowArrangeItem: TMenuItem
        Action = WindowArrangeAll1
        Caption = #20840#37096#25490#21015
      end
    end
    object N2: TMenuItem
      Caption = #26480#35199#26041#27861
      object N3: TMenuItem
        Caption = #26480#35199#26041#27861#21442#25968
      end
      object N4: TMenuItem
        Caption = #35745#31639#36235#21183
      end
      object N5: TMenuItem
        Caption = #27979#37327#26368#20339#31359#36234#24133#24230
      end
      object N6: TMenuItem
        Caption = #20445#23384#25152#26377#35745#31639#32467#26524
        OnClick = N6Click
      end
    end
    object N7: TMenuItem
      Caption = #19977#32447#21453#36716#26041#27861
      object N8: TMenuItem
        Caption = #35774#23450#22522#20934#20215#26684
      end
      object N9: TMenuItem
        Caption = #20445#23384#20998#26512#32467#26524
      end
    end
    object Help1: TMenuItem
      Caption = #24110#21161
      Hint = 'Help topics'
      object HelpAboutItem: TMenuItem
        Action = HelpAbout1
        Caption = #20851#20110
      end
    end
  end
  object OpenDialog: TOpenDialog
    Filter = 'All files (*.*)|*.*'
    Left = 8
    Top = 200
  end
  object ActionList1: TActionList
    Images = ImageList1
    Left = 72
    Top = 200
    object FileNew1: TAction
      Category = 'File'
      Caption = '&New'
      Hint = 'New|Create a new file'
      ImageIndex = 6
      ShortCut = 16462
      OnExecute = FileNew1Execute
    end
    object FileOpen1: TAction
      Category = 'File'
      Caption = '&Open'
      Hint = 'Open|Open a file'
      ImageIndex = 7
      ShortCut = 16463
      OnExecute = FileOpen1Execute
    end
    object FileClose1: TWindowClose
      Category = 'File'
      Caption = '&Close'
      Hint = 'Close|Close current file'
    end
    object FileSave1: TAction