ProjectSource.txt
上传用户:yjb1804
上传日期:2021-01-30
资源大小:3105k
文件大小:1k
- // Uncomment the following directive to create a console application
- // or leave commented to create a GUI application...
- // {$APPTYPE CONSOLE}
- program #PROJECTNAME;
- uses
- TestFramework {$IFDEF LINUX},
- QForms,
- QGUITestRunner {$ELSE},
- Forms,
- GUITestRunner {$ENDIF},
- TextTestRunner;
- {$R *.RES}
- begin
- Application.Initialize;
- {$IFDEF LINUX}
- QGUITestRunner.RunRegisteredTests;
- {$ELSE}
- if System.IsConsole then
- TextTestRunner.RunRegisteredTests
- else
- GUITestRunner.RunRegisteredTests;
- {$ENDIF}
- end.