mainunit.dfm

来自「AES加密解密程序(开发语言delphi)」· DFM 代码 · 共 98 行

object MainForm: TMainForm
  Left = 184
  Top = 121
  Width = 456
  Height = 284
  Caption = 'MainUnit'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label9: TLabel
    Left = 144
    Top = 177
    Width = 185
    Height = 16
    AutoSize = False
    Caption = #35774#35745#32773#65306#21016#36830#28009#12289#39532#34425#21338
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label1: TLabel
    Left = 40
    Top = 40
    Width = 376
    Height = 22
    Caption = #22522#20110#21313#36827#21046#25913#36827#30340'AES'#21152#35299#23494#20223#30495#19982#27979#35797
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -21
    Font.Name = #21326#25991#34892#26999
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 144
    Top = 144
    Width = 153
    Height = 16
    AutoSize = False
    Caption = #29256#26435#25152#26377#65306#20013#21335#22823#23398
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 152
    Top = 208
    Width = 161
    Height = 16
    AutoSize = False
    Caption = #23436#25104#26085#26399#65306' 2004.10.22'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 88
    Top = 96
    Width = 265
    Height = 20
    AutoSize = False
    Caption = #35831#22312#33756#21333#26639#20013#36873#25321#20223#30495#25110#27979#35797
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object MainMenu1: TMainMenu
    Top = 8
    object N1: TMenuItem
      Caption = #21152#35299#23494#20223#30495
      OnClick = N1Click
    end
    object N2: TMenuItem
      Caption = #27979#35797
      OnClick = N2Click
    end
  end
end