Skip to main content
Skip table of contents

ProgressBarHide()

ProgressBarHide() – Fortschrittsanzeige verstecken

Die Funktion lässt die durch ProgressBarShow() aufgerufene Anzeige wieder verschwinden.

keine Parameter erwartet

Rückgabewert

Keiner

Beispiel

CODE
| oDab000:DB := 'waDAB000, 1', nY:N := 0, nProg |

nProg := Dim(2),
DBFilter("KDNR<=250000", oDab000),
DBGoBottom(oDab000),
nProg[1] := oDab000:REC_NO,
DBGoTop(oDab000),
nProg[2] := oDab000:REC_NO,
startseq,
   ProgressBarShow("", "Berechnung"),
   while NOT EoF(oDab000) do
      nY++,
      ProgressBarUpdate((oDab000:REC_NO-nProg[2]) / (nProg[1]- nProg[2]) <h3> 100,
                         Str(nY), true),
      DBSkip(1, oDab000),
   end,
   ProgressBarHide(),
   Meld('Es wurden ' + Str(nY) + ' Datensätze berechnet')
onerror,
   ProgressBarHide(),
   Meld('Fehler beim Berechnen!'),
stopseq,

Weitere Verknüpfungen

JavaScript errors detected

Please note, these errors can depend on your browser setup.

If this problem persists, please contact our support.