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

ExtractStrings 函式,字串分割不判斷 ' 或 " 字元

答題得分者是:老大仔
deanmac85
一般會員


發表:13
回覆:4
積分:3
註冊:2007-05-29

發送簡訊給我
#1 引用回覆 回覆 發表時間:2010-10-08 20:56:47 IP:122.147.xxx.xxx 未訂閱

[code cpp]
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
TStringList *pModuleName = new TStringList ;
TSysCharSet SChars1 = TSysCharSet() << ',' << '$';

AnsiString szModuleText = "A1,B1,C1,D1\',D2$88,GG" ;
ExtractStrings(SChars1, SChars1, szModuleText.c_str(), pModuleName);
int i;
for(i=0;iCount;i )
{
Memo1->Lines->Add(pModuleName->Strings[i]);
}
}
//---------------------------------------------------------------------------

[/code]

執行結果:
A1
B1
C1
D1',D2$88,GG


是否有辦法有效的印出下列 :
A1
B1
C1
D1'
D2
88
GG

因為看起來如果有 ' 字元的話無法解析出來.....
小弟試過使用

pModuleName->CommaText = szModuleText ;

但是看起來只會將 ',' 為分隔,其餘特定字元又不能設分割......
還是有其他方法......
KTOP上已爬文過......沒有我要的.....
希望有人可以幫忙解答,謝謝~



老大仔
尊榮會員


發表:78
回覆:837
積分:1088
註冊:2006-07-06

發送簡訊給我
#2 引用回覆 回覆 發表時間:2010-10-11 14:11:25 IP:59.120.xxx.xxx 未訂閱
假如您不介意的話
請使用: StringReplace
將所有的逗號取代為斷行
這樣應該行的通吧!!??
詳細用法請再麻煩爬個文囉~
系統時間:2024-04-26 3:56:01
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!