-
Token (01.10.13 19:03) [0]Пишу свой DataSet. (XE3)
Если поле типа TBytesField, то код
SomeDS.Field[0].AsBytes
приведет к вызову:
function GetFieldData(Field: TField; Buffer: Pointer; NativeFormat: Boolean): Boolean; overload; virtual; deprecated 'Use overloaded method instead';
Из-за:
function TField.GetAsByteArray: Variant;
begin
VarClear(Result);
if not GetData(@Result, False) then Result := Null;
end;
Так и должно быть? Получается, что надо еще и "устаревший" метод перекрывать?
Или я чего-то неправильно делаю?