Why Gemfury? Push, build, and install  RubyGems npm packages Python packages Maven artifacts PHP packages Go Modules Debian packages RPM packages NuGet packages

Repository URL to install this package:

Details    
fpc-src / usr / share / fpcsrc / 3.0.0 / tests / test / units / fpcunit / testclasses.lpr
Size: Mime:
program testclasses;

{$mode objfpc}{$H+}

uses
  Classes, tcfindnested, tcstringlist, tccollection, tclist,
  tcpersistent, tclinkedlist, tccomponent, tcstreaming, tccompstreaming,
  tcresref,
  consoletestrunner;

type

  { TLazTestRunner }

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

var
  Application: TMyTestRunner;

begin
  Application := TMyTestRunner.Create(nil);
  Application.Initialize;
  Application.Title := 'Test classes';
  Application.Run;
  Application.Free;
end.