[Gambas-user] Progress Bars

[Jeff Stillinger]

This is how I got lazy with RealBasic and OS X. Also was the thinking 
behind my question.  Here is a screen shot of what I am attempting to 
reproduce using gambas.

StatusBar1.MinValue = 0
StatusBar1.MaxValue = 300

On the lost focus event for the edit boxes.

StatusBar1.Value = Val(EditBox1.Text)
Label4.Caption = Time(Now)

     If StatusBar1.Value > 300 Then
      'Call a function to calculate immidiate insulin
      'dosage and display in seperate window.
     EndIf

The progress bars are only used to display large swings in glucose 
levels.  Most commonly found in felines.  What would really be cool is 
to have a class that is like the old graph object of VB 4.5.  Providing 
bar, pie, and line graphs.  This would allow us to trend data.  Any data.

-- j



Bodard Fabien wrote:
> Le mardi 27 Juillet 2004 01:42, Benoit Minisini a écrit :
> 
>>On Tuesday 27 July 2004 01:24, Jeff Stillinger wrote:
>>
>>>I need some assistance with progress bars.  I may have missed it, but
>>>does the progress bar have a max value property?
>>>
>>>--j
>>
>>Actually not. The Value of the ProgressBar is a Float between 0.0 and 1.0.
>>I didn't think that somebody could use ProgressBar as a jauge like you did
>>!
>>
>>You can replace it by two panels, the second (blue) inside the first
>>(normal). Then you will set the width of the inside panel this way:
>>
>> InsidePanel.W = OutsidePanel.ClientW  * (CFloat(Value - MinValue) /
>>(MaxValue - MinValue))
> 
> 
> 
> Hey, it's not a really gambas solution ...
> 
> For my idea i prefere use the inherit function...
> 
> I don't remember who wrote gambas, ... not you benoit ? (héhé)
> 
> So this class have three new properties :
> 
> MaxValue
> MinValue
> 
> NValue to set the value. ( it replace the value propertie of progressbar, that 
> alway exist).
> 
> Fabien Bodard



-------------- next part --------------
A non-text attachment was scrubbed...
Name: window2-shot1.jpg
Type: image/jpeg
Size: 68378 bytes
Desc: not available
URL: <http://lists.gambas-basic.org/pipermail/user/attachments/20040727/edb35e48/attachment.jpg>