Changeset 6 for trunk/SVNZero.lpr


Ignore:
Timestamp:
Aug 19, 2022, 10:53:15 PM (22 months ago)
Author:
chronos
Message:
  • Modified: Improved test cases definition and evaluation.
Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk

    • Property svn:ignore

      •  

        old new  
        44SVNZero.lps
        55heaptrclog.trc
         6Languages/*.mo

  • trunk/SVNZero.lpr

    r5 r6  
    55  cthreads,
    66  {$ENDIF}
    7   Classes, SysUtils, CustApp, USubversion, UTest, USvnZero
     7  Classes, SysUtils, CustApp, USubversion, UTest, USvnZero, UTestCases
    88  { you can add units after this };
    99
    … …  
    2929begin
    3030  if HasOption('t', 'test') then begin
    31     with TTest.Create do
     31    with TTestCases.Create do
    3232    try
     33      AddNew('Add', TTestCaseAdd);
     34      AddNew('Update', TTestCaseUpdate);
     35      AddNew('Modify', TTestCaseModify);
     36      AddNew('Delete', TTestCaseDelete);
    3337      Run;
    3438    finally
Note: See TracChangeset for help on using the changeset viewer.