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

MEMO 如何輸入 分數,如1/2,要像WORD那種格式,分子在上面,分母在下面。

答題得分者是:pceyes
yxhua240
一般會員


發表:5
回覆:5
積分:2
註冊:2007-12-21

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-12-10 22:09:15 IP:59.60.xxx.xxx 訂閱
MEMO 或其他控件 如何輸入 分數,如1/2,要像WORD那種格式,分子在上面,分母在下面。

或者有其他的辦法,使MEMO裡面的內容導出到WORD裡面時,自動變成分母也可以。

是否可使宏來完成?請教 了!!
P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-12-15 17:22:44 IP:61.67.xxx.xxx 未訂閱
使用 RichEdit 或許可以做到, 因為它支援 rtf 格式, word 也支援
pceyes
尊榮會員


發表:70
回覆:657
積分:1140
註冊:2003-03-13

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-12-15 17:38:57 IP:220.141.xxx.xxx 訂閱
冒昧請教一下,您如何在Word打出這樣的數值呢?
可否教我一下好嗎?
------
努力會更接近成功
taishyang
站務副站長


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

發送簡訊給我
#4 引用回覆 回覆 發表時間:2008-12-15 18:23:52 IP:118.169.xxx.xxx 訂閱
前輩要先安裝方程式編輯器
http://yes.nctu.edu.tw/Lecture/PC/Office/Word/Tutor/Tool/EquationSetup/index.htm



===================引 用 pceyes 文 章===================
冒昧請教一下,您如何在Word打出這樣的數值呢?
可否教我一下好嗎?
pceyes
尊榮會員


發表:70
回覆:657
積分:1140
註冊:2003-03-13

發送簡訊給我
#5 引用回覆 回覆 發表時間:2008-12-15 22:22:38 IP:220.141.xxx.xxx 訂閱
謝謝版主,正在安裝中,請不要叫我前輩,人家問問題,還反問人家問題,這樣我很難為情的!
===================引 用 taishyang 文 章===================
前輩要先安裝方程式編輯器
http://yes.nctu.edu.tw/Lecture/PC/Office/Word/Tutor/Tool/EquationSetup/index.htm



===================引 用 pceyes 文 章===================
冒昧請教一下,您如何在Word打出這樣的數值呢?
可否教我一下好嗎?
------
努力會更接近成功
編輯記錄
pceyes 重新編輯於 2008-12-15 22:23:59, 註解 無‧
pceyes 重新編輯於 2008-12-15 23:28:28, 註解 無‧
pceyes
尊榮會員


發表:70
回覆:657
積分:1140
註冊:2003-03-13

發送簡訊給我
#6 引用回覆 回覆 發表時間:2008-12-15 23:32:29 IP:220.141.xxx.xxx 訂閱
我試過了,RichEdit1是不能放Microsoft Equation Editor物件的,運氣好的是在Word中的插入功能變數有一個項目叫{EQ},然後用錄製巨集插入{EQ}就變成下面的東東了。
[code delphi]
procedure TForm1.Button69Click(Sender: TObject);
var
_type, _Text , _PreserveFormatting : OleVariant;
begin
_type := $FFFFFFFF; // wdfieldempty
_text:= 'EQ \F(1,2)';
_preserveformatting:=false;
// wordapp = wordapplication1
wordapp.Selection.Fields.Add(wordapplication1.Selection.range,_type,_text,_preserveformatting);
end;

[/code]
------
努力會更接近成功
編輯記錄
pceyes 重新編輯於 2008-12-15 23:33:35, 註解 無‧
yxhua240
一般會員


發表:5
回覆:5
積分:2
註冊:2007-12-21

發送簡訊給我
#7 引用回覆 回覆 發表時間:2008-12-16 20:49:04 IP:222.77.xxx.xxx 訂閱
感謝,我想你的方法應該是正確的!RichEdit1试过不行。明天 试下·谢谢!!
===================引 用 pceyes 文 章===================
我試過了,RichEdit1是不能放Microsoft Equation Editor物件的,運氣好的是在Word中的插入功能變數有一個項目叫{EQ},然後用錄製巨集插入{EQ}就變成下面的東東了。
[code delphi]
procedure TForm1.Button69Click(Sender: TObject);
var
_type, _Text , _PreserveFormatting : OleVariant;
begin
_type := $FFFFFFFF; // wdfieldempty
_text:= 'EQ \F(1,2)';
_preserveformatting:=false;
// wordapp = wordapplication1
wordapp.Selection.Fields.Add(wordapplication1.Selection.range,_type,_text,_preserveformatting);
end;

[/code]
系統時間:2024-03-29 0:53:03
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!