這幾天寫了一個小程式...
想要再進一步下去做
程式圖片
http://0rz.tw/j2Y1b
我想要讓下方的RichEdit中出現的網址會自動辨識成網址列
並做成可以超連結的方式!
請問有辦法做到這種功能嗎?
謝謝了
(如果要原始碼的話我再另外傳)
另外這個網址有相關的程式...不過是我看不懂
http://www.wscken.idv.tw/pjblog/article.asp?id=8
如果有人可以幫我改成BCB的話也可以的!
先謝謝各位了!

試過了, 是可以的

[code cpp]
AnsiString s;
InitRichEditURLDetection(RichEdit1);
s = "http://delphi.ktop.com.tw\n";
s = "123123\n";
RichEdit1->Text = s;

void __fastcall TForm1::InitRichEditURLDetection(TRichEdit * RichEdit1)
{
WORD mask;
mask = SendMessage(RichEdit1->Handle, EM_GETEVENTMASK, 0, 0);
SendMessage(RichEdit1->Handle, EM_SETEVENTMASK, 0, (mask | ENM_LINK));
SendMessage(RichEdit1->Handle, EM_AUTOURLDETECT, Integer(True), 0);
}
void __fastcall TForm1::WndProc(TMessage &Msg)
{
if (Msg.Msg == WM_NOTIFY)
{
if (((LPNMHDR)Msg.LParam)->code == EN_LINK )
{
ENLINK* p = (ENLINK *)Msg.LParam;
if (p->msg == WM_LBUTTONDOWN)
{
SendMessage(RichEdit1->Handle, EM_EXSETSEL, 0, (LPARAM)&(p->chrg));
ShellExecute(Handle, "open", RichEdit1->SelText.c_str(), 0, 0, SW_SHOWNORMAL);
}
}
}
TForm::WndProc(Msg);
}
[/code]

------
FPGA驗證, FPGA開發平台, http://smims.com