За неделю до сдачи очередного этапа тоже натолкнулся на этот баг.
Bugland отмалчивается. Поэтому пришлось поправить ADOdb.pas:

if FieldCount = 1 then begin
//:Patch by Ray D
if (KeyValues <> Null) then begin
FLookupCursor.Find(GetFilterStr(FieldByName(KeyFields), KeyValues, Partial), 0,
adSearchForward, EmptyParam);
end else begin
//:
FLookupCursor.MoveLast;
FLookupCursor.MoveNext;
//:
end;

Правишь. Кидаешь в каталог со своими сырцами - и наслаждаешься :))