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

LCL: fixed range error (loop variable needs to be integer too)

Browse Source 
git-svn-id: trunk@10863 -
This commit is contained in:
vincents 2007-04-04 07:25:54 +00:00
parent ccb0b4e1ea
commit b27dc30a4b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/graphtype.pp
View File

@ -248,7 +248,7 @@ var
UnusedBitsAtEnd: cardinal;
p: PByte;
y: cardinal;
x: cardinal;
x: integer;
UnusedByteMask: Byte; // Alpha Bits should be all set. The Byte at line end
// can contain some unused bits. This mask OR byte at
// line end makes the unsused bits all true.