Delphi DLL

Finalize Thread Pool

In some programming environments, such as VB6, FoxPro, and others (especially anything using the Chilkat ActiveX), it may be necessary to call FinalizeThreadPool just before your program exits. Otherwise a hard crash can happen. (This has only been known to happen in programs written in VB6, FoxPro, etc.) Delphi DLL

uses
    Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
    Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Global;

...

procedure TForm1.Button1Click(Sender: TObject);
var
success: Boolean;
glob: HCkGlobal;

begin
success := False;

// If your application made use of asynchronous Chilkat methods, which create background threads including a thread pool manager, 
// then call FinalizeThreadPool just before your program exits.  This isn't required, but in some programming environments it 
// prevents a crash on exit -- namely VB6, FoxPro, and other older programming languages where the ActiveX is used.
glob := CkGlobal_Create();
success := CkGlobal_FinalizeThreadPool(glob);

CkGlobal_Dispose(glob);

end;