Инструменты пользователя

Инструменты сайта


cp:obx-export

Различия

Показаны различия между двумя версиями страницы.

Ссылка на это сравнение

Предыдущая версия справа и слева Предыдущая версия
Следующая версия
Предыдущая версия
cp:obx-export [2020/01/02 15:29]
иван_денисов
cp:obx-export [2020/10/29 07:08] (текущий)
Строка 26: Строка 26:
 <code> <code>
 MODULE TestImport; MODULE TestImport;
-IMPORT e:=TestExport, sl:=StdLog;+ 
 +IMPORT TestExport, Log;
  
 PROCEDURE Start*; PROCEDURE Start*;
 BEGIN BEGIN
-    sl.String(e.str);sl.Ln; +    Log.String(TestExport.str); Log.Ln; 
-    e.str:='Петя Телевизоров'; (* <- эта строка недопустима!!! *) +    TestExport.str:='Петя Телевизоров'; (* <- эта строка недопустима!!! *) 
-    slReal(e.rVal);sl.Ln; +    Log.Real(TestExport.rVal); Log.Ln; 
-    e.rVal:=50.1; +    TestExport.rVal:=50.1; 
-    slReal(e.rVal);sl.Ln+    Log.Real(TestExport.rVal); Log.Ln
 END Start; END Start;
 +
 END TestImport. END TestImport.
 +
 ^TestImport.Start ^TestImport.Start
 +
 </code> </code>
  
cp/obx-export.txt · Последнее изменение: 2020/10/29 07:08 (внешнее изменение)