diff --git a/components/jvcllaz/run/JvDB/jvdblookup.pas b/components/jvcllaz/run/JvDB/jvdblookup.pas
index 7831cdf62..90f13aa7d 100644
--- a/components/jvcllaz/run/JvDB/jvdblookup.pas
+++ b/components/jvcllaz/run/JvDB/jvdblookup.pas
@@ -1662,8 +1662,8 @@ function TJvLookupControl.DoFormatLine: string;
 var
   J, LastFieldIndex: Integer;
   AField: TField;
-  LStringList: array of string;
-  LVarList: array of TVarRec;
+  LStringList: array of string = nil;
+  LVarList: array of TVarRec = nil;
 begin
   Result := '';
   LastFieldIndex := FListFields.Count - 1;