This function provides some additional flags to display progress percentage and/or bars when executing scripts in console mode (IBEScript.exe). In the IBExpert GUI it works exactly as the ibec_Progress function.

Syntax

  function ibec_ProgressEx(Message : string; Options : variant);

Currently the Options argument can accept a combination of the following constants:

• __poNoCRLF ($1) - no end-of-line marker (CR+LF) will be added to the end of progress message;
• __poReplaceLast ($2) - last ibec_ProgressEx output will be replaced with a new one;

Example 1

    execute ibeblock
    as
    begin
      ibec_ProgressEx('Progress: ', __poNoCRLF);
      for i = 1 to 100 do
      begin
        s = i || '%';
        iOptions = __poNoCRLF;
        if (i > 1) then
          iOptions = iOptions + __poReplaceLast;
        ibec_ProgressEx(s, iOptions);
        ibec_sleep(100);
      end;

      ibec_ProgressEx('', 0);
    end;	

Example 2

    execute ibeblock
    as
    begin
      ibec_ProgressEx('Progress: ', __poNoCRLF);
      for i = 1 to 100 do
      begin
        if (i > 1) then
          ibec_ProgressEx('', __poNoCRLF + __poReplaceLast);
        ibec_ProgressEx('=', __poNoCRLF);
        s = ' ' || i || '%';
        ibec_ProgressEx(s, __poNoCRLF);
        ibec_sleep(100);
      end;
    end;

See also:
Comparing databases using IBEBlock
Comparing scripts with IBEBlock

back to top of page
<< ibec_Progress | IBEBlock | ibec_GetEnvironmentVariable >>