MathgeomGLS

1
unit uDebug;
2

3
interface
4

5
uses
6
  Winapi.Windows,
7
  Winapi.Messages,
8
  System.SysUtils,
9
  System.Variants,
10
  System.Classes,
11
  Vcl.Graphics,
12
  Vcl.Controls,
13
  Vcl.Forms,
14
  Vcl.Dialogs,
15
  Vcl.StdCtrls;
16

17
type
18
  TDebugForm = class(TForm)
19
    DebugMemo: TMemo;
20
  private
21
  public
22
  end;
23

24
var
25
  DebugForm: TDebugForm;
26

27
//=========================================================
28
implementation
29
//=========================================================
30

31
{$R *.dfm}
32

33
end.
34