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

在 Runtime 讓使用者自由的拉動所有元件的位置和大小

 
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-05-31 14:11:20 IP:218.16.xxx.xxx 未訂閱
就是在程式執行時可以進入設計模式讓使用者自由的拉動元件的位置和大小,其特點就是基本上絕大部份可視元件都可以支援 (即使沒有 onMouseXXX 事件的如 TMonthCalendar 都支援但 MainMenu 那些沒法),而且完全不需要設定甚麼,放上 Form / Containaer 便可以了。    測試說明 :  1. 執行程式後按按 Button 1 及 把 Cursor 在 Label1 上移動,看看原本的 onClick 及 onMouseMove Event 的執行 2. 在 MainMenu 按 Design, 之後便可任意拉大小位置了。注意 onClick / onMouseMove 等在 Design 模式時暫不執行 3. 移完後按 Normal 回到一般模式,留意 onClick / onMouseMove 等事件還原了。    這次發表玩點新花款加強互動性,發表時附執行檔及部份程式碼(包括整個架構),但在幾個重點位置的源碼暫不發表。    這樣,大家若有做過或有興趣的可 post 上你認為最好的程式碼,很可能比我原本的好很多呢。    在本題得分達到 9,12,15 分時將會在這篇補上部份程式碼,18 分時將會補上所有程式碼。若得不到分即是說作品失敗登不登出來也沒甚麼關係囉< > 若你急著用可寄短訊給我,不過要先給分喔< > 原理將會在本期電子報先稍作說明。 其實這可寫成元件只要放在 Form 中就加上這功能而在 Form 中不用再加任程式碼的,還可 include / exclude 某些元件哩。 本作品移動部分有參考 hahalin 版主的 : 網咖管理金剛組合版 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=28622 我沒在在這範例寫儲存的部分因為我是用自制元件儲存所有資料 (包括使用者輸入的資料) 但那些自制元件暫不成熟及不便公開。 若你想自制儲存功能的可參考上面 hahalin 版主的發表。
SKYSTAR
中階會員


發表:76
回覆:198
積分:64
註冊:2002-06-10

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-06-01 02:55:33 IP:210.66.xxx.xxx 未訂閱
Justmade大大....    快點啦.....我要全部的原始碼.... 前些天我也試著做這個 >
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-06-02 08:27:38 IP:218.16.xxx.xxx 未訂閱
程式碼已全部補上,謝謝大家。 原理及程式碼全解說可參看 : http://delphi.ktop.com.tw/topic.php?TOPIC_ID=31557 若對程式碼有任何問題請在該篇提出,謝謝。
SKYSTAR
中階會員


發表:76
回覆:198
積分:64
註冊:2002-06-10

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-06-02 09:05:59 IP:210.66.xxx.xxx 未訂閱
感謝版主無私的付出.....    在這裡代表大家向您說聲....Thanks!!
axsoft
版主


發表:681
回覆:1056
積分:969
註冊:2002-03-13

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-06-03 16:59:08 IP:61.218.xxx.xxx 未訂閱
這裡也有個C++ Builder的範例 http://netcity1.web.hinet.net/userdata/nep2314/ 作者:許湞翔 示範如何在執行時期改變 VCL 的位置、大小,就像在 BCB IDE 環境中安排元件一樣。 下載位置一: Delphi K.Top討論區檔案下載 Resize.zip 下載位置二:星點子工作室 Resize.zip HAVE A NICE DAY 發表人 - axsoft 於 2003/06/03 17:09:08
leean7
一般會員


發表:0
回覆:1
積分:0
註冊:2004-04-01

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-04-01 10:48:00 IP:61.48.xxx.xxx 未訂閱
thank you very much
vagrant
一般會員


發表:29
回覆:72
積分:20
註冊:2003-07-04

發送簡訊給我
#7 引用回覆 回覆 發表時間:2004-04-03 15:34:53 IP:218.189.xxx.xxx 未訂閱
這個是你原創嗎? 我很早以前就看到過這個程示了啊。。。
hungyulin
一般會員


發表:36
回覆:33
積分:13
註冊:2003-10-15

發送簡訊給我
#8 引用回覆 回覆 發表時間:2004-07-15 16:53:13 IP:61.219.xxx.xxx 未訂閱
順便問一下大大,如果在同一層要控制元件互相不能重疊要怎麼作?
系統時間:2024-03-29 15:35:49
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!