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

speedbutton的使用問題

答題得分者是:kgt
takdick
一般會員


發表:50
回覆:63
積分:22
註冊:2002-08-05

發送簡訊給我
#1 引用回覆 回覆 發表時間:2002-09-18 18:26:50 IP:203.198.xxx.xxx 未訂閱
我在程序中使用speedbutton,設flat:=true;透明. 當我按下speedbutton1後,會出現邊框,呈凹下去的形狀,我想在speedbutton2按下時,speedbutton1的邊框消失,回復原狀,該如何??
huwk
資深會員


發表:26
回覆:340
積分:323
註冊:2002-04-03

發送簡訊給我
#2 引用回覆 回覆 發表時間:2002-09-19 00:03:22 IP:210.85.xxx.xxx 未訂閱
將二個groupindex設成一樣即可(但不為零)    
引言: 我在程序中使用speedbutton,設flat:=true;透明. 當我按下speedbutton1後,會出現邊框,呈凹下去的形狀,我想在speedbutton2按下時,speedbutton1的邊框消失,回復原狀,該如何??
------
熊的學習 http://huwk.blogspot.com
takdick
一般會員


發表:50
回覆:63
積分:22
註冊:2002-08-05

發送簡訊給我
#3 引用回覆 回覆 發表時間:2002-09-19 09:39:41 IP:218.102.xxx.xxx 未訂閱
speedbutton1.groupindex:=1; speedbutton2.groupindex:=1; 我試過了,但把鼠標移到speedbutton1後邊框出現,鼠標移到speedbutton2後,speedbutton1的邊框也沒有消失,這又該如何設置?
kgt
高階會員


發表:17
回覆:308
積分:165
註冊:2002-03-13

發送簡訊給我
#4 引用回覆 回覆 發表時間:2002-09-19 12:45:59 IP:211.74.xxx.xxx 未訂閱
請問您的speedbutton1 及speedbutton2 屬性flat 的預設值為何? ps.問題描述得不是很清楚
kgt
高階會員


發表:17
回覆:308
積分:165
註冊:2002-03-13

發送簡訊給我
#5 引用回覆 回覆 發表時間:2002-09-19 12:50:42 IP:211.74.xxx.xxx 未訂閱
若預設值均為true時, procedure TForm1.SpeedButton1Click(Sender: TObject); begin Form1.SpeedButton1.Flat:=false; end; procedure TForm1.SpeedButton2Click(Sender: TObject); begin Form1.SpeedButton1.Flat:=true; end;
andersonhsieh
版主


發表:33
回覆:531
積分:439
註冊:2002-06-10

發送簡訊給我
#6 引用回覆 回覆 發表時間:2002-09-19 13:11:05 IP:211.20.xxx.xxx 未訂閱
可否將你的程式放上來讓大家看看是那裡有問題 @@~~飛翔在天際的精靈~~@@
------
@@~~飛翔在天際的精靈~~@@
takdick
一般會員


發表:50
回覆:63
積分:22
註冊:2002-08-05

發送簡訊給我
#7 引用回覆 回覆 發表時間:2002-09-19 16:05:15 IP:203.198.xxx.xxx 未訂閱
我知道原因了. 我的form.brush.style:=bsclear;也是透明. 所以當鼠標移到speedbutton上面後,邊框出現後便不消失了. 這還可以解決嗎?
系統時間:2024-04-27 5:17:12
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!