From ba972e4bee085f7d3f42f36d3db929bd43db8c8e Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Sat, 14 Sep 2019 09:57:58 +0000
Subject: [PATCH] jvcllaz: Fix TJvWizardCustomPage.Done and
 TJvWizardCustomPage.Enter not calling FOnPage or FOnPageEnter, respectively
 (https://sourceforge.net/p/lazarus-ccr/bugs/39/).

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7150 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/jvcllaz/run/JvWizard/jvwizard.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/components/jvcllaz/run/JvWizard/jvwizard.pas b/components/jvcllaz/run/JvWizard/jvwizard.pas
index e94d76ab5..b48e07b3b 100644
--- a/components/jvcllaz/run/JvWizard/jvwizard.pas
+++ b/components/jvcllaz/run/JvWizard/jvwizard.pas
@@ -2501,13 +2501,13 @@ end;
 procedure TJvWizardCustomPage.Done;
 begin
   Refresh; // !!! Force the page to repaint itself immediately.
-  if Assigned(FOnPage) and Enabled and not ([csDesigning, csDestroying] * ComponentState = []) then
+  if Assigned(FOnPage) and Enabled and ([csDesigning, csDestroying] * ComponentState = []) then
     FOnPage(Self);
 end;
 
 procedure TJvWizardCustomPage.Enter(const FromPage: TJvWizardCustomPage);
 begin
-  if Assigned(FOnEnterPage) and Enabled and not ([csDesigning, csDestroying] * ComponentState = []) then
+  if Assigned(FOnEnterPage) and Enabled and ([csDesigning, csDestroying] * ComponentState = []) then
     FOnEnterPage(Self, FromPage);
 end;