請教各位高手有沒有較好的方法來過濾一篇文章中的字串? 條件1. 有大小寫英文字母及數字 2.字串是全部為數字的保留,其餘就刪掉. 所以底下的A文章就會變成B文章的內容: A: --------------------------------------------- 123abc 168 fff!FFF   HHHH?H 12S3456ABB EEE 345 VVVVV 888 W456 233 VVVVWWW ---------------------------------------------- B: ---------------------------------------------- 123abc 168 12S3456ABB   345  888 W456 233     ---------------------------------------------- 有寫一下程式: 文章叫入到ListBox1,以space為區隔字串的依据處理好存入ListBox2 但還沒有判斷字母a~z,A~Z,0~9; 是否有好一點的方法指點指點...    String  str,stradd[122]; char *chars; char chartostr[1024]; int linenum1,linenum2,position,length,flag,num; ListBox1->Items->LoadFromFile(b_file.c_str()); ListBox2->Items->LoadFromFile(Path); linenum1=ListBox1->Items->Count;    for(int i=0;iItems->Strings[i].Length(); for(int ii=0; iItems->Strings[i].SubString(ii,1)!=" ") { stradd[ii] ListBox1->Items->Strings[i].SubString(ii,1); flag=0; } else{ if(ListBox1->Items->Strings[i].SubString(ii,1)!= ListBox1->Items->Strings[i].SubString(ii-1,1)) {flag=1; num ;} } } str=stradd[i] " " stradd[i 1]; ListBox2->Items->Add(str);

引言: 請教各位高手有沒有較好的方法來過濾一篇文章中的字串? 條件1. 有大小寫英文字母及數字 2.字串是全部為數字的保留,其餘就刪掉. 所以底下的A文章就會變成B文章的內容: A: --------------------------------------------- 123abc 168 fff!FFF HHHH?H 12S3456ABB EEE 345 VVVVV 888 W456 233 VVVVWWW ---------------------------------------------- B: ---------------------------------------------- 123abc 168 12S3456ABB 345 888 W456 233 ---------------------------------------------- 有寫一下程式: 文章叫入到ListBox1,以space為區隔字串的依据處理好存入ListBox2 但還沒有判斷字母a~z,A~Z,0~9; 是否有好一點的方法指點指點... String str,stradd[122]; char *chars; char chartostr[1024]; int linenum1,linenum2,position,length,flag,num; ListBox1->Items->LoadFromFile(b_file.c_str()); ListBox2->Items->LoadFromFile(Path); linenum1=ListBox1->Items->Count; for(int i=0;iItems->Strings[i].Length(); for(int ii=0; iItems->Strings[i].SubString(ii,1)!=" ") { stradd[ii]+ListBox1->Items->Strings[i].SubString(ii,1); flag=0; } else{ if(ListBox1->Items->Strings[i].SubString(ii,1)!= ListBox1->Items->Strings[i].SubString(ii-1,1)) {flag=1; num++;} } } str=stradd[i]+" "+stradd[i+1]; ListBox2->Items->Add(str);

111111dd 你好: 試試看這樣子寫行不行呢?? (請再依自己的需求做修改) < class="code"> int i=0; for(i=0; iItems->Count; i++) { AnsiString sz1=StringReplace(ListBox1->Items->Strings[i], " ", ",", TReplaceFlags()<CommaText=sz1; int j=0; while(jCount) { if(sl->Strings[j]=="") { sl->Delete(j); } else { bool bNumeric=false; bool bLower=false; bool bUpper=false; bool bDelete=false; int k=0; for(k=0; kStrings[j].Length(); k++) { if(sl->Strings[j][k+1]>='0' && sl->Strings[j][k+1]<='9') { bNumeric=true; } else if(sl->Strings[j][k+1]>='a' && sl->Strings[j][k+1]<='z') { bLower=true; } else if(sl->Strings[j][k+1]>='A' && sl->Strings[j][k+1]<='Z') { bUpper=true; } else { bDelete=true; } } if(!bDelete && bNumeric) { j++; } else { sl->Delete(j); } } } AnsiString sz2=""; int l=0; for(l=0; lCount; l++) { sz2+=sl->Strings[l]+" "; } ListBox1->Items->Strings[i]=sz2; delete sl; } -- Enjoy Researching & Developing --

RaynorPao您是直接用字串處理,if(sl->Strings[j][k 1]>='a' && sl->Strings[j][k 1]<='z') 也省很多程式碼,好耶. 感謝高手了.

111111dd您好: 抱歉,若要PO程式碼時,請參考下面連結讓code比較容易閱讀喔 < href="http://delphi.ktop.com.tw/topic.php?TOPIC_ID=41948">http://delphi.ktop.com.tw/topic.php?TOPIC_ID=41948 順心