summaryrefslogtreecommitdiff
path: root/gfx/gelimage.pas
diff options
context:
space:
mode:
authorFelipe Menteiro de Carvalho <sekelsenmat@users.sourceforge.net>2006-11-26 01:24:56 +0000
committerFelipe Menteiro de Carvalho <sekelsenmat@users.sourceforge.net>2006-11-26 01:24:56 +0000
commit9e8a6eaf28aff6a6bb22875b4793c95d92bb196c (patch)
treeaa70d3e7d872fa9aac91e352a4866bdcd1e2ec67 /gfx/gelimage.pas
parenta9cb7e0de6707f50ba997d8d2cb1b3c3a0ca7ec8 (diff)
downloadfpGUI-9e8a6eaf28aff6a6bb22875b4793c95d92bb196c.tar.xz
Updated messaging on x11.
Diffstat (limited to 'gfx/gelimage.pas')
-rw-r--r--gfx/gelimage.pas6
1 files changed, 3 insertions, 3 deletions
diff --git a/gfx/gelimage.pas b/gfx/gelimage.pas
index 0003d62b..78a5246f 100644
--- a/gfx/gelimage.pas
+++ b/gfx/gelimage.pas
@@ -127,7 +127,7 @@ begin
(((PixelIn shr Params.GreenShiftR) and $ff) shl Params.GreenShiftL) or
(((PixelIn shr Params.BlueShiftR) and $ff) shl Params.BlueShiftL);
Inc(StartX);
- Inc(Data, 2);
+ Inc(Data, 4);
Inc(Dest, 2);
end;
end;
@@ -147,8 +147,8 @@ begin
(((PixelIn shr Params.GreenShiftR) and $ff) shl Params.GreenShiftL) or
(((PixelIn shr Params.BlueShiftR) and $ff) shl Params.BlueShiftL);
Inc(StartX);
- Inc(Data, 3);
- Inc(Dest, 4);
+ Inc(Data, 4);
+ Inc(Dest, 3);
end;
end;