unitprocess.dfm

来自「仓储系统」· DFM 代码 · 共 86 行

object frmProcess: TfrmProcess
  Left = 211
  Top = 163
  Width = 318
  Height = 94
  Caption = #36807#24080
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 0
    Top = 0
    Width = 310
    Height = 67
    Align = alClient
    Shape = bsFrame
    Style = bsRaised
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 310
    Height = 67
    Align = alClient
    Color = 15527148
    TabOrder = 0
    object Label2: TLabel
      Left = 12
      Top = 16
      Width = 102
      Height = 12
      Caption = #36807#24080#27491#22312#36827#34892#20013'...'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Bevel2: TBevel
      Left = 1
      Top = 1
      Width = 308
      Height = 65
      Align = alClient
      Shape = bsFrame
      Style = bsRaised
    end
    object Panel3: TPanel
      Left = 11
      Top = 36
      Width = 279
      Height = 19
      BevelOuter = bvLowered
      Caption = 'Panel1'
      TabOrder = 0
      object Gauge1: TGauge
        Left = 1
        Top = 1
        Width = 277
        Height = 17
        Align = alClient
        BackColor = clBtnFace
        BorderStyle = bsNone
        Color = clBtnFace
        ForeColor = clGreen
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentColor = False
        ParentFont = False
        Progress = 0
      end
    end
  end
end