diff options
| -rw-r--r-- | examples/apps/fpcunit/fpg_guitestrunner.pas | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/examples/apps/fpcunit/fpg_guitestrunner.pas b/examples/apps/fpcunit/fpg_guitestrunner.pas index ecd8e9d5..400fa0d1 100644 --- a/examples/apps/fpcunit/fpg_guitestrunner.pas +++ b/examples/apps/fpcunit/fpg_guitestrunner.pas @@ -309,6 +309,7 @@ end; procedure TGUITestRunnerForm.btnRunClicked(Sender: TObject); begin + tvTests.FullExpand; if tvTests.Selection = nil then begin TfpgMessageDialog.Critical('No selection', 'Please select a test case first.'); |