Правильная ссылка на эту страницу
http://az-design.ru/Support/SoftWare/Delphi/D3/SB37AsVariant.shtml

Глава 37. TField.AsVariant

Свойство AsVariant

Затрагиваемые объекты Все производные классы TField
Назначение Интерпретировать любой компонент TField как вариантный.
Объявление property AsVariant: Variant
Пример синтаксиса
function Tflddlg.demAsVariant(theField: TField): string;
var
  tempStr: string;
  theVar:  variant;

begin
  try
     theVar := theField.asVariant;
     Result := theField.Name + '.AsVariant =' + theVar;
  except
    on E:EConvertError do
       Result := theField.Name + '.AsVariant ' + E.Message;
    on E:EDataBaseError do
       Result := E.Message;
  end;

end;
Описание В этом примере функции значение свойства AsVariant используется для выработки соответствующей выходной строки, исходя из значения свойства AsVariant поля. Возвращенное вариантное значение преобразуется в строку, которая затем возвращается вызывающему оператору вместе с описательным текстом. Для защиты от ошибок преобразования процедура содержит обработчик исключений, который вызывается каждый раз при возникновении ошибки преобразования базы данных.
[Свойство Alignment] [Свойство AsBoolean] [Свойство AsCurrency] [Свойство AsDateTime] [Свойство AsFloat] [Свойство AsInteger] [Метод Assign] [Метод AssignValue] [Свойство AsString] [Свойство AsVariant] [Свойство AttributeSet] [Свойство BlobType] [Свойство Calculated] [Свойство CanModify] [Свойство CheckRange] [Метод Clear] [Конструктор Create] [Свойство Currency] [Свойство DataSet] [Свойство DataSize] [Свойство DataType] [Деструктор Destroy] [Свойство DisplayFormat] [Свойство DisplayLabel] [Свойство DisplayName] [Свойство DisplayText] [Свойство DisplayValues] [Свойство DisplayWidth] [Свойство EditFormat] [Свойство EditMask] [Свойство EditMaskPtr] [Свойство FieldKind] [Свойство FieldName] [Свойство FieldNo] [Метод FocusControl] [Функция GetData] [Свойство Index] [Функция IsBlob] [Функция IsIndexField] [Свойство IsNull] [Функция IsValidChar] [Свойство KeyFields] [Функция LoadFromFile] [Функция LoadFromStream] [Свойство Lookup] [Свойство LookupCache] [Свойство LookupDataSet] [Функция LookupKeyFields] [Функция LookupList] [Функция LookupResultField] [Функция MaxValue] [Функция MinValue] [Свойство NewValue] [Функция Offset] [Свойство OldValue] [Событие OnChange] [Событие OnGetText] [Событие OnSetText] [Событие OnValidate] [Свойство Precision] [Свойство ReadOnly] [Метод RefreshLookupList] [Свойство Required] [Метод SaveToFile] [Метод SaveToStream] [Свойство ServerCalcField] [Метод SetCurrency] [Метод SetData] [Метод SetFieldType] [Свойство Size] [Свойство Text] [Свойство Transliterate] [Свойство Validate] [Свойство ValidChars] [Свойство Value] [Свойство Visible]

<<< Пред. Оглавление
Начало раздела
След. >>>




Дата последнего изменения:
Thursday, 21-Aug-2014 09:10:56 MSK


Постоянный адрес статьи:
http://az-design.ru/Support/SoftWare/Delphi/D3/SB37AsVariant.shtml