Occurs during a time-consuming operation

Delphi syntax:

TTdbProgressEvent = procedure(Sender: TObject; PercentDone: Byte; var Stop: Boolean) of object;

property OnProgress: TTdbProgressEvent;

C++ syntax:

typedef void __fastcall (__closure *TTdbProgressEvent)(System::TObject* Sender, Byte PercentDone, bool &Stop);

__property TTdbProgressEvent OnProgress = {read=FOnProgress, write=FOnProgress};

Description

Use OnProgress to update a progress bar and offer the user a way to cancel the operation. OnProgress is called during creating and altering a table and in the creation of indexes.

Note: Do not execute TurboDB database operations within the OnProgress event handler. Since the database engine is not reentrant calling TurboDB methods can lead to unpredictable results.