Help browser: Correctly react to switches between offline and online help.

[DEVELOPMENT ENVIRONMENT]
* BUG: Help browser: Correctly react to switches between offline and online help.
* NEW: Update financial support.
This commit is contained in:
gambas 2021-11-14 22:09:48 +01:00
parent 31818b9ba8
commit 79ff9b9f2d
4 changed files with 12 additions and 4 deletions

View file

@ -53,7 +53,7 @@ End
Public Sub ReadConfig()
webHelp.ReadConfig
If webHelp.ReadConfig() Then GotoHome
$bOffLine = Settings["/UseOfflineHelp"]

View file

@ -140,7 +140,7 @@
Index = 0
}
{ webHelp HelpView
MoveScaled(50,8,22,16)
MoveScaled(52,5,24,18)
}
}
}

View file

@ -4,6 +4,10 @@ Export
Inherits UserControl
Public Const _Properties As String = "*,Zoom"
Public Const _DrawWith As String = "WebView"
Property Zoom As Float
Property Url As String
Property Read Browser As Boolean
@ -16,7 +20,7 @@ Public Sub _new()
End
Public Sub ReadConfig()
Public Sub ReadConfig() As Boolean
Dim bOffline As Boolean
@ -30,6 +34,9 @@ Public Sub ReadConfig()
$hView = New HelpBrowser(Me) As "hvwHelp"
Endif
Try $hView.Border = False
'$hView.Hide
$hView.Show ' FIXME: Why calling Show() is needed with gb.qt5???
Return True
Endif
End

View file

@ -129,6 +129,8 @@
3 Peter Pach
3 Andres Carranza Silva
3 Eagle Eye Digital Solutions
3 Manfred Heyen
3 Bernd Kühn
3 DaifNet
3 Alessandri Guzman Abad
2 Eloy Velázquez López
@ -145,7 +147,6 @@
2 Ľuboš Ilenčík
2 Jose Aguilar Vega
2 Olivier Reichelt
2 Manfred Heyen
2 John Terry
2 Timucin Kanatli
2 Brice Vidal