Сейчас попробовал значения по умолчанию проставлять прямо в описании класса. Работает...но не всегда. Если класс создается через NEW, то не работает!!!
вот простой тестовый пример
Код: Выделить всё
PROGRAM
MAP
END
SomeClass CLASS
Prop1 LONG(1)
Method1 PROCEDURE
END
C1 SomeClass
C2 &SomeClass
CODE
C1.Method1
C2 &= NEW SomeClass
C2.Method1
DISPOSE(C2)
SomeClass.Method1 PROCEDURE
CODE
MESSAGE(SELF.Prop1)