Показать сообщение отдельно
  #2  
Старый 17.04.2008, 06:09
Аватар для Aristarh Dark
Aristarh Dark Aristarh Dark вне форума
Модератор
 
Регистрация: 07.10.2005
Адрес: Москва
Сообщения: 2,907
Версия Delphi: Delphi XE
Репутация: выкл
По умолчанию

Замечу сразу, в общем случае данную задачу, исходя из представленного условия, решить невозможно.
В часном случае (когда уничтожаются только те объекты которые создаются в данном фрагменте) решается довольно просто. Парсится код на предмет нахождения строк ".Create" и ".Free" из первой берется имя класса и переменная этого класса, из второй по имени переменной класса определяется имя уничтоженного класса и пишется в выходной файл. По окончании файл сортируется.
Ответить с цитированием