| Процедура
ClearAdvRecord (Var Record) |
Top Previous Next |
| Назначение
|
| Устанавливает
значение элементов поля структурного типа по умолчанию (0 -
для числовых типов, Nul - для ссылки, пустая строка - для
строковых, False - для логических). |
| Описание
|
| procedure
ClearAdvRecord (iField : AnyType); |
| Параметры
|
| iField
: Record - поле структурного типа системы
Атлантис.
|
| Пример
|
| Создается
пользовательский тип TMyType, являющийся полем структурного
типа. Поле содержит два элемента: a и b. |
| type TMyType =
record |
| a
: integer; |
| b
: double; |
| end;
|
| ...
|
| var MyField :
TMyField; |
| ...
|
| ClearAdvRecord(MyField);
|