Различия

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

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

Предыдущая версия справа и слева Предыдущая версия
remobject_pascal_script:operacii [2018/04/01 19:44]
jurist23rus
remobject_pascal_script:operacii [2018/04/23 08:32] (текущий)
7bit Форматирование кода
Строка 17: Строка 17:
 procedure Form_Create; procedure Form_Create;
 begin begin
-Self.OnAfterScroll := @AfterScrollHandler;+  Self.OnAfterScroll := @AfterScrollHandler;
 end; end;
 </code> </code>
Строка 59: Строка 59:
 Операция отношения in применяется к двум операндам. Первым (левым) операндом должно быть выражение любого порядкового типа, вторым - множество, состоящее из элементов того же типа, или идентификатор множественного типа. Результат операции будет True, если левый операнд принадлежит множеству. Пример: Операция отношения in применяется к двум операндам. Первым (левым) операндом должно быть выражение любого порядкового типа, вторым - множество, состоящее из элементов того же типа, или идентификатор множественного типа. Результат операции будет True, если левый операнд принадлежит множеству. Пример:
  
-''if Self.State in [dsInsert, dsEdit] then …''+<code delphi> 
 +if Self.State in [dsInsert, dsEdit] then … 
 +</code>
  
 ===== Определение типа результата операции ===== ===== Определение типа результата операции =====
Строка 67: Строка 69:
 <code delphi> <code delphi>
 var var
- b: Byte; +  b: Byte; 
- i: Integer;+  i: Integer;
 begin begin
- b := 201; +  b := 201; 
- i := 2; +  i := 2; 
- Debug(i * b); // 402 +  Debug(i * b); // 402 
- Debug(b * i); // 146 = 402 - 256, т. к. тип Byte в пределах 0..255+  Debug(b * i); // 146 = 402 - 256, т. к. тип Byte в пределах 0..255
 end; end;
 </code> </code>
Строка 109: Строка 111:
 <code delphi> <code delphi>
 var var
- i64: Int64;+  i64: Int64;
 begin begin
- Debug(Int64(-2147483648)); // !!! 2147483648 – с константами там не проходит +  Debug(Int64(-2147483648)); // !!! 2147483648 – с константами там не проходит 
- i64 := -2147483648; +  i64 := -2147483648; 
- Debug(i64); // !!! 2147483648 – и даже так +  Debug(i64); // !!! 2147483648 – и даже так 
- Debug(-2147483648.0); // -2147483648 – так правильно+  Debug(-2147483648.0); // -2147483648 – так правильно
 end; end;
 </code> </code>