You are here:
ActiveXperts.com > SMS and MMS Toolkit > How to Use MMS Toolkit > SMTP (MM4) > Borland C++ Builder
Quicklinks
- Download Mobile Messaging Toolkit 6.0 (18152 KB)
- Download Manual (592 KB)
- ActiveXperts SMS and MMS Toolkit has been replaced by ActiveXperts Mobile Messaging Toolkit.
- Screenshots - Product image gallery
Using SMS and MMS Toolkit with Borland C++ Builder (MM4 Connection)
The SMS and MMS Toolkit is a software development kit (SDK) to enhance an application or script with SMS, MMS and Pager functionality. SMS messages can be sent using a GSM/GPRS modem, an SMPP provider, an HTTP compliant SMS provider or using a standard dialup or fixed-line SMS modem. MMS messages can be sent via a GSM/GPRS modem (MM1), an SMTP server (MM4) or an XML/SOAP compliant provider (MM7).
SMS features:
- Send and receive numeric- and alphanumeric text SMS messages
- Verify delivery of outgoing SMS messages
- Support for multimedia SMS messages, including ringtones, pictures and logo's
- Support for WAP Push, WAP Bookmarks, vCards, voicemail/e-mail/fax/MMS indications
- Support for Unicode, to support foreign languages like Arabic, Chinese, Hebrew, etc.
- Support for multi-part messages, to allow messages longer than 160 characters
- Support for GSM modems, GSM phones, SMS/HTTP providers, SMPP (Short Message Peer to Peer) providers, TAP/XIO and UCP dial-in SMSC providers
- Support Multi-threading environments. The component is thread-safe, which means it can be used in a multi-threaded environment
- Samples included for various development platforms: MS Visual Basic, MS Visual Basic .NET, MS Visual C++, MS Visual Studio C# .NET, ASP, ASP .NET, Borland Delphi, Borland C++ Builder, Windows Powershell ColdFusion and more
MMS features:
- Support for many multimedia formats incl.: JPG, GIF, PNG, BMP, WBMP, TIF, WAV, MP3, MIDI, AC3, GP3, AVI, MPG, MP4, VCARD, VCALENDAR, JAR and more
- Support for MM1 (MMS over WAP), MM4 (MMS over SMTP) and MM7 (MMS over HTML/SOAP)
Pager features:
- Send alpha-numeric Pager messages through SNPP
This document describes how the SMS and MMS Toolkit can be integrated into Borland C++ Builder projects.
Step 1: Download and install the SMS and MMS Toolkit
Download the the SMS and MMS Toolkit from the ActiveXperts Download Site and start the installation. The installation guides you through the installation process.
Step 2: Create a new C++ Builder Project
Launch Borland C++ Builder (for instance 'Borland C++ Builder 6') from the Start menu. Choose 'New' from the 'File' menu and select 'Application'. A new Form is displayed in the workspace.
)
(Click on the picture to enlarge)
Step 3: Refer to the SMS and MMS Toolkit Library
Now that a new project has been created, you must add a reference to MMS Toolkit in the project to be able to use the SMS and MMS Toolkit object. To do so, choose 'Import Type Library...' from the 'Project' menu. The Import Type Library' dialog appears.
)
(Click on the picture to enlarge)
In the upper selection box, select 'MMS Toolkit 2.1 Type Library' and click 'Create Unit':
The interface code is generated now and is shown in the AXmsCtrl_TLB.cpp and AXmsCtrl_TLB.h tab of the project.
Step 4: Declare and create the object
From the Project Manager, open Unit1.h and add include the AXmsCtrl_TLB.h file to refer to the SMS and MMS Toolkit library:
)
(Click on the picture to enlarge)
In the 'private' or 'public' section, declare the following objects:
TCOMIMmsProtocolMm4 m_objMm4Protocol; TCOMIMmsMessage m_objMmsMessage; TCOMIMmsSlide m_objMmsSlide;
You can now create the objects, for instance in the 'FormCreate' event handler or the class constructor:
m_objMm4Protocol = CoMmsProtocolMm4::Create (); m_objMmsMessage = CoMmsMessage::Create (); m_objMmsSlide = CoMmsSlide::Create ();
Step 5: Send MMS messages
You can now send MMS messages.
The following code shows how to send an MMS message using a MM4 Connection:
//--------------------------------------------------------------------------- #include <vcl.h> #include <comutil.h> #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { m_objMm4Protocol = CoMmsProtocolMm4::Create (); m_objMmsMessage = CoMmsMessage::Create (); m_objMmsSlide = CoMmsSlide::Create (); } //--------------------------------------------------------------------------- void __fastcall TForm1::FormCreate(TObject *Sender) { ComboVariation->Items->Add("3GPP"); ComboVariation->Items->Add("Ericsson"); ComboVariation->Items->Add("PAP"); ComboVariation->ItemIndex = 0; ComboSchema->Items->Add("REL-5-MM7-1-0"); ComboSchema->Items->Add("REL-5-MM7-1-1"); ComboSchema->Items->Add("REL-5-MM7-1-2"); ComboSchema->Items->Add("REL-5-MM7-1-3"); ComboSchema->Items->Add("REL-5-MM7-1-4"); ComboSchema->Items->Add("REL-5-MM7-1-5"); ComboSchema->Items->Add("REL-6-MM7-1-0"); ComboSchema->Items->Add("REL-6-MM7-1-1"); ComboSchema->Items->Add("REL-6-MM7-1-2"); ComboSchema->Items->Add("REL-6-MM7-1-3"); ComboSchema->ItemIndex = 0; ComboVersion->Items->Add("5.2.0"); ComboVersion->Items->Add("5.3.0"); ComboVersion->Items->Add("5.4.0"); ComboVersion->Items->Add("5.5.0"); ComboVersion->Items->Add("5.6.0"); ComboVersion->Items->Add("5.7.0"); ComboVersion->Items->Add("5.8.0"); ComboVersion->Items->Add("5.9.0"); ComboVersion->Items->Add("5.10.0"); ComboVersion->Items->Add("5.11.0"); ComboVersion->Items->Add("6.0.0"); ComboVersion->Items->Add("6.1.0"); ComboVersion->Items->Add("6.2.0"); ComboVersion->Items->Add("6.3.0"); ComboVersion->Items->Add("6.4.0"); ComboVersion->Items->Add("6.5.0"); ComboVersion->Items->Add("6.6.0"); ComboVersion->Items->Add("6.7.0"); ComboVersion->ItemIndex = 0; SetDefaultLogfile (); } //--------------------------------------------------------------------------- void TForm1::SetDefaultLogfile() { CHAR szTemp [ MAX_PATH + 1 ]; GetTempPath ( MAX_PATH, szTemp ); strcat ( szTemp, "MM4.log" ); EditLogfile->Text = szTemp; } //--------------------------------------------------------------------------- void __fastcall TForm1::ButtonViewClick(TObject *Sender) { if ( EditLogfile->Text.Length() ) { ShellExecute ( NULL, _T("open"), EditLogfile->Text.c_str(), NULL, NULL, SW_SHOWDEFAULT ); } } //--------------------------------------------------------------------------- void __fastcall TForm1::ButtonProviderLoadConfigClick(TObject *Sender) { OpenDialog->DefaultExt = ".mm7"; OpenDialog->Filter = "MMS Connection Files|*.mm7"; if ( OpenDialog->Execute() == TRUE ) { m_objMm4Protocol->ProviderProviderLoadConfig ( WideString ( OpenDialog->FileName ) ); if ( GetResult () == 0 ) { EditURL->Text = m_objMm4Protocol->ProviderURL; EditAccount->Text = m_objMm4Protocol->ProviderAccount; EditPassword->Text = m_objMm4Protocol->ProviderPassword; ComboVersion->ItemIndex = m_objMm4Protocol->ProviderMM7Version; ComboSchema->ItemIndex = m_objMm4Protocol->ProviderMM7Schema; ComboVariation->ItemIndex = m_objMm4Protocol->ProviderMM7Variation; CheckSSL->Checked = m_objMm4Protocol->ProviderUseSSL; } } } //--------------------------------------------------------------------------- void __fastcall TForm1::ButtonSaveConfigClick(TObject *Sender) { SaveDialog->DefaultExt = ".mm7"; SaveDialog->Filter = "MMS Connection Files|*.mm7"; if ( SaveDialog->Execute () == TRUE ) { m_objMm4Protocol->set_ProviderURL ( WideString ( EditURL->Text ) ); m_objMm4Protocol->set_ProviderAccount ( WideString ( EditAccount->Text ) ); m_objMm4Protocol->set_ProviderPassword ( WideString ( EditAccount->Text ) ); m_objMm4Protocol->set_ProviderUseSSL ( CheckSSL->Checked ); m_objMm4Protocol->set_ProviderMM7Schema ( ComboSchema->ItemIndex ); m_objMm4Protocol->set_ProviderMM7Version ( ComboVersion->ItemIndex ); m_objMm4Protocol->set_ProviderMM7Variation ( ComboVariation->ItemIndex ); m_objMm4Protocol->set_LogFile ( WideString ( EditLogfile->Text ) ); m_objMm4Protocol->ProviderSaveConfig ( WideString ( SaveDialog->FileName ) ); GetResult (); } } //--------------------------------------------------------------------------- long TForm1::GetResult() { long lResult = m_objMm4Protocol->LastError; EditResponse->Text = m_objMm4Protocol->ProviderResponse; EditResult->Text = "ERROR " + IntToStr ( lResult ) + " : " + m_objMm4Protocol->GetErrorDescription( lResult ); return lResult; } //--------------------------------------------------------------------------- void __fastcall TForm1::ButtonBrowseClick(TObject *Sender) { OpenDialog->DefaultExt = ".jpg"; OpenDialog->Filter = "Image Files|*.jpg"; if ( OpenDialog->Execute() == TRUE ) { EditImage->Text = OpenDialog->FileName; } } //--------------------------------------------------------------------------- void __fastcall TForm1::ButtonSendClick(TObject *Sender) { ButtonSend->Enabled = FALSE; Cursor = crHourGlass; // Set Connection Properties m_objMm4Protocol->Clear(); m_objMm4Protocol->set_ProviderURL ( WideString ( EditURL->Text ) ); m_objMm4Protocol->set_ProviderAccount ( WideString ( EditAccount->Text ) ); m_objMm4Protocol->set_ProviderPassword( WideString ( EditPassword->Text ) ); m_objMm4Protocol->set_ProviderMM7Version ( ComboVersion->ItemIndex ); m_objMm4Protocol->set_ProviderMM7Schema ( ComboSchema->ItemIndex ); m_objMm4Protocol->set_ProviderMM7Variation ( ComboVariation->ItemIndex ); m_objMm4Protocol->set_LogFile ( WideString ( EditLogfile->Text ) ); m_objMm4Protocol->set_ProviderUseSSL( CheckSSL->Checked == TRUE ? 1 : 0 ); // Set Message Properties m_objMmsMessage->Clear (); m_objMmsMessage->AddRecipient( WideString ( EditTo->Text ) ); m_objMmsMessage->set_Subject ( WideString ( EditSubject->Text ) ); // Create First Slide m_objMmsSlide->Clear(); m_objMmsSlide->AddText( WideString ( EditBody->Text ) ); m_objMmsSlide->AddAttachment( WideString (EditImage->Text ), NULL ); // Add The Slide Variant vtVarSlide ( ( IDispatch* ) m_objMmsSlide ); m_objMmsMessage->AddSlide( ( VARIANT * ) vtVarSlide ) ; // Send The Message Variant vtVarMessage ( ( IDispatch* ) m_objMmsMessage ); m_objMm4Protocol->Send ( ( VARIANT * ) vtVarMessage ); GetResult (); ButtonSend->Enabled = True; Cursor =crDefault; } //---------------------------------------------------------------------------
There are many working samples included with the product. You can also find them on the ActiveXperts FTP site: ftp.activexperts-labs.com/samples/mobile-messaging-component.
NOTE: Demo Projects are created with Borland C++ Builder 6
The MMS Toolkit project ships with a set of samples for Borland C++ Builder. The projects are created with Borland C++ Builder 6.
Users with a later version of Borland C++ Builder 6 can open such a project. The Borland Conversion Wizard will guide you through the process of converting the project to the version used.