Gelöst:
Hier die Lösung; aber nur für die Wissen was Sie hier machen:
in Data.WIN.ADODB
function ADOTypeToFieldType
// adVarBinary: Result := ftVarBytes;
adVarBinary: Result := ftMemo;
Kann ich machen da ich hoffentlich kein ftVarBytes benutze
Bitte nicht kommentieren oder bewerten. Höchstens eine bessere Lösung bieten, danke!