用NMSMTP原件,如何把字串丟到 body 裡? |
答題得分者是:christie
|
joana
一般會員 發表:35 回覆:70 積分:21 註冊:2005-09-02 發送簡訊給我 |
|
christie
資深會員 發表:30 回覆:299 積分:475 註冊:2005-03-25 發送簡訊給我 |
var
ssl:TStringList; begin ssl:=TStringList.Create; ssl.Add('某某客戶您好'); //ssl.LoadFromFile('c:test'); NMSMTP1.PostMessage.Body:=ssl; ssl.Free; end; ===================引 用 joana 文 章=================== 請問各位大德,我想把一串字串如 '某某客戶您好',直接丟到 PostMessage的body 裡,不要再 透過 memo 或 RichEdit ,請問程式碼要如何寫? 我是用 delphi5 底下是我透過RichEdit 的程式碼,如要直接丟字串,程式碼要如何寫? 程式碼NMSMTP1.PostMessage .Body.Assign (RichEdit1.lines) 謝謝幫忙!
------
What do we live for if not to make life less difficult for each other?
編輯記錄
christie 重新編輯於 2007-10-16 12:24:24, 註解 無‧
|
joana
一般會員 發表:35 回覆:70 積分:21 註冊:2005-09-02 發送簡訊給我 |
|
christie
資深會員 發表:30 回覆:299 積分:475 註冊:2005-03-25 發送簡訊給我 |
Try
NMSMTP1.Connect; Except on E: Exception do ; End;{試試看} ===================引 用 joana 文 章=================== 謝謝Christie的回覆,可否再請教一個問題 當 NMSMTP1 Connect 不上時,要如何讓user 知道沒有連上線 用下面的程式,當跑到 NMSMTP1.Connect 時,如果沒連上線,整個程式就動彈不得,死當了 if not NMSMTP1.Connected then NMSMTP1.Connect else NMSMTP1.Disconnect 不好意思,請再幫幫忙,謝謝!
------
What do we live for if not to make life less difficult for each other? |
joana
一般會員 發表:35 回覆:70 積分:21 註冊:2005-09-02 發送簡訊給我 |
|
christie
資深會員 發表:30 回覆:299 積分:475 註冊:2005-03-25 發送簡訊給我 |
|
agogorz
初階會員 發表:9 回覆:34 積分:28 註冊:2005-04-09 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |