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

Gtk2: reverted r35278 #a48c391314 - doesn't work good in all cases

Browse Source 
git-svn-id: trunk@35279 -
This commit is contained in:
zeljko 2012-02-10 06:47:34 +00:00
parent a48c391314
commit 3ef3c430f0
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/interfaces/gtk2/gtk2lclintf.inc
View File

@ -580,7 +580,7 @@ begin
if not (riqfUpdate in AFlags)
then ADesc.Init;
(*
if riqfMono in AFlags
then begin
ADesc.Format := ricfGray;
@ -598,7 +598,7 @@ begin
ADesc.BluePrec := 1;
ADesc.BlueShift := Desc.MaskShift;
end
(*
//TODO
else if riqfGrey in AFlags
then begin
@ -613,7 +613,7 @@ begin
ADesc.RedShift := 0;
end
*)
if (riqfMono in AFlags) or (riqfRGB in AFlags)
else if riqfRGB in AFlags
then begin
ADesc.Format := ricfRGBA;
ADesc.Depth := Desc.Depth;