Deletes a MMS. Each MMS that iss created with the MmsCreateMms function must be deleted using this function.
MmsLib.bdh
MmsDeleteMms( in hMms : number );
Parameter | Description |
---|---|
hMms | Handle for the MMS, returned by a call to MmsCreateMms. |
dcltrans transaction TInit var hMms : number; begin MmsCreateMms(hMms); MmsSetHeader(hMms, MMS_HEADER_MsgType, MMS_M_SEND_REQ); MmsSetHeader(hMms, MMS_HEADER_MmsVersion, MMS_MSGVERSION_10); MmsSetHeader(hMms, MMS_HEADER_ContentType, WAP_CONTENT_ApplicationVndWapMultipartRelated); MmsSetHeaderString(hMms, MMS_HEADER_From, "31743678001"); MmsSetHeaderString(hMms, MMS_HEADER_To, "31743689031"); MmsSetHeaderString(hMms, MMS_HEADER_TransactionId, "17"); MmsAddFile(hMms, "smile.gif", WAP_CONTENT_ImageGif, "smile.gif", "smile.gif"); WapPostMms("http://10.5.8.12:8899/mmsc", hMms); MmsDeleteMms(hMms); end TInit;