> -- Info21 писал(а):
> Не знаю, правильно ли я понимаю эту фразу, но если правильно, то да.Уточню примером:
## Код:
```
rd.ReadString(e.title); ASSERT(ValidTitle(e.title), 101);
               rd.ReadStore(text);
               ASSERT((text # NIL) & (
                  (text IS TextModels.Model) OR (text IS Stores.Alien) ), 102);
               IF text IS TextModels.Model THEN
                  e.text := text(TextModels.Model)
                  (* Stores.Join(e, e.text) *)
               ELSE
                  rd.TurnIntoAlien(Stores.alienComponent)
               END
```
Так?