Скачать: CL | DM;

Странное поведение memprof   Найти похожие ветки 

← →
Pavel__   (2006-02-19 13:34) [0]

Имеем проект, отлаживаем в memprof. Исходник проекта выглядит следующим образом:

program Any;

{%ToDo "Any.todo"}

uses
 Windows,
 SysUtils,
 Forms,
 AnyFrm in "AnyFrm.pas" {AnyForm};

{$R *.res}
{$R WindowsXP.res}

begin
 Application.Initialize;
 Application.Run;
 Application.Terminate;
end.

Запускаем в memprof — видим — Attempt to free unexisting resource ..., Errors = 96. Комментируем AnyFrm в uses, запускаем — никаких ошибок. AnyFrm — простая дополнительная форма с несколькими TLabel и двумя кнопками TButton. На рабочем проекте memprof вообще сыпется, под полторы тысячи ошибок с тем же текстом (Attempt to free unexisting resource), и само приложение завершить стандартными методами (кнопкой закрытия окна) никак не выходит, приходится терминировать. Почему так происходит?

P.S: D2005, WinXP, memprof 0.9.5.0

---

← →
Pavel__   (2006-02-19 14:08) [1]

Кажется нашел причину. В тестовом проекте положил Toolbar2000 (2.16) на форму, запустил в memprof и поводил мышкой по кнопкам. Мда.

---

← →
Pavel__   (2006-02-19 14:38) [2]

Причина в TBX 2.2a.

---

← →
Desdechado ©   (2006-02-19 15:37) [3]

странное сочетание
Application.Run;
Application.Terminate;

---

← →
Pavel__   (2006-02-19 16:30) [4]

Просто не создаю форму и сразу терминирую. Для чистоты эксперимента. Кстати, исследования все больше и больше наводят на странные результаты. Установил предыдущую версию пакета TBX, скомпилированный (под D7) demo-проект которой у memoprof не вызывал никаких проблем. Перекомпилировал demo-проект под D2005, и опять понеслось. Может проблема именно в Delphi?

---

← →
evvcom ©   (2006-02-20 09:55) [5]

> Просто не создаю форму и сразу терминирую.

А смысл терминировать то, что само сейчас закончится?

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.047 c