mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-12 17:49:07 +02:00
* patch from Paul for further vista/win64 API enhancements (mantis 17958)
git-svn-id: trunk@17076 -
This commit is contained in:
parent
448e708fd7
commit
9a722411ab
@ -1070,7 +1070,7 @@ function TStringField.GetDataSize: Integer;
|
||||
|
||||
begin
|
||||
if DataType=ftFixedChar then
|
||||
Result:=Size
|
||||
Result:=Size+1
|
||||
else
|
||||
Result:=Size+1;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user