fcl-db: bufdataset: revert r27075 because it had already been fixed another way in r26611, r26621

git-svn-id: trunk@27079 -

packages/fcl-db/src/base/bufdataset.pas

@@ -2089,8 +2089,6 @@ function TCustomBufDataset.GetFieldData(Field: TField; Buffer: Pointer): Boolean
 
 var
   CurrBuff : TRecordBuffer;
-  BlobBuff : TBufBlobField;
-  i        : integer;
 
 begin
   Result := False;
@@ -2112,24 +2110,6 @@ begin
 
   If Field.FieldNo > 0 then // If =-1, then calculated/lookup field or =0 unbound field
     begin
-    if (State <> dsOldValue) and Assigned(Buffer) and (Field is TBlobField) then
-      for i := High(FUpdateBlobBuffers) downto Low(FUpdateBlobBuffers) do
-        if Assigned(FUpdateBlobBuffers[i]) and
-          (FUpdateBlobBuffers[i]^.FieldNo = Field.FieldNo) then
-          begin
-          // The right blob buffer:
-          FillChar(BlobBuff, SizeOf(TBufBlobField),#0);
-          if not GetFieldIsNull(pbyte(CurrBuff), Field.FieldNo-1) then
-            begin
-            inc(CurrBuff, FFieldBufPositions[Field.FieldNo-1]);
-            Move(CurrBuff^, BlobBuff, SizeOf(BlobBuff.ConnBlobBuffer));
-            end;
-          BlobBuff.BlobBuffer := FUpdateBlobBuffers[i];
-          Move(BlobBuff, Buffer^, SizeOf(TBufBlobField));
-          Result := True;
-          Exit;
-          end;
-
     if GetFieldIsNull(pbyte(CurrBuff),Field.FieldNo-1) then
       Exit;
     if assigned(buffer) then