Адрес поля

[Sibedir]

Как получить смещение адреса поля в адресном пространстве относительно адреса самого объекта. Я знаю, что можно из указателя поля вычесть указатель на объект. Но не хочу делать этого каждый раз (классов очень много). Может быть есть более простой универсальный способ.
Что делаю: все еще пытаюсь автоматизировать процесс сохранения объектов в файл. С обычными данными проблем нет. Просто копирую в специальный участок кусок памяти начиная с указателя на объект размером ptd^.ClassType.InstanceSize. Но часть данных может быть указателями (которые определенным образом регестрируются). Так вот, я хочу, чтобы при написании полууниверсальной процедуры сохраниения, можно было бы просто указать эти смещения, и программа бы отметила это и учла при загрузке.