paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-05 02:09:29 +01:00
Code Issues Packages Projects Releases Wiki Activity

* Patch from Nikolay (GetScanLineVESA256 reads from the write window, instead of the read window) mantis 17132

Browse Source 
git-svn-id: trunk@15748 -
This commit is contained in:
marco 2010-08-08 14:54:26 +00:00
parent 6f2b097d63
commit 6e5c32a481
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/graph/src/go32v2/vesa.inc
View File

@ -515,7 +515,7 @@ end;
{$endif logging}
For l := 0 to (Bankrest div 4)-1 Do
begin
pixels := MemL[WinWriteSeg:word(offs)+l*4];
pixels := MemL[WinReadSeg:word(offs)+l*4];
WordArray(Data)[index+l*4] := pixels and $ff;
pixels := pixels shr 8;
WordArray(Data)[index+l*4+1] := pixels and $ff;