Progress Bar

OpenOffice Developer's Guide

OpenOffice Basic

< Previous Section

Next Section >

• First Steps with OpenOffice Basic

• Creating a Module in a Standard Library
• Writing and Debugging a Basic UNO program
• Calling a Sub from the User Interface
• Creating Dialogs
• Adding Event Handlers
• AutoPilot Dialogs

• OpenOffice Basic IDE

• Managing Basic and Dialog Libraries

• OpenOffice Basic Macros Dialog

• Displayed Information
• Buttons

• OpenOffice Basic Macro Organizer Dialog

• Modules
• Dialogs
• Libraries

• Basic IDE Window

• Basic Source Editor and Debugger
• Dialog Editor

• Assigning Macros to GUI Events
• Dialog Localization

• Technical Background

• Features of OpenOffice Basic

• Functional Range Overview

• Screen I/O Functions
• File I/O
• Date and Time Functions
• Numeric Functions
• String Functions
• Specific UNO Functions

• Accessing the UNO API
• Special Behavior of OpenOffice Basic

• Advanced Library Organization

• General Structure
• Accessing Libraries from Basic
• Variable Scopes

• Programming Dialogs and Dialog Controls

• Dialog Handling

• Showing a Dialog
• Getting the Dialog Model
• Dialog as Control Container
• Dialog Properties
• Common Properties
• Multi-Page Dialogs

• Dialog Controls

• Command Button
• Image Control
• Check Box
• Option Button
• Label Field
• Text Field
• List Box
• Combo Box
• Horizontal/Vertical Scroll Bar
• Group Box
• Progress Bar
• Horizontal/Vertical Line
• Date Field
• Time Field
• Numeric Field
• Currency Field
• Formatted Field
• Pattern Field
• File Control

• Creating Dialogs at Runtime
• Library File Structure

• Application Library Container
• Document Library Container

• Library Deployment

< Previous Page

Next Page >

The progress bar control com.sun.star.awt.UnoControlProgressBar displays a growing or shrinking bar to give the user feedback during an operation, for example, the completion of a lengthy task. The minimum and the maximum progress value of the control is set by the ProgressValueMin and the ProgressValueMax properties. The progress value is controlled by the ProgressValue property. By default, the progress bar is blue, but the fill color can be changed by setting the FillColor property. The functionality of a progress bar is demonstrated in the following example:

 Sub ProgressBarDemo()
     Dim oProgressBar As Object, oProgressBarModel As Object
     Dim oCancelButtonModel As Object 
     Dim oStartButtonModel As Object
     Dim ProgressValue As Long
     REM progress bar settings
     Const ProgressValueMin = 0
     Const ProgressValueMax = 40
     Const ProgressStep = 4
     REM set minimum and maximum progress value
     oProgressBarModel = 
         oDialog.Model.ProgressBar1oProgressBarModel.ProgressValueMin =  
             ProgressValueMin
     oProgressBarModel.ProgressValueMax = ProgressValueMax
     REM disable cancel and start button
     oCancelButtonModel = oDialog.Model.CommandButton1
     oCancelButtonModel.Enabled = False
     oStartButtonModel = oDialog.Model.CommandButton2
     oStartButtonModel.Enabled = False
     REM show progress bar
     oProgressBar = oDialog.getControl("ProgressBar1")
     oProgressBar.setVisible( True )
     REM increase progress value every second
     For ProgressValue = 
             ProgressValueMin To ProgressValueMax Step ProgressStep
         oProgressBarModel.ProgressValue = ProgressValue
         Wait 1000
     Next ProgressValue
     REM hide progress bar
     oProgressBar.setVisible( False )
     REM enable cancel and start button
     oCancelButtonModel.Enabled = True
     oStartButtonModel.Enabled = True
 End Sub

Content on this page is licensed under the Public Documentation License (PDL).