Простите, ребята, сам разобрался
— Заменил String на OleVariant при вызове функции и все покатило

Вспоминается бородатый анекдот про то как профессор говорит
"Я им пятый раз обяснил. Уже сам понял, а они еще нет..."