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

請問,兩個 string 的轉換函式

尚未結案
BGman
初階會員


發表:28
回覆:85
積分:42
註冊:2003-01-10

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-03-31 16:47:36 IP:211.22.xxx.xxx 未訂閱
目前正在把一段程式碼,由BCB 轉成 Delphi,遭遇到兩個問題。 問題一: if ( !isdigit(Key) ) Key = 0; 在C 中,有一個 isxdigit 函式,可以用來判斷輸入的字元是不是符合十六進制(0~9 、a~f),不知 Delphi 有沒有提供,要 include 哪一個檔案? 問題二: AnsiString temp; sprintf( temp, "%x", Form1->FileSize ); 改成Delphi 我在Help中搜尋string ,可是找不到sprintf 對應的函式 問題三: 在BCB 可以從 AnsiString 找到相關的說明,請問在 Delphi 要用哪一個關鍵字? 謝謝!
ddy
站務副站長


發表:262
回覆:2105
積分:1169
註冊:2002-07-13

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-03-31 17:00:43 IP:61.218.xxx.xxx 未訂閱
一、以我所知是沒有 可自己寫一個 例: FUNCTION isdigit(iStr:string):boolean; var         itmpHex:integer; begin         try       itmpHex:=strtoint(istr);       result:=true;     except       result:=false;     end;    end; procedure TForm1.Button1Click(Sender: TObject); begin      if isdigit('$AQDE') then              ShowMessage('OK')      else              ShowMessage('Error'); end;    二、Format 三、String /AnsiString    
timhuang
尊榮會員


發表:78
回覆:1815
積分:1608
註冊:2002-07-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-03-31 17:10:28 IP:211.76.xxx.xxx 未訂閱
引言: 問題一: if ( !isdigit(Key) ) Key = 0; 在C 中,有一個 isxdigit 函式,可以用來判斷輸入的字元是不是符合十六進制(0~9 、a~f),不知 Delphi 有沒有提供,要 include 哪一個檔案? 問題二: AnsiString temp; sprintf( temp, "%x", Form1->FileSize ); 改成Delphi 我在Help中搜尋string ,可是找不到sprintf 對應的函式 問題三: 在BCB 可以從 AnsiString 找到相關的說明,請問在 Delphi 要用哪一個關鍵字?
1. function IsxDigit(Key: Char): Boolean; begin Result := (((UpperCase(Key) >='A') and (UpperCase(Key) <='F')) or ((Key >='0') and (Key <='9'))); end; 2. 請參考: function Format(const Format: string; const Args: array of const): string; 的用法 3. 在 delphi 中直接使用 string 即可 : AnsiString is the C Builder analog for the Delphi long string type. 還是 ddy 版主的手腳快... 弟還在編輯的時候, ddy 兄早已完成, 真是厲害厲害 發表人 - timhuang 於 2003/03/31 17:13:24
BGman
初階會員


發表:28
回覆:85
積分:42
註冊:2003-01-10

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-04-01 13:51:39 IP:211.22.xxx.xxx 未訂閱
非常感謝二位的幫忙! 看了一下,ddy 的分數高出timhuang 許多 為了鼓勵後起之秀, 我把分數給 timhuang function Format(const Format: string; const Args: array of const):string; 的用法 const Args: array of const ,指的就是集合嗎?還是有其他情形?
timhuang
尊榮會員


發表:78
回覆:1815
積分:1608
註冊:2002-07-15

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-04-01 22:48:29 IP:61.221.xxx.xxx 未訂閱
引言: 非常感謝二位的幫忙! 看了一下,ddy 的分數高出timhuang 許多 為了鼓勵後起之秀, 我把分數給 timhuang function Format(const Format: string; const Args: array of const):string; 的用法 const Args: array of const ,指的就是集合嗎?還是有其他情形?
Hi, 請參考這篇, 應該就可以清楚了!! http://delphi.ktop.com.tw/topic.php?TOPIC_ID=27191
ddy
站務副站長


發表:262
回覆:2105
積分:1169
註冊:2002-07-13

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-04-02 00:49:39 IP:61.59.xxx.xxx 未訂閱
引言:還是 ddy 版主的手腳快... 弟還在編輯的時候, ddy 兄早已完成, 真是厲害厲害
timhuang 沒有啦…其實很直覺的就想怎麼解答(我蠻喜歡用抓異常來判斷結果的:p) 你的方法也蠻不錯,也是我一時之間沒想到的 > < src="http://delphi.ktop.com.tw/loadfile.php?TOPICID=8147403&CC=182217">
系統時間:2024-05-04 8:06:39
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!