about.dfm

来自「拍摄程序,用来控制摄像机拍摄照片。拍摄程序,用来控制摄像机拍摄照片。拍摄程序,用」· DFM 代码 · 共 186 行

object AboutForm: TAboutForm
  Left = 480
  Top = 107
  ActiveControl = BClose
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'AboutForm'
  ClientHeight = 393
  ClientWidth = 350
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poMainFormCenter
  OnCreate = FormCreate
  OnShow = FormShow
  DesignSize = (
    350
    393)
  PixelsPerInch = 96
  TextHeight = 13
  object VersionMPUI: TLabel
    Left = 148
    Top = 74
    Width = 60
    Height = 13
    Caption = 'VersionMPUI'
  end
  object VersionMPlayer: TLabel
    Left = 148
    Top = 104
    Width = 73
    Height = 13
    Caption = 'VersionMPlayer'
  end
  object LVersionMPlayer: TLabel
    Left = 148
    Top = 90
    Width = 91
    Height = 13
    Caption = 'MPlayer version'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object LVersionMPUI: TLabel
    Left = 148
    Top = 60
    Width = 75
    Height = 13
    Caption = 'MPUI version'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object LURL: TLabel
    Left = 6
    Top = 128
    Width = 136
    Height = 13
    Cursor = crHandPoint
    Caption = 'http://mpui.sourceforge.net'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsUnderline]
    ParentFont = False
    OnClick = URLClick
  end
  object PLogo: TPanel
    Left = 4
    Top = 4
    Width = 140
    Height = 120
    BevelOuter = bvNone
    BorderStyle = bsSingle
    Color = clBlack
    TabOrder = 0
    object ILogo: TImage
      Left = 9
      Top = 9
      Width = 120
      Height = 100
    end
  end
  object BClose: TButton
    Left = 270
    Top = 363
    Width = 75
    Height = 25
    Anchors = [akRight, akBottom]
    Caption = 'Close'
    Default = True
    TabOrder = 1
    OnClick = BCloseClick
  end
  object MCredits: TMemo
    Left = 3
    Top = 144
    Width = 343
    Height = 214
    Cursor = crArrow
    Anchors = [akLeft, akTop, akRight, akBottom]
    BevelInner = bvNone
    BevelOuter = bvNone
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    Lines.Strings = (
      'This is free software, licensed under the terms of the'
      'GNU General Public License, Version 2.'
      ''
      '(C) 2005 Martin J. Fiedler <[e-mail]>'
      ''
      'Code contributions and hints:'
      'Joackim Pennerup <[e-mail]>'
      'Vasily Khoruzhick <[e-mail]>'
      'Maxim Usov <[e-mail]>'
      'Peter Pinter <[e-mail]>'
      ''
      'Contibuted translations:'
      'Danish by Jens Kikkenborg <[e-mail]>'
      'Dutch by Michal Sindlar <[e-mail]>'
      'French by Francois Gagne <[e-mail]>'
      'Italian by Andres Zanzani <[e-mail]>'
      'Spanish by Alex Fu <[e-mail]>'
      'Portuguese by Carlos Silvestre <[e-mail]>'
      'Esperanto by Kristjan Schmidt <[e-mail]>'
      'Romanian by Florin Valcu <[e-mail]>'
      'Hungarian by MrG <[e-mail]>'
      'Polish by Pawel Wieczorek <[e-mail]>'
      'Czech by Antonin Fujera <[e-mail]>'
      'Slovak by Peter Habcak <[e-mail]>'
      'Belarusian and Russian by Vasily Khoruzhick <[e-mail]>'
      'Ukrainian by <[e-mail]>'
      '                     and Andriy Zhouck <[e-mail]>'
      'Bulgarian by Boyan Boychev <[e-mail]>'
      'Simplified Chinese by Tommy He <[e-mail]>'
      'Traditional Chinese by Kene Lin <[e-mail]>'
      'Korean by Ken Jun <[e-mail]>'
      'Japanese by Masayuki Mogi <[e-mail]>'
      'Arabic by Mohamed Magdy <[e-mail]>')
    ParentFont = False
    ReadOnly = True
    ScrollBars = ssVertical
    TabOrder = 2
    WordWrap = False
    OnEnter = ReadOnlyItemEnter
  end
  object MTitle: TMemo
    Left = 146
    Top = 4
    Width = 204
    Height = 49
    Cursor = crArrow
    Anchors = [akLeft, akTop, akRight]
    BorderStyle = bsNone
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Verdana'
    Font.Style = [fsBold]
    Lines.Strings = (
      'MTitle')
    ParentColor = True
    ParentFont = False
    ReadOnly = True
    TabOrder = 3
    WantReturns = False
    OnEnter = ReadOnlyItemEnter
  end
end