diff --git a/packages/fpindexer/src/dbindexer.pp b/packages/fpindexer/src/dbindexer.pp
index 2cfb044119..618d3d733a 100644
--- a/packages/fpindexer/src/dbindexer.pp
+++ b/packages/fpindexer/src/dbindexer.pp
@@ -394,6 +394,7 @@ Var
 
 begin
   Result:=0;
+  T:='';
   R:=TIReaderTXT.Create;
   try
     URL:=TableName+'/'+KeyField.AsString;