diff --git a/unit1.pas b/unit1.pas
index c180dbe..b651212 100644
--- a/unit1.pas
+++ b/unit1.pas
@@ -939,6 +939,12 @@ procedure TForm1.MenuItemImportNormalClick(Sender: TObject); {import z vcf norm
                       Zquery1.FieldByName('MOBIL').AsString:=pMob;
                       ZQuery1.Post;// v BeforePost se vytvoří THistoryItem;
                       multiPolozkaHistorie:=True; // aby přidávalo do té samé položky historie
+                      // je třeba vyčistit všechny použité proměnné pro nalezené texty
+                      pPri:='';
+                      pJme:='';
+                      pDom:='';
+                      pPra:='';
+                      pMob:='';
                       continue;
                     end
                                                 else