luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Project tree: Compressed files icons are now darker through brightness modification.

Browse source 
[DEVELOPMENT ENVIRONMENT]
* BUG: Project tree: Compressed files icons are now darker through brightness modification.
This commit is contained in:
gambas 2021-10-16 12:53:42 +02:00
parent 61aae0c606
commit 175d64b9fd
1 changed files with 3 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
app/src/gambas3/.src/Project.module
View file

@ -1165,14 +1165,13 @@ Public Sub AddCompressedEmblem(hSource As Image) As Image
Dim hImage As Image
Dim iCol As Integer
hImage = hSource.Copy()
If Application.DarkTheme Then
iCol = Color.SetAlpha(Color.TextForeground, 128)
hImage.Brightness(0.5)
Else
iCol = Color.SetAlpha(Color.TextForeground, 220)
hImage.Brightness(-0.25)
Endif
hImage = hSource.Copy()
hImage.PaintRect(0, 0, hImage.W, hImage.H, iCol)
Return hImage
End