home *** CD-ROM | disk | FTP | other *** search
/ Delphi 4 Bible / Delphi_4_Bible_Tom_Swan_IDG_Books_1998.iso / source / MemInfo / Main.dfm / Main.txt
Text File  |  1998-03-23  |  2KB  |  81 lines
  1. object MainForm: TMainForm
  2.   Left = 192
  3.   Top = 190
  4.   Width = 640
  5.   Height = 411
  6.   Caption = 'Program Memory Information'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   PixelsPerInch = 96
  13.   TextHeight = 13
  14.   object Label1: TLabel
  15.     Left = 88
  16.     Top = 344
  17.     Width = 242
  18.     Height = 24
  19.     Caption = 'Program Memory Allocations'
  20.     Font.Charset = DEFAULT_CHARSET
  21.     Font.Color = clTeal
  22.     Font.Height = -19
  23.     Font.Name = 'MS Sans Serif'
  24.     Font.Style = []
  25.     ParentFont = False
  26.   end
  27.   object Chart1: TChart
  28.     Left = 16
  29.     Top = 8
  30.     Width = 601
  31.     Height = 321
  32.     BottomWall.Color = clWhite
  33.     Foot.Font.Charset = DEFAULT_CHARSET
  34.     Foot.Font.Color = clRed
  35.     Foot.Font.Height = -11
  36.     Foot.Font.Name = 'Arial'
  37.     Foot.Font.Style = [fsItalic]
  38.     LeftWall.Color = 8454143
  39.     Title.Font.Charset = DEFAULT_CHARSET
  40.     Title.Font.Color = clMaroon
  41.     Title.Font.Height = -13
  42.     Title.Font.Name = 'Arial'
  43.     Title.Font.Style = [fsBold]
  44.     Title.Text.Strings = (
  45.       'System.GetHeapStatus')
  46.     BottomAxis.LabelsSeparation = 20
  47.     TabOrder = 0
  48.     object Series1: TBarSeries
  49.       ColorEachPoint = True
  50.       Marks.ArrowLength = 8
  51.       Marks.Visible = True
  52.       SeriesColor = clRed
  53.       XValues.DateTime = False
  54.       XValues.Name = 'X'
  55.       XValues.Multiplier = 1.000000000000000000
  56.       XValues.Order = loAscending
  57.       YValues.DateTime = False
  58.       YValues.Name = 'Bar'
  59.       YValues.Multiplier = 1.000000000000000000
  60.       YValues.Order = loNone
  61.     end
  62.   end
  63.   object Button1: TButton
  64.     Left = 440
  65.     Top = 344
  66.     Width = 75
  67.     Height = 25
  68.     Caption = 'Show Info'
  69.     TabOrder = 1
  70.     OnClick = Button1Click
  71.   end
  72.   object BitBtn1: TBitBtn
  73.     Left = 536
  74.     Top = 344
  75.     Width = 75
  76.     Height = 25
  77.     TabOrder = 2
  78.     Kind = bkClose
  79.   end
  80. end
  81.