paweld/lazarus-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

FPSpreadsheet: typo

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9423 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz 2024-09-04 11:05:54 +00:00
parent bab6555c86
commit d88247d1e8
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/fpspreadsheet/source/dataset/fpsdataset.pas
View File

@ -2031,7 +2031,7 @@ begin
if Field.DataType in [ftString, ftFixedChar] then if Field.DataType in [ftString, ftFixedChar] then
begin begin
FillChar(destBuffer^, Field.DataSize, 0); FillChar(destBuffer^, Field.DataSize, 0);
// Truncate strings which have more characters than efined by Field.Size. // Truncate strings which have more characters than defined by Field.Size.
// This should have been done by the calling routine, but it considers // This should have been done by the calling routine, but it considers
// only Field.Datasize. // only Field.Datasize.
s := StrPas(PAnsiChar(Buffer)); s := StrPas(PAnsiChar(Buffer));