diff options
author | sekelsenmat <sekelsenmat@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-05-27 07:37:20 +0000 |
---|---|---|
committer | sekelsenmat <sekelsenmat@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-05-27 07:37:20 +0000 |
commit | a33eb60e76b3c333bf50b7183e1e6a078b6cdc27 (patch) | |
tree | c0e8e58a03d9d7caf3ee06ea4454792cd131a669 /examples/gfx | |
parent | 734b88fd7ed8c0416016025f2961b313d7b298d8 (diff) | |
download | fpGUI-a33eb60e76b3c333bf50b7183e1e6a078b6cdc27.tar.xz |
Fixed image showing on Gfx
Diffstat (limited to 'examples/gfx')
-rw-r--r-- | examples/gfx/imgtest/imgtest.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/gfx/imgtest/imgtest.pas b/examples/gfx/imgtest/imgtest.pas index a02eb72e..06b5b3f3 100644 --- a/examples/gfx/imgtest/imgtest.pas +++ b/examples/gfx/imgtest/imgtest.pas @@ -56,7 +56,7 @@ begin Bitmap.Lock(Data, Stride); for j := 0 to 255 do for i := 0 to 255 do - PLongWord(Data)[j * 256 + i] := (i shl 8) or (j shl 0); + PLongWord(Data)[j * 256 + i] := (i shl 16) or (j shl 8); Bitmap.Unlock; end; |