paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-09 09:59:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

fixed gtk intf getting line end boundary

Browse Source 
git-svn-id: trunk@9208 -
This commit is contained in:
mattias 2006-04-29 22:25:16 +00:00
parent ed397852ff
commit 606d061e80
1 changed files with 2 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lcl/interfaces/gtk/gtkobject.inc
View File

@ -2550,7 +2550,7 @@ begin
// Palette
Desc^.HasPalette:=(not IsGdkBitmap)
and (Visual^.thetype in [GDK_VISUAL_GRAYSCALE,
GDK_VISUAL_STATIC_COLOR,GDK_VISUAL_PSEUDO_COLOR]);
GDK_VISUAL_STATIC_COLOR,GDK_VISUAL_PSEUDO_COLOR]);
// Depth
if IsGdkBitmap then
Desc^.Depth:=1
@ -2792,12 +2792,7 @@ begin
{$ENDIF}
// See also GetWindowRawImageDescription
RawImage.Description.AlphaLineEnd:=rileDWordBoundary;// gdk_image_get uses rileDWordBoundary
{case AnImage^.Depth of
0..8: RawImage.Description.AlphaLineEnd:=rileByteBoundary;
9..32: RawImage.Description.AlphaLineEnd:=rileDWordBoundary;// X does not seem to use Word boundaries
else RawImage.Description.AlphaLineEnd:=rileQWordBoundary;
end;}
RawImage.Description.AlphaLineEnd:=rileByteBoundary;// gdk_image_get uses rileByteBoundary
RawImage.Description.AlphaBitsPerPixel:=GetPGdkImageBitsPerPixel(AnImage);
// consistency checks