VPF::Утечка памяти при работе с OleVariant

Александра

Дата 13.2.2006, 20:26 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 219
Регистрация: 20.2.2005
Где: Москва

Репутация: нет
Всего: 12

Как избежать утечки памяти при работе с OleVariant ?

пример:
1. есть процедура, у которой единственный аргумент имеет тип OleVariant.
2. при передаче в эту процедуру строки, она автоматически приводится к OleVariant. Как раз здесь и идет утечка.

MemProof сообщает об SysAllocStringLen. Соответственно нужно вызывать SysFreeString, но она работает только с PWideChar... вообшем запуталась, не могу никак их сдружить (PWideChar и OleVariant).

какие идеи?

--------------------

Александра

Дата 16.2.2006, 20:24 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 219
Регистрация: 20.2.2005
Где: Москва

Репутация: нет
Всего: 12

решение нашлось:

Код

var
   v: OleVariant;
begin
   v:= 'Any String';
   Intf.DoSomeThing( v );

   // в принципе мы и так значем что это WideString, так что проверка типа для надежности:
   if TVarData(v).VType = varOleStr then
   begin // освободим сами WideChar
      SysFreeString( TVarData(v).VOleStr ); // это функция из модуля ActiveX
      // (!) не забыть очистить указатель - мы его сами того
      TVarData(v).VOleStr := nil;
   end;

--------------------

December

Дата 16.2.2006, 23:05 (ссылка)

(нет голосов)

Загрузка ...

Antitheorist

Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

Репутация: 12
Всего: 57

Спасибо за информацию! А утечка происходит всегда при использовании вышеозначенной схемы или нужны ещё какие-то экзотические условия? Только для строк или для других типов данных также?

--------------------

Для друзей с винграда - скидки на разработку сайтов

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: ActiveX/СОМ/CORBA \| Следующая тема »