Tabellenabfrage mit Lookup ergibt immer NULL ?

[mandoki]

Irgendwie funktioniert das leider immer noch nicht so wie es sollte

Es geht darum Datensätze aus einer CSV-Datei zu importieren. Hierbei sollen natürlich nur die Sätze eingefügt werden, die noch nicht vorhanden sind.

Mit folgendem Code ist das Ergebnis immer False:

Delphi-Quellcode:

 while not csvdata.eof do
    begin
      such :=  dataform.Adressen.Lookup('GesamtName',csvdata.FieldbyName('GesamtName').value,'GesamtName');
      if not (VarType(such) in [varNull]) then
          begin
            dataform.Adressen.Append;
            if csvdata.FindField('Vorname') <> NIL then
               dataform.AdressenVorname.value := csvdata.FieldbyName('Vorname').value;

und mit:
      if (VarType(such) in [varNull]) then dann natürlich logischerweise immer das Gegenteil (True).

Der Wert in 'such' ist immer NULL und 'varNull' immer 1 ...
Hoffe auf eure Hilfe

Gruß mandoki