progress.dfm

来自「上传个考勤系统,希望别人也能用.该代码只能算初级的东东,软件代码复用性不高,重复」· DFM 代码 · 共 60 行

object dlgProgress: TdlgProgress
  Left = 395
  Top = 132
  BorderStyle = bsDialog
  Caption = #35835#21462#36827#24230
  ClientHeight = 154
  ClientWidth = 360
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnCloseQuery = FormCloseQuery
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object msg: TLabel
    Left = 8
    Top = 67
    Width = 6
    Height = 12
  end
  object msg2: TLabel
    Left = 9
    Top = 105
    Width = 6
    Height = 12
  end
  object Animate: TAnimate
    Left = 10
    Top = 1
    Width = 272
    Height = 60
    Center = False
    CommonAVI = aviCopyFiles
    StopFrame = 34
  end
  object ProgressBar: TProgressBar
    Left = 8
    Top = 83
    Width = 345
    Height = 16
    Step = 1
    TabOrder = 1
  end
  object btnOk: TButton
    Left = 274
    Top = 120
    Width = 75
    Height = 25
    Caption = #21462#28040'(&C)'
    TabOrder = 2
    OnClick = btnOkClick
  end
end