線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:843
推到 Plurk!
推到 Facebook!

請問如何加入指定條件

答題得分者是:artist1002
rolen
一般會員


發表:4
回覆:5
積分:1
註冊:2003-10-07

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-06-20 03:58:09 IP:210.64.xxx.xxx 未訂閱
請問我如果要將我從原始檔中所擷取出來的網址做判別.. 也就是當我所擷取出來的網址中有『.html』的話, 就將它保留,並且加進去Listbox中... 我的程式碼如下: NMHTTP1->Get("http://tw.search.yahoo.com/search/kimo?p=" Edit1->Text); Memo2->Lines->Add(NMHTTP1->Body); AnsiString str = Memo2->Lines->Text; Memo2->Lines->Clear(); while (str.Pos("href=\"") != 0) { str.Delete(1,str.Pos("href=\"") 5); AnsiString s = str.SubString(1,str.Pos("\"")-1); ListBox1->Items->Add(s); } 請問各位先進我要在哪些地方加入什麼判斷式呢? 先謝謝大家看這篇文章囉..
artist1002
高階會員


發表:2
回覆:155
積分:151
註冊:2002-09-26

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-06-25 17:21:04 IP:211.76.xxx.xxx 未訂閱
依照你要判斷網址中有無.html來説的話 請參考下面的修改
NMHTTP1->Get("http://tw.search.yahoo.com/search/kimo?p=" Edit1->Text);
Memo2->Lines->Add(NMHTTP1->Body);    AnsiString str = Memo2->Lines->Text;
Memo2->Lines->Clear();
while (str.Pos("href=\"") != 0) {
str.Delete(1,str.Pos("href=\"") 5);
AnsiString s = str.SubString(1,str.Pos("\"")-1);
if (s.Pos(".html") != 0)
    ListBox1->Items->Add(s);
}    
發表人 - artist1002 於 2004/06/25 17:24:48
系統時間:2024-05-12 7:15:12
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!