破解

开发平台：
Asm

lock_about.dfm：源码内容
							object frm_about: Tfrm_about
  Left = 404
  Top = 359
  BorderStyle = bsNone
  Caption = 'frm_about'
  ClientHeight = 197
  ClientWidth = 276
  Color = 10930928
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnMouseDown = FormMouseDown
  OnPaint = FormPaint
  PixelsPerInch = 96
  TextHeight = 12
  object ProductName: TLabel
    Left = 72
    Top = 16
    Width = 60
    Height = 12
    Caption = '软件名称：'
    Transparent = True
    IsControl = True
  end
  object ProgramIcon: TImage
    Left = 24
    Top = 24
    Width = 32
    Height = 32
    AutoSize = True
    IsControl = True
  end
  object Copyright: TLabel
    Left = 72
    Top = 48
    Width = 60
    Height = 12
    Caption = '共享软件：'
    Transparent = True
    IsControl = True
  end
  object Version: TLabel
    Left = 72
    Top = 32
    Width = 60
    Height = 12
    Caption = '版    本：'
    Transparent = True
    IsControl = True
  end
  object lblOs: TLabel
    Left = 24
    Top = 72
    Width = 60
    Height = 12
    Caption = '操作系统：'
    Transparent = True
    IsControl = True
  end
  object lblMemory: TLabel
    Left = 24
    Top = 88
    Width = 60
    Height = 12
    Caption = '可用内存：'
    Transparent = True
    IsControl = True
  end
  object lb_email: TLabel
    Left = 24
    Top = 120
    Width = 42
    Height = 12
    Caption = 'Email：'
    Transparent = True
  end
  object lb_HomePage: TLabel
    Left = 24
    Top = 136
    Width = 42
    Height = 12
    Caption = 'MyWeb：'
    Transparent = True
  end
  object homepage: TLabel
    Left = 72
    Top = 132
    Width = 135
    Height = 16
    Cursor = crHandPoint
    Hint = '去我的主页DELPHI盒子'#13#10'看看有没有什么好东西'
    Caption = 'http://mantousoft.51.net'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsUnderline]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    OnClick = homepageClick
  end
  object email: TLabel
    Left = 72
    Top = 116
    Width = 133
    Height = 16
    Cursor = crHandPoint
    Hint = '给我写信'
    Caption = 'mantousoft@sina.com'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsUnderline]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    OnClick = emailClick
  end
  object FlatButton1: TFlatButton
    Left = 88
    Top = 156
    Width = 105
    Height = 25
    ColorFocused = 2058166
    ColorDown = 10930672
    ColorBorder = 6135268
    UseAdvColors = True
    Caption = '确定[&O]'
    TabOrder = 0
    OnClick = FlatButton1Click
  end
end

						