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

Глава 37. TField.SetData

Метод SetData

Затрагиваемые объекты Все производные классы TField
Назначение Присвоить полю необработанные данные.
Объявление procedure SetData(Buffer: Pointer);
Пример синтаксиса
procedure Tflddlg.demMisc(theField: TField);
var
  theBuff: PChar;
  fsize: integer;
  tchar: char;

begin
  fsize := theField.Size+1; { получить размер поля }
  GetMem(theBuff,fsize); { получить буфер }
  theField.GetData(theBuff); { получить копию неструктурированных данных }
  tchar := theBuff[1]; { получить в буфер второй символ }
  if theField.IsValidChar(tchar) = true then
    begin 
{ выполнить это, только если второй символ в первоначальной строке является допустимым 
символом для поля. Так и должно быть, поскольку мы его вначале получили из поля! }
      theField.Dataset.Edit; { перевести базу данных в режим редактирования }
      theField.SetData(theBuff+1); { изменить данные }
      theField.DataSet.Post; { обновить базу данных и выйти из режима редактирования }
    end;

end;
Описание В этом примере иллюстрируется использование функции GetMem для получения копии содержимого поля в точности в таком виде, в котором оно хранится в поле-объекте. Эта информация копируется в заданный буфер точно так же, как она хранится в типе данных, представленным этим полем. В этой функции показан также синтаксис для использования методов SetData и IsValidChar.
[Свойство 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:55 MSK


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