[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Gambas-bugtracker] Bug #3148: Bug - No more possible to set the background color of a WorkSpace object

http://gambaswiki.org/bugtracker/edit?object=BUG.3148&from=L21haW4-

Comment #1 by Bruce STEERS:

it's true, commit https://gitlab.com/gambas/gambas/-/commit/328e3e2053a006a7403586f81dc2994fd65b4be3?file_path=comp%2Fsrc%2Fgb.form.mdi%2F.src%2FWorkspace%2FFWorkspace.class#line_ad5c3e1e1_536

Removes the following line from Updatesize() ...

 Me.Background = If($iBackground = Color.Default, Color.Merge(Color.Background, Color.Foreground), $iBackground) 

i think FWorkspace.SetBackground should now be like this...

Public Sub SetBackground(iColor As Integer)
  
  $iBackground = iColor
  Me.Background = If($iBackground = Color.Default, Color.Merge(Color.Background, Color.Foreground), $iBackground) 

  'UpdateSize  ' I THINK THIS IS NO LONGER NEEDED SINCE PREVIOUS CHANGES.
  'panWorkspace.Refresh
  
End


Respects
BruceS



----[ Gambas bugtracker-list is hosted by https://www.hostsharing.net ]----