全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1394
推到 Plurk!
推到 Facebook!

如何將資料比對後在合併

缺席
mirood
一般會員


發表:10
回覆:27
積分:7
註冊:2007-02-28

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-03-09 10:56:48 IP:203.160.xxx.xxx 訂閱
各位大大:
小弟已經可以將程式比對出來,
但是卻苦無不能將比對出的資料,
跟想取出不符合比對的一些結果合併,
希望能有哪位大大,
可以提供給我一些意見!謝謝!
檔案型態如下:


我的程式如下:
<textarea class="cpp" rows="10" cols="60" name="code"> OpenDialog1->DefaultExt = ".txt"; OpenDialog1->Filter = "test (*.txt)|*.txt"; OpenDialog1->Options << ofOverwritePrompt << ofFileMustExist; int i; if (OpenDialog1->Execute()) { TStringList *Tempfile=new TStringList; Tempfile->LoadFromFile(OpenDialog1->FileName); i=Tempfile->Count; String c; String d; String f; String a,b,e; //..................資料比對........................... for(i=0;iCount;i ) { if(i>=0) { f=Tempfile->Strings[i]; if(i>=2) { a=Tempfile->Strings[i]; b=Tempfile->Strings[i-2]; int x=AnsiCompareText(a,b); if(x==0) //字串比對 { c=Tempfile->Strings[i-1];//比對相同的第二筆資料 Memo1->Lines->Add(c); if(i>=3) { d=Tempfile->Strings[i-3];//比對相同的的第一筆資料 Memo2->Lines->Add(d); } } } } } delete Tempfile; } } </textarea>
系統時間:2024-05-01 3:55:12
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!