Sfoglia il codice sorgente

* Fix build

git-svn-id: trunk@41787 -
michael 6 anni fa
parent
commit
744c331330
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      packages/fcl-web/src/restbridge/sqldbrestdata.pp

+ 1 - 1
packages/fcl-web/src/restbridge/sqldbrestdata.pp

@@ -763,7 +763,7 @@ begin
       rftBoolean : DataField.AsBoolean:=D.AsBoolean;
       rftBlob :
 {$IFNDEF VER3_0}
-         DataField.AsString:=BytesOf(DecodeStringBase64(D.AsString));
+         DataField.AsBytes:=BytesOf(DecodeStringBase64(D.AsString));
 {$ELSE}
          DataField.AsString:=DecodeStringBase64(D.AsString);
 {$ENDIF}