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

自動搜尋點並要不可以存為.txt,但是自己用手KEYIN可以存成.txt

尚未結案
barryHsu
一般會員


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

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-06-24 22:51:14 IP:163.18.xxx.xxx 未訂閱
我現在有一張影像,我利用二值化的方式將點找出來,並且要填入EDIT裡面,而這些動作都是自動存入EDIT,但是不可以存檔,假如我用KEYIN進去EDIT裡面可以將擋案儲存起來,之後我有用ShowMessage()這個指令去測試我所要存的EDIT,都可以順利的得到其值,所以可以證明程式應該有跑到存檔的指令下,假如是這種情形的話,不知各位有何見解可以提供給小弟。以下這些是我的程式的一小部份。  
 
int R1X,R1Y,R1U,R1V,R2X,R2Y,R2U,R2V,R3X,R3Y,R3U,R3V,R4X,R4Y,R4U,R4V; FILE *filestream; char str[10]; //欲暫存之字元陣列 if(RadioButton1->Checked==true) { R1X=StrToInt(Edit2->Text); R1Y=StrToInt(Edit3->Text); R1U=StrToInt(Edit4->Text); R1V=StrToInt(Edit5->Text); R2X=StrToInt(Edit6->Text); R2Y=StrToInt(Edit7->Text); R2U=StrToInt(Edit8->Text); R2V=StrToInt(Edit9->Text); filestream = fopen("WCSandICS.txt", "w "); itoa(R1X, str, 10); //將整數轉換為字元 fwrite(str, sizeof(char), 3, filestream); //寫入檔案str為字元的記憶體位置,sizeof(char)為char的大小 //3為每次寫入3個char filestream為資料流 fwrite("\n",sizeof(char),1,filestream); //換行 ShowMessage(R1X); itoa(R1Y, str, 10); //把j轉成字元 fwrite(str, sizeof(char), 3, filestream); //寫入 fwrite("\n",sizeof(char),1,filestream); itoa(R1U, str, 10); //把j轉成字元 fwrite(str, sizeof(char), 3, filestream); //寫入 fwrite("\n",sizeof(char),1,filestream); itoa(R1V, str, 10); //把j轉成字元 fwrite(str, sizeof(char), 3, filestream); //寫入 fwrite("\n",sizeof(char),1,filestream); itoa(R2X, str, 10); //將整數轉換為字元 fwrite(str, sizeof(char), 3, filestream); //寫入檔案str為字元的記憶體位置,sizeof(char)為char的大小 //3為每次寫入3個char filestream為資料流 fwrite("\n",sizeof(char),1,filestream); //換行 itoa(R2Y, str, 10); //把j轉成字元 fwrite(str, sizeof(char), 3, filestream); //寫入 fwrite("\n",sizeof(char),1,filestream); itoa(R2U, str, 10); //把j轉成字元 fwrite(str, sizeof(char), 3, filestream); //寫入 fwrite("\n",sizeof(char),1,filestream); itoa(R2V, str, 10); //把j轉成字元 fwrite(str, sizeof(char), 3, filestream); //寫入 fwrite("\n",sizeof(char),1,filestream); itoa(R2V, str, 10); Edit10->Text=""; Edit11->Text=""; Edit12->Text=""; Edit13->Text=""; Edit14->Text=""; Edit15->Text=""; Edit16->Text=""; Edit17->Text=""; fclose(filestream); }
 
andychang1690
資深會員


