[Instantobjects-cvscommit] SF.net SVN: instantobjects:[937] trunk/Demos/PrimerCross/PerformanceView. pas

[<na...@us...>]

Revision: 937
          http://instantobjects.svn.sourceforge.net/instantobjects/revision/?rev=937&view=rev
Author:   nandod
Date:     2010-11-16 21:50:22 +0000 (Tue, 16 Nov 2010)

Log Message:
-----------
* Primer: Allow to compare results of tests with or without statement cache on the same connection.

Modified Paths:
--------------
    trunk/Demos/PrimerCross/PerformanceView.pas

Modified: trunk/Demos/PrimerCross/PerformanceView.pas
===================================================================
--- trunk/Demos/PrimerCross/PerformanceView.pas	2010-11-13 10:05:12 UTC (rev 936)
+++ trunk/Demos/PrimerCross/PerformanceView.pas	2010-11-16 21:50:22 UTC (rev 937)
@@ -516,7 +516,7 @@
     Count := StrToInt(Trim(ObjectsEdit.text));
     Execute(TestRetrieveCheckBox.Checked, TestQueryCheckBox.Checked, TestDisposeCheckBox.Checked);
     AResult := ExtractResult;
-    AResult.Name := ConnectionName;
+    AResult.Name := ConnectionName + ' (Cache: ' + Trim(CacheSizeEdit.Text) + ')';
     AResult.IsChecked := True;
     TestResults.AddResult(AResult);
     ShowTestResults;