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

如何將edit的數值存入到.txt裡面...

尚未結案
barryHsu
一般會員


發表:55
回覆:49
積分:20
註冊:2005-01-25

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-02-23 12:08:04 IP:163.18.xxx.xxx 未訂閱
我利用MouseDown的功能,取得座標系統,但是現在必須將得到的edit的值存入到.txt檔裡面,我現在有寫了存檔的動作,但是執行出來怪怪的,以下是我寫的程式碼。  
 
void __fastcall TForm1::Button6Click(TObject *Sender) { //取得滑鼠目前的目標 TPoint P; GetCursorPos(&P); P = ScreenToClient(P); Caption = IntToStr(P.x) " : " IntToStr(P.y); EdtX1->Text=IntToStr(P.x); EdtY1->Text=IntToStr(P.y); } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { int i; filestream = fopen("c:\\abc.txt", "w "); //開啟檔案名稱 w 為輸入模式 無檔案會建立檔案或 覆蓋 EdtX1->Text=i;//欲存入之整數 char str[5]; //欲暫存之字元陣列 itoa(i, str, 10); //將整數轉換為字元 fwrite(str, sizeof(char), 3, filestream); //寫入檔案str為字元的記憶體位置,sizeof(char)為char的大小 //3為每次寫入3個char filestream為資料流 fclose(filestream); //關閉檔案 EdtX1與EdtY1是所得到的值,而現在要將這兩個值存到.txt裡面...
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-02-23 12:41:50 IP:210.68.xxx.xxx 未訂閱
您好: 您的 i 值並不是由EdtX1提供,所以結果是錯誤的
nlj859
資深會員


發表:139
回覆:375
積分:322
註冊:2004-03-20

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-02-23 12:56:54 IP:163.28.xxx.xxx 未訂閱
Hello barryHsu,    底下為正確的code
#include 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
int i;
FILE *filestream;
filestream = fopen("c:\\abc.txt", "w "); //開啟檔案名稱 w 為輸入模式 無檔案會建立檔案或 覆蓋
i=StrToInt(EdtX1->Text);//欲存入之整數
char str[5]; //欲暫存之字元陣列
itoa(i, str, 10); //將整數轉換為字元
fwrite(str,sizeof(char),3,filestream);
fclose(filestream);
}
紅字為改正的部份. 發表人 - nlj859 於 2005/02/23 12:58:20
barryHsu
一般會員


發表:55
回覆:49
積分:20
註冊:2005-01-25

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-02-23 13:32:14 IP:163.18.xxx.xxx 未訂閱
Hello taishyang,nlj859: 因為我現在有兩個EDIT必須存在同意各.txt檔裡面,這樣子的話,我可以寫成  
 
#include void __fastcall TForm1::Button2Click(TObject *Sender) { int i; FILE *filestream; filestream = fopen("c:\\abc.txt", "w "); //開啟檔案名稱 w 為輸入模式 無檔案會建立檔案或 覆蓋 i=StrToInt(EdtX1->Text);//欲存入之整數 j=StrToInt(EdtY1->Text); char str[5]; //欲暫存之字元陣列 itoa(i, str, 10); //將整數轉換為字元 itoa(i, str, 10); fwrite(str,sizeof(char),3,filestream); fclose(filestream); } 因為我必須再從MATLAB讀所存成的.txt檔
系統時間:2024-05-13 0:11:26
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!