diff --git a/components/tvplanit/source/vpnavbar.pas b/components/tvplanit/source/vpnavbar.pas index a93f080c4..3721ae72c 100644 --- a/components/tvplanit/source/vpnavbar.pas +++ b/components/tvplanit/source/vpnavbar.pas @@ -1063,8 +1063,10 @@ end; destructor TVpCustomNavBar.Destroy; begin - FImages.OnChange := nil; -// Images := nil; {unregister any image list notification} + {$IFDEF DELPHI} // not sure if this is correct. In Lazarus, at least, next line causes an error in Linux. + Images := nil; {unregister any image list notification} + {$ENDIF} + nabChanging := True; nabEdit.Free;