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

int 如何轉換為 列舉(enum)

答題得分者是:Mickey
sams
一般會員


發表:18
回覆:20
積分:12
註冊:2003-04-14

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-03-02 19:37:11 IP:61.66.xxx.xxx 未訂閱
請問各位大大, 設有一個例舉 eXX= (xx001, xx002, xx003) 有一個變數 n= 2 要怎麼做, 才會把 n 回傳成 xx003 謝謝..
Mickey
版主


發表:77
回覆:1882
積分:1390
註冊:2002-12-11

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-03-02 21:05:39 IP:218.32.xxx.xxx 未訂閱
sams 你好:    
uses TypInfo;    procedure TForm1.Button1Click(Sender: TObject);
var v:eXX;
begin
  v := eXX(2);
  showmessage(GetEnumName(TypeInfo(eXX),Ord(v)));
end;
sams
一般會員


發表:18
回覆:20
積分:12
註冊:2003-04-14

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-03-02 21:42:49 IP:61.64.xxx.xxx 未訂閱
var v:eXX; begin   v := eXX(2);       ^^^^^^^^^ 剛才有試過, 確實可以!! 謝謝 Mickey 大大..
系統時間:2024-05-18 14:08:53
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!