Delphi DLL

VB6 Finalize Thread Pool on Program Exit (or Crash)

See more Async Examples

VB6 programs must call FinalizeThreadPool on exit if using any Async methods.

If your code is calling asynchronous Chilkat methods (i.e. methods having names ending with "Async"), then it is necessary to call FinalizeThreadPool when your program is about to exit. The VB6 IDE will crash unless all background threads are cleanly terminated.

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
glob: HCkGlobal;

begin
// Asynchronous Chilkat methods are run in background threads managed
// by a thread pool manager thread, which is also a background thread.
// Prior to exiting, it is required in VB6 to ensure all asynchronous methods
// have completed or are aborted/cancelled, and that the thread pool manager
// thread is also shutdown.  
// 
// The FinalizeThreadPool method should be called just before the application exits
// to ensure all background threads, including the thread pool manager thread, are
// cleanly shutdown.

// This is how to do it:
glob := CkGlobal_Create();
CkGlobal_FinalizeThreadPool(glob);

CkGlobal_Dispose(glob);

end;