From 6a7d2e10fa1cca60fc7f7c013bdf3af0d832fff4 Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Mon, 3 Jun 2019 22:55:30 +0000
Subject: [PATCH] jvcllaz: Fix TJvWizard crashing when several RouteMaps are
 available.

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

diff --git a/components/jvcllaz/run/JvWizard/jvwizardroutemapsteps.pas b/components/jvcllaz/run/JvWizard/jvwizardroutemapsteps.pas
index e32ad8288..679314ecd 100644
--- a/components/jvcllaz/run/JvWizard/jvwizardroutemapsteps.pas
+++ b/components/jvcllaz/run/JvWizard/jvwizardroutemapsteps.pas
@@ -249,6 +249,9 @@ var
   S: string;
   LDrawProperties: Cardinal;
 begin
+  if PageIndex = -1 then
+    exit;
+
   LRect := ClientRect;
   TotalPageCount := DetectPageCount(ActivePageIndex);
   Canvas.Brush.Color := Color;