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

gtk: don't request bitmap handle to check whether it empty - use Empty property instead

Browse Source 
git-svn-id: trunk@16477 -
This commit is contained in:
paul 2008-09-08 03:09:15 +00:00
parent cf010d10c6
commit 5f4857e470
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/interfaces/gtk/gtkwsbuttons.pp
View File

@ -295,9 +295,7 @@ begin
if (AIndex <> -1) and (AValue.Images <> nil) then if (AIndex <> -1) and (AValue.Images <> nil) then
AValue.Images.GetBitmap(AIndex, AGlyph, AEffect); AValue.Images.GetBitmap(AIndex, AGlyph, AEffect);
// check if an image is needed // check if an image is needed
if (AGlyph.Handle = 0) if AGlyph.Empty
or (AGlyph.Width = 0)
or (AGlyph.Height = 0)
then begin then begin
if BitBtnInfo^.ImageWidget <> nil if BitBtnInfo^.ImageWidget <> nil
then begin then begin