RichEdit處理問題 |
|
尚未結案
|
|
auslk
初階會員   發表：35 回覆：77 積分：32 註冊：2003-02-17 發送簡訊給我 |
|
|
Just4U
初階會員 發表：38 回覆：56 積分：28 註冊：2002-03-27 發送簡訊給我 |
RichEdit1->Lines->LoadFromFile("t1.txt");
RichEdit2->Lines->LoadFromFile("t2.txt"); for(int cnt=0; cnt 用一行一行從RichEdit2加到RichEdit1, 笨笨的方法, 大大覺得OK嗎? ===================引 用 auslk 文 章=================== Dear All, 小弟這裡有一個小問題: [[問題]]]多個文字檔,想要合併成一個文字檔,遇到問題就是RichEdit使用部分 以下是步驟敘述: 1.file1->RichEdit1 2.file2->RichEdit2 3.要怎麼合併以上兩個RichEdit <~~~問題點 以上 希望各位先賢前輩指點小弟 謝謝! |
|
anyone
中階會員 發表：1 回覆：63 積分：52 註冊：2007-02-12 發送簡訊給我 |
試試以下,我試過可以
<textarea class="delphi" rows="10" cols="60" name="code">procedure TForm1.Button1Click(Sender: TObject); var str:TStrings; begin str:=RichEdit1.Lines; str.CommaText:=str.CommaText RichEdit2.Lines.CommaText; end; </textarea> RichEdit1就變成兩者的合併 ===================引 用 auslk 文 章=================== Dear All, 小弟這裡有一個小問題: [[問題]]]多個文字檔,想要合併成一個文字檔,遇到問題就是RichEdit使用部分 以下是步驟敘述: 1.file1->RichEdit1 2.file2->RichEdit2 3.要怎麼合併以上兩個RichEdit <~~~問題點 以上 希望各位先賢前輩指點小弟 謝謝! |
|
Just4U
初階會員 發表：38 回覆：56 積分：28 註冊：2002-03-27 發送簡訊給我 |
我試了一下, anyone 大大的方式可行, 改成BCB如下
RichEdit1->Lines->LoadFromFile("t1.txt"); RichEdit2->Lines->LoadFromFile("t2.txt"); RichEdit1->Lines->CommaText = RichEdit1->Lines->CommaText '\n' RichEdit2->Lines->CommaText; ===================引 用 anyone 文 章=================== 試試以下,我試過可以 ?<textarea class="delphi" rows="10" cols="60" name="code">procedure TForm1.Button1Click(Sender: TObject); var str:TStrings; begin str:=RichEdit1.Lines; str.CommaText:=str.CommaText RichEdit2.Lines.CommaText; end; </textarea> |
發表時間：2006-08-01 13:31:24
IP:61.222.xxx.xxx 訂閱
系統時間：2024-05-04 19:17:24
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |