Veron
Гость
|
|
« : 20-10-2004 09:31 » |
|
Итак:
Дело в следующем коде: Объявлена переменная pVariants типа PoleVariantArray; Затем выделяется память: pVariants:=POleVariantArray(CoTaskMemAlloc(itemCount*sizeof(OleVariant))); // переменная типа POleVariant размером на itemCount элементов ... //далее какой-то код, заполнение и использование pVariants... if pVariants <> nil then CoTaskMemFree(pVariants);
Появляются ошибки. Вообще при попытке присвоения переменной pVariants какого-то значения. Где-то в статьях прочитал, что надо при работе в вариантными типами использовать дополнительно Initialize(pVariants,sizeof(OleVariant));
Но тогда появляется ошибка при выполнении строки CoTaskMemFree(pVariants); Добавление строки типа Finalize(pVariants) не помогает...
Не знаю, что неправильного???
|