diff options
Diffstat (limited to 'examples/apps/fpcunit')
-rw-r--r-- | examples/apps/fpcunit/fpg_guitestrunner.pas | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/examples/apps/fpcunit/fpg_guitestrunner.pas b/examples/apps/fpcunit/fpg_guitestrunner.pas index 15c24869..9380a114 100644 --- a/examples/apps/fpcunit/fpg_guitestrunner.pas +++ b/examples/apps/fpcunit/fpg_guitestrunner.pas @@ -373,7 +373,8 @@ var itm: TfpgMenuItem; begin FPopupMenu := TfpgPopupMenu.Create(nil); - +// FPopupMenu.FreeNotification(self); + itm := FPopupMenu.AddMenuItem(uiCollapseAll, '', @miCollapseAll); itm.Name := 'pmCollapseAll'; itm := FPopupMenu.AddMenuItem(uiExpandAll, '', @miExpandAll); |