diff options
| author | Vladimir Glazounov <vg@openoffice.org> | 2005-02-24 15:57:51 +0000 |
|---|---|---|
| committer | Vladimir Glazounov <vg@openoffice.org> | 2005-02-24 15:57:51 +0000 |
| commit | f8daa3c810619864a3f3a825d04d7ea092620e18 (patch) | |
| tree | 3f5588c6a0649bc65e7b0b0062c4749dd0bfe787 /odk/examples/DevelopersGuide | |
| parent | ed1b43cf10415664c5a4b9d99eb0818b3cfcded0 (diff) | |
INTEGRATION: CWS tbe19 (1.2.4); FILE MERGED
2005/02/08 11:06:37 tbe 1.2.4.1: #i41730# Closing BasicMacro windows does not terminate Basic process
Diffstat (limited to 'odk/examples/DevelopersGuide')
| -rw-r--r-- | odk/examples/DevelopersGuide/BasicAndDialogs/ToolkitControls/ToolkitControls/ProgressBar.xba | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/odk/examples/DevelopersGuide/BasicAndDialogs/ToolkitControls/ToolkitControls/ProgressBar.xba b/odk/examples/DevelopersGuide/BasicAndDialogs/ToolkitControls/ToolkitControls/ProgressBar.xba index 5c65fc707ef6..648b4091b034 100644 --- a/odk/examples/DevelopersGuide/BasicAndDialogs/ToolkitControls/ToolkitControls/ProgressBar.xba +++ b/odk/examples/DevelopersGuide/BasicAndDialogs/ToolkitControls/ToolkitControls/ProgressBar.xba @@ -40,8 +40,8 @@ Sub ProgressBarDemo() REM progress bar settings Const ProgressValueMin = 0 - Const ProgressValueMax = 40 - Const ProgressStep = 4 + Const ProgressValueMax = 50 + Const ProgressStep = 1 REM set minimum and maximum progress value oProgressBarModel = oDialog.Model.ProgressBar1 @@ -61,7 +61,7 @@ Sub ProgressBarDemo() REM increase progress value every second For ProgressValue = ProgressValueMin To ProgressValueMax Step ProgressStep oProgressBarModel.ProgressValue = ProgressValue - Wait 1000 + Wait 40 Next ProgressValue REM hide progress bar |