home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 March / Chip_1998-03_cd.bin / zkuste / delphi / WhiteAnts / PROGRESS.ZIP / MAINFRM.DFM / MAINFRM.txt
Encoding:
Text File  |  1997-01-09  |  4.2 KB  |  152 lines
  1. object MainForm: TMainForm
  2.   Left = 236
  3.   Top = 242
  4.   Width = 537
  5.   Height = 254
  6.   Caption = 'Progressor demo'
  7.   Font.Color = clWindowText
  8.   Font.Height = -13
  9.   Font.Name = 'Arial'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   Position = poDefaultPosOnly
  13.   OnCreate = FormCreate
  14.   TextHeight = 16
  15.   object StatusPanel: TPanel
  16.     Left = 0
  17.     Top = 192
  18.     Width = 529
  19.     Height = 31
  20.     Align = alBottom
  21.     BevelWidth = 2
  22.     ParentShowHint = False
  23.     ShowHint = False
  24.     TabOrder = 0
  25.     object ProgressPanel: TPanel
  26.       Left = 289
  27.       Top = 2
  28.       Width = 238
  29.       Height = 27
  30.       Hint = 'Progress status'
  31.       Align = alRight
  32.       BevelInner = bvLowered
  33.       BevelOuter = bvLowered
  34.       TabOrder = 0
  35.       Visible = False
  36.       object Gauge: TGauge
  37.         Left = 28
  38.         Top = 4
  39.         Width = 73
  40.         Height = 21
  41.         Progress = 0
  42.       end
  43.       object ProgressLabel: TLabel
  44.         Left = 108
  45.         Top = 6
  46.         Width = 125
  47.         Height = 16
  48.         Caption = 'ProgressLabel'
  49.         Font.Color = clWindowText
  50.         Font.Height = -13
  51.         Font.Name = 'Arial'
  52.         Font.Style = [fsItalic]
  53.         ParentFont = False
  54.       end
  55.       object FineLabel: TLabel
  56.         Left = 4
  57.         Top = 6
  58.         Width = 7
  59.         Height = 16
  60.         Caption = '0'
  61.       end
  62.     end
  63.     object StatusLine: TPanel
  64.       Left = 2
  65.       Top = 2
  66.       Width = 287
  67.       Height = 27
  68.       Hint = 'Status line'
  69.       Align = alClient
  70.       Alignment = taLeftJustify
  71.       BevelInner = bvLowered
  72.       BevelOuter = bvLowered
  73.       TabOrder = 1
  74.       object StatusLabel: TLabel
  75.         Left = 4
  76.         Top = 6
  77.         Width = 69
  78.         Height = 16
  79.         Caption = 'StatusLabel'
  80.       end
  81.     end
  82.   end
  83.   object ToolBar: TPanel
  84.     Left = 0
  85.     Top = 0
  86.     Width = 529
  87.     Height = 33
  88.     Align = alTop
  89.     ParentShowHint = False
  90.     ShowHint = True
  91.     TabOrder = 1
  92.     object RunBtn: TSpeedButton
  93.       Left = 8
  94.       Top = 4
  95.       Width = 25
  96.       Height = 25
  97.       Hint = 'Run|Run demo operation'
  98.       Glyph.Data = {
  99.         10010000424D1001000000000000760000002800000010000000100000000100
  100.         0400000000008000000000000000000000000000000000000000000000000000
  101.         80000080000000808000800000008000800080800000C0C0C000808080000000
  102.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777770877777
  103.         7777777770087777777777777700877777777777770B0877777777770000B087
  104.         777777770BBFBB087777777770FB00007777777770BFB08777777700000BFB08
  105.         7777770FBFBFBFB087777770FBFB000077777770BFBFB087777777770BFBFB08
  106.         777777770FFFBFF08777777770FBFFBF08777777700000000077000000000000
  107.         0000000000000000000000000000000000000000}
  108.       OnClick = RunBtnClick
  109.     end
  110.     object AbortBtn: TSpeedButton
  111.       Left = 32
  112.       Top = 4
  113.       Width = 25
  114.       Height = 25
  115.       Hint = 'Abort|Abort demo operation'
  116.       Enabled = False
  117.       Glyph.Data = {
  118.         76010000424D7601000000000000760000002800000020000000100000000100
  119.         04000000000000010000130B0000130B00000000000000000000000000000000
  120.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  121.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  122.         3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
  123.         33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
  124.         993337777F777F3377F3393999707333993337F77737333337FF993399933333
  125.         399377F3777FF333377F993339903333399377F33737FF33377F993333707333
  126.         399377F333377FF3377F993333101933399377F333777FFF377F993333000993
  127.         399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
  128.         99333773FF777F777733339993707339933333773FF7FFF77333333999999999
  129.         3333333777333777333333333999993333333333377777333333}
  130.       NumGlyphs = 2
  131.       OnClick = AbortBtnClick
  132.     end
  133.   end
  134.   object CoarseObserver: TProgressObserver
  135.     Accuracy = 10
  136.     BusyCursor = crDefault
  137.     OnDescriptionChange = CoarseObserverDescriptionChange
  138.     OnFinish = CoarseObserverFinish
  139.     OnProgressChange = CoarseObserverProgressChange
  140.     OnStart = CoarseObserverStart
  141.     Left = 4
  142.     Top = 36
  143.   end
  144.   object FineObserver: TProgressObserver
  145.     Accuracy = 1
  146.     BusyCursor = crDefault
  147.     OnProgressChange = FineObserverProgressChange
  148.     Left = 32
  149.     Top = 36
  150.   end
  151. end
  152.