有兩個控制項:tidmessage:idmsgsend, tid**tp:**tp
/傳送郵件
//注:傳送的**tp屬性通過**tp_setup函式設定了
//引數:in:cto,收件人
// ccc 抄送
// cbcc 暗抄
// csubject 主題
// cbody 內容
// cattachlist 傳送的附件(以n分割)
// out: msg 返回錯誤資訊
//返回值 0: 成功傳送
// -1:失敗,參見msg資訊
// -2: 沒有先設定**tp傳送屬性
int __fastcall tm::sendmail(const char * cto, const char * ccc, const char * cbcc,
const char* csubject, const char * cbody, const char* cattachlist,
char * cmsg)
idmsgsend->receiptrecipient->text = idmsgsend->from->text;
}else
idmsgsend->receiptrecipient->text = "";
}idmsgsend->recipients->emailaddresses = cto; //
idmsgsend->subject = csubject; //
idmsgsend->cclist->emailaddresses = ccc;//
idmsgsend->bcclist->emailaddresses = cbcc; //
idmsgsend->priority = tidmessagepriority(priority); //
idmsgsend->body->text = string(cbody);
if(strlen(cattachlist))
delete sl;
}if(!**tp->connected())
catch(exception &e)
}if(**tp->connected())
catch(exception &e)
}else
return iret;
}//設定傳送的**tp屬性
// iport, **tp埠
// clocalmail 發件人的郵箱
// iauth 是否認證 0,不認證,1認證
// cusername 認證使用者名稱
// cpassword 認證密碼
// out: 無
//返回值 0: 成功設定
// -1:失敗,缺少屬性
int __fastcall tm::**tp_setup(const char * chost, const int iport, const char *clocalmail,
const int iauth, const char * cusername, const char *cpassword)
case 0:
**tp->authenticationtype = atnone;
break;
case 1:
**tp->authenticationtype = atlogin; //
break;
};**tp->username = cusername;
**tp->password = cpassword;
setupok = true;
return iret;
}
BCB6中的 Pragma說明(二)
10 pragma hdrstop pragma hdrstop hdrstop pragma用於終止若干個標頭檔案的預編譯,可有效減少預編譯標頭檔案占用的磁碟空間。凡在原始檔中 pragma hdrstop指令之前被引用的標頭檔案都將被預編譯成預編譯標頭檔案。假如乙個標頭檔案同時被多個原始檔引用,...
Delphi7 0自帶Indy 9基礎介紹
indy是阻塞式 blocking 的 當你使用winsock開發網路應用程式時,從socket中讀取資料或者向socket寫入資料都是非同步發生的,這樣就不會阻斷程式中其它 的執行。在收到資料時,winsock會向應用程式傳送相應的訊息。這種訪問方式被稱作非阻塞式連線,它要求你對事件作出響應,設定...
《轉》記錄一些BCB6的使用心得
源 自從2000年開始接觸bcb,使用bcb作程式設計入門學習,一路走來,遇到了不少不大不小的問題。一晃9年過去了,bcb不再陌生,當初為問題困擾時那種手足無措的記憶也漸漸淡了。每念及此,甚有把一些心得寫作文字的緊迫感。鑑於本人技術能力和文字水平之限,一直未能下決心,今天鼓起勇氣做這事,好歹不論,只...