freepascal.compiler/packages/vcl-compat/tests/testcompat.lpr

program testcompat;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}cwstring, cthreads,{$ENDIF}
  Classes, consoletestrunner, tcnetencoding, tciotuils, 
  utmessagemanager, utcdevices, utcanalytics, utcimagelist, 
  utcnotifications, utcjson, utcpush, utchash, utcregex, 
  utcregexapi, utthreading, utccredentials;

type

  { TMyTestRunner }

  TMyTestRunner = class(TTestRunner)
  protected
  // override the protected methods of TTestRunner to customize its behavior
  end;

var
  Application: TMyTestRunner;

begin
  DefaultRunAllTests:=true;
  DefaultFormat:=fPlain;
  Application := TMyTestRunner.Create(nil);

  Application.Initialize;
  Application.Title:='testcompat';
  Application.Run;
  Application.Free;
end.