Добавлено: 15 Октябрь 2004, 12:05
				
				Hello clalist!
Ситуация следующая: имеется у меня в процедуре описание класса:
Далее идет описание очереди:
Когда в дальнейшем мне надо создать ссылку на новый объект класса, я пишу:
Ctl:Clref& = New(TagEntryClass)
Компилятор на эту конструкцию ругается: Illegal reference assignment or equivalence.
Дальше по тексту идет такая конструкция:
ctrlno{prop:use}=ctl:Clref.bytevar
Компилятор на это ругается Field not found:bytevar.
Что я сделал неправильно, не понимаю. Правда, с ООП я знаком чисто теоретически. Это первый опыт работы. Откройте плс глаза котенку ))
))
Только просьба ногами не бить )
)
--
Best regards,
Anatoly mailto:warthog@belarusbank.minsk.by
Написал: ClaList(2)
			Ситуация следующая: имеется у меня в процедуре описание класса:
Код: Выделить всё
TagEntryClass Class
bytevar         byte
...
...
              endКод: Выделить всё
Ctrlqueue    Queue,pre(ctl)
CLRef        &TagEntryClass
Ctrlno       Long
...
...
             endCtl:Clref& = New(TagEntryClass)
Компилятор на эту конструкцию ругается: Illegal reference assignment or equivalence.
Дальше по тексту идет такая конструкция:
ctrlno{prop:use}=ctl:Clref.bytevar
Компилятор на это ругается Field not found:bytevar.
Что я сделал неправильно, не понимаю. Правда, с ООП я знаком чисто теоретически. Это первый опыт работы. Откройте плс глаза котенку
Только просьба ногами не бить
--
Best regards,
Anatoly mailto:warthog@belarusbank.minsk.by
Написал: ClaList(2)