XMLXSDExportTest.lpr 429 B

123456789101112131415161718192021222324252627
  1. program XMLXSDExportTest;
  2. {$mode objfpc}{$H+}
  3. uses
  4. Classes,
  5. consoletestrunner,
  6. XMLXSDExportTestCase1;
  7. type
  8. { TLazTestRunner }
  9. TMyTestRunner = class(TTestRunner)
  10. protected
  11. // override the protected methods of TTestRunner to customize its behavior
  12. end;
  13. var
  14. Application: TMyTestRunner;
  15. begin
  16. Application := TMyTestRunner.Create(nil);
  17. Application.Initialize;
  18. Application.Run;
  19. Application.Free;
  20. end.