Есть приложение, которое пишется достаточно давно. В нем активно используются не классы, а объекты.

Некоторые из объектов содержат в качестве полей длинные строки.





В коде эти объекты обычно создаются и сразу помещаются в список TList



есть код очистки листа в котором для каждого указателя зовется Dispose, при этом происходит утечка памяти.
Код очистки не зависит от конкретного типа объекта и используется в очень большом количестве мест.

Вопрос в следующем: возможно ли сделать так чтобы каким то образом по указателю на объект узнавать его тип? Если да, можно было бы в этом коде очистки проверять принадлежность объекта к TMyObject и корректно освобождать строка.

для объектов  это не катит

Если для объектов - тогда через TypeOf, только объекты должны содержать хотя бы один виртуальный метод...