Komponenta ProgressBar


P°ehled vlastnostφ, metod a udßlostφ objektu:
--------------------------------------------------------------
Align (RW)           Cursor (RW)          Enabled (RW)
Height (RW)          HelpContext (RW)     Hint (RW)
Left (RW)            Max (RW)             Min (RW)
Name (R)             ParentShowHint (RW)  PopupMenu (RW)
Position (RW)        ShowHint (RW)        Step (RW)
TabOrder (RW)        TabStop (RW)         Tag (RW)
Top (RW)             Visible (RW)         Width (RW)
--------------------------------------------------------------
StepBy               StepIt               
--------------------------------------------------------------
OnEnter              OnExit               OnMouseDown
OnMouseMove          OnMouseUp            
--------------------------------------------------------------
Legenda: * -> pouze z programu, R -> lze Φφst, W -> lze zadat

Komponenta ProgressBar slou₧φ pro zobrazenφ ΦasovΘho pr∙b∞hu akce. Zobrazenφ je provßd∞no ve tvaru barevnΘho prou₧ku, kter² postupn∞ vypl≥uje zadanou plochu.

PoΦßteΦnφ hodnota je urΦena vlastnostφ Min, koneΦnou hodnotu urΦuje vlastnost Max. Pozici ukazatele udßvß vlastnost Position. Zm∞nu ukazatele pozice ΦasovΘho pr∙b∞hu je mo₧nΘ vyvolat takΘ metodami StepBy a StepIt.


Jazyk KLONDAIK: procedure TForm.ButtonClick(Sender: TObject); var x: Integer; begin for x := ProgressBar.Min to ProgressBar.Max do begin {doplnit akce, jejφ₧ pr∙b∞h se sleduje} ProgressBar.Position := x; end; end;


Jazyk BONANZA: Sub ButtonClick(Sender) For x = ProgressBar.Min to ProgressBar.Max 'doplnit akce, jejφ₧ pr∙b∞h se sleduje ProgressBar.Position = x Next End Sub


OZOGAN, 1 Mßje 97, 460 01 Liberec
tel.,fax: (048) 52 28 338, e-mail: info@ozogan.cz