unit1.dfm

来自「美化界面」· DFM 代码 · 共 66 行

object Form1: TForm1
  Left = 192
  Top = 107
  Width = 696
  Height = 480
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIForm
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object suiMDIForm1: TsuiMDIForm
    UIStyle = DeepBlue
    Menu = suiMainMenu1
    MenuBarColor = 15263976
    BorderColor = clBlack
    Left = 96
    Top = 112
  end
  object suiMainMenu1: TsuiMainMenu
    OwnerDraw = True
    UIStyle = DeepBlue
    MenuItemHeight = 21
    SeparatorHeight = 5
    BarWidth = 26
    BarColor = 13554646
    Color = clWhite
    SeparatorColor = 8684164
    SelectedBorderColor = 10504772
    SelectedColor = 10504772
    SelectedFontColor = clWhite
    FontColor = clBlack
    BorderColor = clBlack
    FlatMenu = False
    FontName = 'MS Sans Serif'
    FontSize = 8
    FontCharset = DEFAULT_CHARSET
    UseSystemFont = True
    Left = 192
    Top = 56
    object FilemenuofMain1: TMenuItem
      Caption = '&File'
      object Exit1: TMenuItem
        Caption = 'E&xit'
        OnClick = Exit1Click
      end
    end
    object Window1: TMenuItem
      Caption = '&Window'
      object Cascade1: TMenuItem
        Caption = '&Cascade'
        OnClick = Cascade1Click
      end
      object ile1: TMenuItem
        Caption = '&Tile'
        OnClick = ile1Click
      end
    end
  end
end