? Сразу и не понял, про что. object, волочащийся в "режиме совместимости" из Турбо Паскаля? А его кто-то еще всерьез использует?
Ну, а где тогда взять аналог WITH, его вообще нет ни в одном из известных языков... Просто потому, что такое использование ООП и не предполагалось.
Особенно если учесть тот тонкий момент, что WITH - это не только селектор типа, а, как мы тут недавно открыли, в общем виде- селектор пар соответствий "экземпляр-тип".

Речь не о том "можно воспроизвести или нет", речь о том - удобно ли для систематического использования... И тут в Обероне, даже применительно к той же шине - столько мелочей... IN/OUT, экспорт отдельных полей только для чтения. Еще в КП, например, интересные возможности дает LIMITED - никто, кроме модуля-объявителя, не сможет рассылать сообщения LIMITED-типа - безопасность, опять же... Ну и т.д. и т.п.