有關於mail |
|
尚未結案
|
|
lia12345kimo
一般會員   發表：5 回覆：3 積分：1 註冊：2004-08-16 發送簡訊給我 |
|
|
allenchan
資深會員  發表：10 回覆：306 積分：283 註冊：2004-01-06 發送簡訊給我 |
你可以利用 TCppWebBrowser 來顯示 Html，作法參考下列程式碼：
#include "mshtml.h" void __fastcall TForm1::Button1Click(TObject *Sender)
{
IHTMLDocument2 *HTMLDocument = NULL;
VARIANT *param;
SAFEARRAY *sfArray; CppWebBrowser1->Navigate(WideString("about:blank"));
if(SUCCEEDED(CppWebBrowser1->Document->QueryInterface(IID_IHTMLDocument2,
(LPVOID*)&HTMLDocument)))
{
sfArray = SafeArrayCreateVector(VT_VARIANT, 0, 1); if (sfArray == NULL)
{
HTMLDocument->Release();
return;
} SafeArrayAccessData(sfArray,(LPVOID*) ¶m);
// sHtml 換成你 Body 的 html 內容
AnsiString sHtml = "<html><body>hello world</body></html>"; param->vt = VT_BSTR;
WideString ws = sHtml;
param->bstrVal = ws.c_bstr();
SafeArrayUnaccessData(sfArray); HTMLDocument->write(sfArray);
HTMLDocument->close(); SafeArrayDestroy(sfArray);
} delete ssHtml;
}
發表人 - allenchan 於 2004/11/25 00:59:24
|
|
lia12345kimo
一般會員 發表：5 回覆：3 積分：1 註冊：2004-08-16 發送簡訊給我 |
|
|
allenchan
資深會員 發表：10 回覆：306 積分：283 註冊：2004-01-06 發送簡訊給我 |
|
|
Blueberrug
一般會員 發表：14 回覆：50 積分：17 註冊：2005-05-22 發送簡訊給我 |
|
|
Ktop_Robot
站務副站長 發表：0 回覆：3511 積分：0 註冊：2007-04-17 發送簡訊給我 |
發表時間：2004-11-24 22:16:58
IP:218.32.xxx.xxx 未訂閱
系統時間：2024-04-25 20:34:06
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |