paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 11:29:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Bytes start at index 0

Browse Source 
git-svn-id: trunk@39332 -
This commit is contained in:
michael 2018-06-28 15:50:24 +00:00
parent b859d486b4
commit 33056c1858
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-db/src/base/dsparams.inc
View File

@ -1160,7 +1160,7 @@ Var
begin
SetLength(Temp,ASize);
Move(Buffer^,Temp[1],ASize);
Move(Buffer^,Temp[0],ASize);
AsBlob:=Temp;
end;