wait_tscx.dfm

一个用vb mysql实现的人事管理信息系统希望对大家有用。

object wiat_tsForm: Twiat_tsForm
  Left = 170
  Top = 168
  BorderIcons = [biMinimize, biHelp]
  BorderStyle = bsDialog
  Caption = '检索数据'
  ClientHeight = 193
  ClientWidth = 413
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 413
    Height = 193
    Align = alClient
    Color = 9680202
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label6: TLabel
      Left = 365
      Top = 107
      Width = 12
      Height = 20
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -20
      Font.Name = '宋体'
      Font.Style = [fsBold]
      ParentFont = False
      Visible = False
    end
    object Label7: TLabel
      Left = 13
      Top = 147
      Width = 392
      Height = 46
      Alignment = taCenter
      AutoSize = False
      Caption = '正在处理所需数据，如果数据 ...'
      Color = clWhite
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -16
      Font.Name = '隶书'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      Transparent = True
      WordWrap = True
    end
    object Animate2: TAnimate
      Left = 70
      Top = 30
      Width = 272
      Height = 60
      Active = True
      CommonAVI = aviCopyFile
      StopFrame = 26
    end
    object Animate1: TAnimate
      Left = 178
      Top = 34
      Width = 48
      Height = 50
      Active = True
      CommonAVI = aviFindFile
      StopFrame = 23
      Visible = False
    end
    object ProgressBar1: TProgressBar
      Left = 39
      Top = 103
      Width = 318
      Height = 28
      Min = 0
      Max = 100
      Step = 1
      TabOrder = 1
    end
  end
end