(Delphi ActiveX) 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.)

Chilkat for Delphi Downloads Chilkat ActiveX DLL for Delphi Chilkat non-ActiveX DLL for Delphi * The examples here use the ActiveX DLL.

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

...

procedure TForm1.Button1Click(Sender: TObject);
var
glob: TChilkatGlobal;
success: Integer;

begin
// 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 := TChilkatGlobal.Create(Self);
success := glob.FinalizeThreadPool();
end;