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

как отследить переменную по адресу в куче   Найти похожие ветки 

← →
Андрусь ©   (2002-08-01 19:06) [0]

Привет всем! Подскажите,как отследить переменную по адресу в куче.Тип неизвестен.Пробовал такое

Procedure ShowVarNameOnAddr(Addr:integer);
var s:string;
Begin
try
s:="Имя переменной: "+TObject(Addr).ClassName
except
s:="Ошибка преобразования";
End;
ShowMessage(s);
End;

Не проходит - Ошибка преобразования. Подкиньте какую-нибудь идейку.Зараннее юольшое спасибо.

---

← →
IlyaA   (2002-08-02 07:09) [1]

Наверное Addr у тебя должен быть типа Pointer, а не integer.

---

← →
IlyaA   (2002-08-02 08:04) [2]

Даже если так как ты написал и сделать pointer всё равно енто будет работать только дня объектов.
Что ты подразумеваешь под переменной?

---

← →
Alx2 ©   (2002-08-02 08:14) [3]

>Тип неизвестен
Тогда почему думаем, что там сидит экземпляр класса?

---

← →
Андрусь ©   (2002-08-02 11:20) [4]

Думаю что класс,т.к. вываливает ошибка

ODS: HEAP: Free Heap block 12cafe0 modified at 12cb188 after it was freed Process Str_Project.exe ($39C)

В своей программе динамических переменных не использую. Так что там мог вполне быть объект. А вот на счёт идей...

---

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

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



Память: 0.45 MB
Время: 0.01 c