Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Прочее";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];

Вниз

Течет память. Кто виноват и что делать?   Найти похожие ветки 

 
pasha_golub ©   (2012-10-17 11:10) [0]

Привет всем.

Наткнулся на примечательный баг.


procedure CheckError;
var E: pointer;
begin
 E := AcquireExceptionObject;
 if Assigned(E) then
   ShowMessage(TObject(E).ToString);
 ReleaseExceptionObject;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 try
   raise EAbort.Create("Error Message");
 except
   CheckError;
 end;
end;


Этот код течет. Утекают объекты Exception.

Я знаю, что можно сделать raise. Но я следую букве мануала, гласящего:


AcquireExceptionObject increments the exception object"s reference count. Make sure that the reference count is decremented when the exception object is no longer needed. This happens automatically if you use the exception object to raise the exception again. In all other cases, every call to AcquireExceptionObject must have a matching call to ReleaseExceptionObject. AcquireExceptionObject/ReleaseExceptionObject sequences can be nested.


 
Rouse_ ©   (2012-10-17 11:19) [1]

http://qc.embarcadero.com/wc/qcmain.aspx?d=5815


 
pasha_golub ©   (2012-10-17 11:25) [2]


> Rouse_ ©

Какого ж рожна они тогда в мануале сносок не сделают?


 
Rouse_ ©   (2012-10-17 11:46) [3]


> pasha_golub ©   (17.10.12 11:25) [2]
> Какого ж рожна они тогда в мануале сносок не сделают?

Ты действительно думаешь что я смогу ответить на этот вопрос? :)))


 
pasha_golub ©   (2012-10-17 12:37) [4]


> Ты действительно думаешь что я смогу ответить на этот вопрос?
>  :)))

Ну ты ж там в курилках вёл душеспасительные беседы ;)


 
Германн ©   (2012-10-17 12:44) [5]


> Ты действительно думаешь что я смогу ответить на этот вопрос?

Он готовится к КМП :)


 
Jeer ©   (2012-10-17 18:27) [6]

"Если течет - вызвать сантехника или сменить памперс" (С)


 
Rouse_ ©   (2012-10-17 19:10) [7]


> pasha_golub ©   (17.10.12 12:37) [4]
> Ну ты ж там в курилках вёл душеспасительные беседы ;)

Ну так я и с тобой их веду и по аське и лично, много я о твоей работе рассказать могу? :)



Страницы: 1 вся ветка

Форум: "Прочее";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.076 c
2-1341990007
sas9568635
2012-07-11 11:00
2013.03.22
Получение кода нажатых клавиш формы запущенной как Form.Show


1-1298958590
KMSTR
2011-03-01 08:49
2013.03.22
Ошибка отображения выключенных кнопок Toolbar


15-1338109969
Екатерина
2012-05-27 13:12
2013.03.22
Созодание АРМ


10-1182237882
Strang
2007-06-19 11:24
2013.03.22
Add-In


15-1347556136
Dimka Maslov
2012-09-13 21:08
2013.03.22
Обработка исключений





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский