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

Глава 37. TField.AsCurrency

Свойство AsCurrency

Затрагиваемые объекты Все производные классы TField
Назначение Интерпретировать различные поля как Currency.
Объявление property AsCurrency: Currency
Пример синтаксиса
function Tflddlg.demAsCurrency(theFieId: TField): string;
var
  tempStr: string;
  currval: Currency;

begin
  try 
    currval := theField.AsCurrency;
    Str(Currval,tempStr);
    Result:= theField.Name + '.AsCurrency' + tempStr;
  except
    on E:EConvertError do
       Result := theField.Name +  'AsCurrency' + E.Message;
    on E:EDataBaseError do 
       Result := E.Message;
  end;

end;
Описание В этом примере функции значение свойства AsCurrency используется для выработки соответствующей выходной строки, исходя из значения свойства AsCurrency поля. Возвращенное значение денежной единицы преобразуется в строку, которая затем возвращается вызывающему оператору с описательным текстом. Для защиты от ошибок преобразования в этой процедуре содержится обработчик исключений, вызываемый каждый раз при возникновении ошибки преобразования в базе данных.
[Свойство 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/SB37AsCurrency.shtml