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

如何顯示特殊符號?

答題得分者是:hipig
brook
資深會員


發表:57
回覆:323
積分:371
註冊:2002-07-12

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-03-06 13:52:34 IP:118.168.xxx.xxx 訂閱
我要顯示 ¼ ½ ¾
但顯示出來確會變成3個問號該如何處理?
[code cpp]
請在此區域輸入程式碼
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Canvas->Font->Charset = CHINESEBIG5_CHARSET;
Canvas->Font->Name = "細明體";
Canvas->TextOutA(100,100,"¼½¾");
//此3個符號從word->插入->符號->字型選細明體->在符號表的正中間附近可以找到.
}
[/code]
編輯記錄
brook 重新編輯於 2008-03-06 13:55:59, 註解 無‧
brook 重新編輯於 2008-03-06 13:57:43, 註解 無‧
hipig
高階會員


發表:31
回覆:75
積分:111
註冊:2007-01-15

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-03-06 14:28:11 IP:140.126.xxx.xxx 未訂閱
我顯示很正常
你要不要換個字型看看

[code cpp]
//Canvas->Font->Charset = CHINESEBIG5_CHARSET;
Canvas->Font->Name = "Arial Unicode MS";
Canvas->Font->Size = 46;
Canvas->TextOutA(700,700,"¼½¾");

[/code]

===================引 用 brook 文 章===================
我要顯示
但顯示出來確會變成3個問號該如何處理?
[code cpp]
請在此區域輸入程式碼
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Canvas->Font->Charset = CHINESEBIG5_CHARSET;
Canvas->Font->Name = "細明體";
Canvas->TextOutA(100,100,"");
//此3個符號從word->插入->符號->字型選細明體->在符號表的正中間附近可以找到.
}
[/code]
brook
資深會員


發表:57
回覆:323
積分:371
註冊:2002-07-12

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-03-06 16:23:30 IP:118.168.xxx.xxx 訂閱
感謝hipig大大幫我測試,不過我用你的方法也是一樣吔,不知是不是版本的問題?我的環境是xp和bcb5,不知您的環境是什麼?
hipig
高階會員


發表:31
回覆:75
積分:111
註冊:2007-01-15

發送簡訊給我
#4 引用回覆 回覆 發表時間:2008-03-06 17:36:39 IP:140.126.xxx.xxx 未訂閱
windows2000+BCB6
其實比較建議如果有特殊符號都利用可以處理unicode來處理就是了
這樣轉移其他不同作業系統版本使用者也比較不容易出錯
我以前寫作業有關方程式的部份則是利用圖片來代替顯示
===================引 用 brook 文 章===================
感謝hipig大大幫我測試,不過我用你的方法也是一樣吔,不知是不是版本的問題?我的環境是xp和bcb5,不知您的環境是什麼?
brook
資深會員


發表:57
回覆:323
積分:371
註冊:2002-07-12

發送簡訊給我
#5 引用回覆 回覆 發表時間:2008-03-08 13:30:41 IP:118.168.xxx.xxx 訂閱
我測出來了.
1.不能直接用WORD的特殊字元直接複製貼上.
2.不能一次show三個字,需分開處理.
3.內碼為0xBC,0xBD,0xBE.


[code cpp]
請在此區域輸入程式碼
void __fastcall TForm1::Button1Click(TObject *Sender)
{
char s[2];
s[0] = 0xBC;
s[1] = 0x00;
Canvas->Font->Charset = 1;
Canvas->Font->Height = 20;
Canvas->TextOutA(0,100,s);
s[0] ;
Canvas->TextOutA(0,150,s);
s[0] ;
Canvas->TextOutA(0,200,s);
}
[/code]
系統時間:2024-03-29 2:25:38
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!