Function ProgresMetar(Brojac As Integer, Ukupno As Integer)
If Brojac < 2 Then
SysCmd acSysCmdInitMeter, "Obrada podataka...", Ukupno
End If
SysCmd acSysCmdUpdateMeter, Brojac
If Brojac = Ukupno Then
SysCmd acSysCmdRemoveMeter
End If
End Function