關於TLebeledEdit (取值存檔) |
|
答題得分者是：RaynorPao
|
|
e_snare
一般會員   發表：26 回覆：35 積分：12 註冊：2004-03-14 發送簡訊給我 |
|
|
RaynorPao
版主   發表：139 回覆：3622 積分：7025 註冊：2002-08-12 發送簡訊給我 |
引言: 如果我有五個LebeledEdit欄位, 如何把在五個欄位所輸入的資料取出轉成hex存成文字檔 並可以開檔叫出在欄位上顯示?? 可否請用兩個欄位來做示範給我看! 還有就是LebeledEdit好像不適用LebeledEdit1->Text->Lines->SaveTo.... 那是要怎麼存檔?? 謝謝大家
e_snare 你好:
(1)因為你並沒有說明在 TLabeledEdit 填入的資料是什麼？因此，我假設你填
入的資料都是整數
(2)可以利用 TStringList 來達到讀取/寫入檔案的目的，請參考以下的範例程
式碼
// 寫入檔案
TStringList *sl1=new TStringList;
sl1->Add(IntToHex(StrToInt(LabeledEdit1->Text), 8));
sl1->Add(IntToHex(StrToInt(LabeledEdit2->Text), 8));
sl1->SaveToFile("test.txt");
delete sl1; // 讀取檔案
TStringList *sl2=new TStringList;
sl2->LoadFromFile("test.txt");
LabeledEdit1->Text=IntToStr(StrToInt("0x"+sl2->Strings[0]));
LabeledEdit2->Text=IntToStr(StrToInt("0x"+sl2->Strings[1]));
delete sl2;
(3)請再依照自己的需求，自行修改
------
-- 若您已經得到滿意的答覆，請適時結案!! -- -- 欲知前世因，今生受者是；欲知來世果，今生做者是 -- -- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 -- |
|
e_snare
一般會員 發表：26 回覆：35 積分：12 註冊：2004-03-14 發送簡訊給我 |
發表時間：2004-03-14 15:13:25
IP:211.74.xxx.xxx 未訂閱
系統時間：2024-05-19 5:58:48
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |