object TraceForm: TTraceForm Left = 220 Top = 178 Width = 757 Height = 338 Caption = 'Debug Trace Information' Font.Color = clWindowText Font.Height = -11 Font.Style = [] KeyPreview = True PixelsPerInch = 96 TextHeight = 11 object TraceData: TListBox Left = 0 Top = 0 Width = 749 Height = 311 Align = alClient Font.Color = clBlack Font.Height = -11 Font.Style = [] ItemHeight = 11 ParentFont = False TabOrder = 0 OnKeyPress = TraceDataKeyPress end end