diff options
Diffstat (limited to 'wizards/source/scriptforge/SF_Root.xba')
-rw-r--r-- | wizards/source/scriptforge/SF_Root.xba | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/wizards/source/scriptforge/SF_Root.xba b/wizards/source/scriptforge/SF_Root.xba index 7ba27eb3c4ec..7f07109dc055 100644 --- a/wizards/source/scriptforge/SF_Root.xba +++ b/wizards/source/scriptforge/SF_Root.xba @@ -38,6 +38,12 @@ Private DisplayEnabled As Boolean ' When True, display of console or error Private StopWhenError As Boolean ' When True, process stops after error > "WARNING" Private DebugMode As Boolean ' When True, log enter/exit each official Sub +' Progress and status bars +Private ProgressBarDialog As Object ' SFDialogs.Dialog object +Private ProgressBarText As Object ' SFDialogs.DialogControl object +Private ProgressBarBar As Object ' SFDialogs.DialogControl object +Private Statusbar As Object + ' Services management Private ServicesList As Variant ' Dictionary of provided services @@ -93,6 +99,10 @@ Private Sub Class_Initialize() DisplayEnabled = True StopWhenError = True DebugMode = False + Set ProgressBarDialog = Nothing + Set ProgressBarText = Nothing + Set progressBarBar = Nothing + Set Statusbar = Nothing ServicesList = Empty Set FunctionAccess = Nothing Set PathSettings = Nothing |