發表:20
回覆:694
積分:442
註冊:2003-03-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-06-26 03:55:00 IP:221.169.xxx.xxx 未訂閱
barryHsu:利用EDIT的Hint如何?
利用二值化的方式將點找出來,並且要填入EDIT裡面
EDIT->Hint=EDIT->Text
如此人工KeyIn值Edit->Text一定不等於Edit->Hint存檔 
存檔後清空EDIT也一起清空Hint
請參考!
Andy Chang
------
Andy Chang
taishyang
站務副站長


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

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-06-27 09:51:38 IP:210.68.xxx.xxx 未訂閱
barryHsu您好: 已經不是第一次提醒您囉    PO程式碼的方式請參考版規說明,煩請修改謝謝您的配合 >
barryHsu
一般會員


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

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-06-27 13:26:11 IP:163.18.xxx.xxx 未訂閱
andychang1690:你說的是不是將Edit->Text換成Edit->Hint 例如:R1X=StrToInt(Edit2->Hint); 我有試過,CONPILER可以過去,但是當我在存檔的時候就發生錯誤了,不知是否我的程式有錯誤呢??我寫的程式之前有波過了不知有沒有要加以修改的呢???
taishyang
站務副站長


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

發送簡訊給我
#5 引用回覆 回覆 發表時間:2005-06-27 13:49:45 IP:210.68.xxx.xxx 未訂閱
barryHsu您好: 煩請修改PO程式碼的方式,否則此討論串將會被刪除
barryHsu
一般會員


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

發送簡訊給我
#6 引用回覆 回覆 發表時間:2005-06-27 15:23:25 IP:163.18.xxx.xxx 未訂閱
taishyang您好: 我有按照您說的方式寫的 先用code 程式碼 code 我在波程式是這樣用的 這個程序對嗎???
taishyang
站務副站長


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

發送簡訊給我
#7 引用回覆 回覆 發表時間:2005-06-27 15:39:16 IP:210.68.xxx.xxx 未訂閱
您好:  
引言:我在波程式是這樣用的 這個程序對嗎???
請您再仔細看一下版規說明 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=58991
andychang1690
資深會員


發表:20
回覆:694
積分:442
註冊:2003-03-14

發送簡訊給我
#8 引用回覆 回覆 發表時間:2005-06-27 15:47:03 IP:221.169.xxx.xxx 未訂閱
引言: andychang1690:你說的是不是將Edit->Text換成Edit->Hint 例如:R1X=StrToInt(Edit2->Hint); 我有試過,CONPILER可以過去,但是當我在存檔的時候就發生錯誤了,不知是否我的程式有錯誤呢??我寫的程式之前有波過了不知有沒有要加以修改的呢???
barryHsu:首先是〔code〕你的程式〔/code〕
請將以上全型改半型。
看起來你誤會我的意思了!我是說你程式一樣執行只是
我現在有一張影像,我利用二值化的方式將點找出來,並且要填入EDIT裡面,而這些動作都是自動存入EDIT
多加入
Edit2->Hint=Edit2->Text;
...
Edit9->Hint=Edit9->Text;
過程中若User改變Edit->Text內容一定不會與Edit->Hint內容一樣!
是否存檔時只要比對
if (Edit2->Hint!=Edit2->Text || ... || Edit9->Hint!=Edit9->Text) {
  //使用者有修改過資料
}
else
  //使用者沒修改過資料-->>存檔
P.S.如果你是比對整數可以利用Tag!配合UpDown元件也很好用!
請參考!
Andy Chang
------
Andy Chang
barryHsu
一般會員


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

