How do I develop Delphi applications that manage conversations?

The information in this article applies to:

• VoiceXMLKit

Summary

You can develop Delphi applications that manage conversations using your favorite version of Delphi.

More Information

VoiceXMLKit includes a Delphi Pascal source file VoiceXMLKit.pas comprised of the Delphi classes that manage conversations. It also includes a Delphi Pascal source file ChantShared.pas comprised of common Delphi classes that all Chant libraries use.

To access the VoiceXMLKit Delphi classes within your application, first add a project reference to the VoiceXMLKit Delphi source files:

To access the VoiceXMLKit Delphi classes within your application, add a reference to the ChantShared and VoiceXMLKit units in your uses clause:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ChantShared, VoiceXMLKit;

Add an event handler declaration and Object instance variable to the application declarations:

type
TForm1 = class(TForm)
...
private
{ Private declarations }
public
{ Public declarations }
procedure OnHasEvent(var msg: TMessage);
    message WM_APP+9;
end;

var
Form1: TForm1;
ChantXM1: TChantXM;

Object Instantiation

Instantiate an instance, set the license and serial properties, and set the event handler message.

procedure TForm1.FormCreate(Sender: TObject);
begin
ChantXM1 := TChantXM.Create();
// Set license properties
ChantXM1.SetStringProperty(CSPLicense,'LicenseRegistrationNumber');
ChantXM1.SetStringProperty(CSPSerials,'LicenseSerialNumber');

// Define the HasEvent callback message
ChantXM1.SetWindowMessage(Handle, WM_APP+9, 0, 0);

end;

Event Callbacks

Event callbacks are the mechanism in which the component library communications information back to the application such as compilation is complete or there was an error.

procedure TForm1.OnHasEvent(var msg: TMessage);
var
aTChantXMEvent: TChantXMEvent;
i: Integer;
begin
    numberOfEvents := ChantXM1.GetResourceCount(CSREvent,0,0);
    for i := 0 to numberOfEvents - 1 do
    begin
        // Get the event from the event queue
        aTChantXMEvent := ChantXM1.GetChantXMEvent(0);
        case aTChantXMEvent.ChantCallback of
        CCXMCompileDone:
        ...
        CCXMCompileError:
        ...
        end;
        ...
        // Remove the event from the event queue
        ChantXM1.RemoveResource(CSREvent,0,0);
        aTChantXMEvent.Destroy();
    end;
end;

Deployment Checklist

When you are ready to deploy your Delphi application, you need to ensure you have a valid license, bundle the correct Chant component library, and configure your installation properly on the target system. Review the following checklist before deploying your applications:

Sample Projects

Delphi sample projects are installed at the following location:

For additional help with VoiceXMLKit, contact Chant Support via or web.