anchor.diff:        begin
           aNewDisplayValue:= lookupFrmInstantQuery.SelectedDisplayLabel;
           curLine.ActualValue:= lookupFrmInstantQuery.SelectedValue;
  +        if Assigned(curLine.SelectedDatum) then
  +          curLine.SelectedDatum.AsObject.Free;
  +        curLine.SelectedDatum := lookupFrmInstantQuery.SelectedDatum.Clone;
   
           FLastEditorUsed:= curLine.Name;
   
  
positive.code:   Name:= '';
    Index:= 0;
    ActualValue:= Null;
    Changed:= false;
    ForceClear:= false;
  end;
  
negative.code: destructor TEditorLine.Destroy;
  begin
    Configuration.Free;
    if Assigned(SelectedDatum) then
      SelectedDatum.AsObject.Free;
    SelectedDatum := nil;
  
    inherited Destroy;
  end;
  
  