發送簡訊給我
#9 引用回覆 回覆 發表時間:2005-06-27 19:16:09 IP:163.18.xxx.xxx 未訂閱
taishyang您好: 波一次看看你覺得對不對,順便我也問一下我的問題,假如在不對的話我在修改。 andychang1690您好我有按照你說的方式寫了,但是還是不可以存檔,我在波我修改過的程式你在幫我看一下對不對。  
int R1X,R1Y,R1U,R1V,R2X,R2Y,R2U,R2V,R3X,R3Y,R3U,R3V,R4X,R4Y,R4U,R4V;
   FILE *filestream;
   char str[10];   //欲暫存之字元陣列
 if(RadioButton1->Checked==true)
   {
   Edit2->Hint=Edit2->Text;
   Edit3->Hint=Edit3->Text;
   Edit4->Hint=Edit4->Text;
   Edit5->Hint=Edit5->Text;
   Edit6->Hint=Edit6->Text;
   Edit7->Hint=Edit7->Text;
   Edit8->Hint=Edit8->Text;
   Edit9->Hint=Edit9->Text;
   R1X=StrToInt(Edit2->Text);
   R1Y=StrToInt(Edit3->Text);
   R1U=StrToInt(Edit4->Text);
   R1V=StrToInt(Edit5->Text);
   R2X=StrToInt(Edit6->Text);
   R2Y=StrToInt(Edit7->Text);
   R2U=StrToInt(Edit8->Text);
   R2V=StrToInt(Edit9->Text);       filestream = fopen("WCSandICS.txt", "w ");
   itoa(R1X, str, 10); //將整數轉換為字元
   fwrite(str, sizeof(char), 3, filestream);    //寫入檔案str為字元的記憶體位置,sizeof(char)為char的大小
                                                //3為每次寫入3個char filestream為資料流       fwrite("\n",sizeof(char),1,filestream);      //換行
   itoa(R1Y, str, 10);                            //把j轉成字元
   fwrite(str, sizeof(char), 3, filestream);    //寫入
   fwrite("\n",sizeof(char),1,filestream);
   itoa(R1U, str, 10);                            //把j轉成字元
   fwrite(str, sizeof(char), 3, filestream);    //寫入
   fwrite("\n",sizeof(char),1,filestream);
   itoa(R1V, str, 10);                            //把j轉成字元
   fwrite(str, sizeof(char), 3, filestream);    //寫入
   fwrite("\n",sizeof(char),1,filestream);
   itoa(R2X, str, 10); //將整數轉換為字元
   fwrite(str, sizeof(char), 3, filestream);    //寫入檔案str為字元的記憶體位置,sizeof(char)為char的大小
                                                //3為每次寫入3個char filestream為資料流
   fwrite("\n",sizeof(char),1,filestream);      //換行
   itoa(R2Y, str, 10);                            //把j轉成字元
   fwrite(str, sizeof(char), 3, filestream);    //寫入
   fwrite("\n",sizeof(char),1,filestream);
   itoa(R2U, str, 10);                            //把j轉成字元
   fwrite(str, sizeof(char), 3, filestream);    //寫入
   fwrite("\n",sizeof(char),1,filestream);
   itoa(R2V, str, 10);                            //把j轉成字元
   fwrite(str, sizeof(char), 3, filestream);    //寫入
   fwrite("\n",sizeof(char),1,filestream);
   itoa(R2V, str, 10);
   Edit10->Text="";
   Edit11->Text="";
   Edit12->Text="";
   Edit13->Text="";
   Edit14->Text="";
   Edit15->Text="";
   Edit16->Text="";
   Edit17->Text="";
   fclose(filestream);
   } 
andychang1690
資深會員


發表:20
回覆:694
積分:442
註冊:2003-03-14

發送簡訊給我
#10 引用回覆 回覆 發表時間:2005-06-27 21:53:14 IP:221.169.xxx.xxx 未訂閱
barryHsu:我可以存檔啊! 只是你的.............. 記著文字轉數字最好使用 IntToStrDef(Edit2->Text,0);//文字無法轉數字轉為內定值0 請參考! Andy Chang 發表人 - andychang1690 於 2005/06/27 21:54:15
------
Andy Chang
barryHsu
一般會員


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

發送簡訊給我
#11 引用回覆 回覆 發表時間:2005-06-27 21:57:57 IP:163.18.xxx.xxx 未訂閱
andychang1690您好: 我有解決我的問題了,只是我給他是絕對路徑。 我在存檔的前面給他路徑的話就可以存檔了。 也謝謝你給我的幫助...讓我受益良多...也多學會了Hint這個指令...
系統時間:2024-05-05 17:16:46
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!