Make and answer phone calls
in your Delphi applications

TSipClient is a non-visual Delphi component that adds full VoIP capabilities to your app in minutes. Compatible with Delphi 5 through 12.

No registration required  ·  One-time payment  ·  Email support

Everything you need for VoIP in Delphi

📞

Make & Answer Calls

Initiate and receive SIP calls with any compatible VoIP provider or PBX.

🔴

Call Recording

Record calls directly to .WAV files (PCM 8kHz 16-bit Mono).

👥

Conference Calls

Connect multiple parties in a single call session.

🔢

DTMF Detection

Detect and send DTMF tones — perfect for IVR systems.

🔊

WAV Playback

Play .WAV audio files directly to the phone line during a call.

💬

Text-to-Speech

Read text messages aloud to callers using built-in TTS engine.

Compatibility

The component source code works with all Delphi versions from Delphi 5 to Delphi 12. Works with any SIP provider — VOIP BUSTER, NET-VOICE, OVH Telecom, SIPNET — or your own Asterisk PBX.

Delphi 5–7 Delphi 2005–2010 Delphi XE–XE8 Delphi 10.x Seattle–Rio Delphi 11 Alexandria Delphi 12 Athens

Usage Examples

Non-visual component — install in your Delphi IDE or create dynamically at runtime.

Initialize and connect

procedure TForm1.FormCreate(Sender: TObject);
begin
  FSipClient := TSipClient.Create(nil);
  FSipClient.Host := 'sipprovider.com';
  FSipClient.User := 'myusername';
  FSipClient.Password := 'mypassword';
  // Assign event handlers
  FSipClient.OnRegistration := SipClientRegistration;
  FSipClient.OnCall        := SipClientCall;
  FSipClient.OnAnswer      := SipClientAnswer;
  FSipClient.OnBye         := SipClientBye;
  FSipClient.OnPlayed      := SipClientPlayed;
  FSipClient.OnDtmf        := SipClientDtmf;
  // Activate and register
  FSipClient.Active := True;
  FSipClient.Register;
end;

Make a call

procedure TForm1.CallButtonClick(Sender: TObject);
begin
  FCall := FSipClient.Call('18025551111');
end;

Answer incoming call

procedure TForm1.SipClientCall(Sender: TObject; const ACall: ICall);
begin
  FCall := ACall;
  FCall.Answer;
end;

End a call

procedure TForm1.HangupButtonClick(Sender: TObject);
begin
  FCall.EndCall;
  FCall := nil;
end;

Download the trial version to get the full source code of a demo softphone project.

Pricing

Full License
$340
One-time payment — no subscription
  • ✓ Full Delphi source code included
  • ✓ All Delphi versions (5 through 12)
  • ✓ Demo softphone project
  • ✓ Lifetime license
  • ✓ Email support
Buy Now via PayPal Or download the free trial first

Contact

Have a question before buying? Ask below and we'll respond promptly.