如何正常顯示動畫 |
|
答題得分者是：leveon
|
|
blue
中階會員   發表：169 回覆：136 積分：81 註冊：2002-04-15 發送簡訊給我 |
|
|
leveon
資深會員  發表：30 回覆：389 積分：303 註冊：2012-02-12 發送簡訊給我 |
|
|
GrandRURU
站務副站長 發表：240 回覆：1680 積分：1874 註冊：2005-06-21 發送簡訊給我 |
|
|
blue
中階會員 發表：169 回覆：136 積分：81 註冊：2002-04-15 發送簡訊給我 |
Hi,感謝 leveon & GrandRURU 大大的回應:
但是這樣作在跑檢查程序時,該動畫都是 停止不動的, 只有在沒有程序在跑的時候,動畫檔才會正常的"動", 謝謝! ===================引 用 GrandRURU 文 章=================== 何不用TGIFImage元件呢？ http://delphi.ktop.com.tw/board.php?cid=168&fid=921&tid=31622 |
|
GrandRURU
站務副站長 發表：240 回覆：1680 積分：1874 註冊：2005-06-21 發送簡訊給我 |
|
|
blue
中階會員 發表：169 回覆：136 積分：81 註冊：2002-04-15 發送簡訊給我 |
Hi,感謝 GrandRURU 大大的回應:
小弟要做這樣子: 1.檢查網路是否是可通的, 2.連結到某網站(檢查是否可連通) 3.登入網站 4.取得所需資料 ..... 每一項檢查的時候,前面就顯示的一個旋轉的動畫(例如GIF或AVI檔)表示"作業中" 但,實際上,例如第3項可能耗時3秒,結果,該動畫就停止不動3秒, 試過將動畫以另一個Thread,也是一樣停止不動3秒, 只有將各個檢查步驟作成另一個Thread,該動畫才會是正常的 謝謝! ===================引 用 GrandRURU 文 章=================== 你的問題我試不出來... 你要不要試著將你的動畫檔放到另一個Form做顯示 ===================引 用 blue 文 章=================== Hi,感謝 leveon & GrandRURU 大大的回應: 但是這樣作在跑檢查程序時,該動畫都是 停止不動的, 只有在沒有程序在跑的時候,動畫檔才會正常的"動", 謝謝! |
|
leveon
資深會員 發表：30 回覆：389 積分：303 註冊：2012-02-12 發送簡訊給我 |
我貼的連結你試過了嗎?
ani : TAnimationThread; r := panel1.clientrect; ani := TanimationThread.Create(panel1, r, panel1.color, clBlue, 25); Application.ProcessMessages; Button1.Enabled := True; ShowMessage('Done'); ===================引 用 blue 文 章=================== Hi,感謝 GrandRURU 大大的回應: 小弟要做這樣子: 1.檢查網路是否是可通的, 2.連結到某網站(檢查是否可連通) 3.登入網站 4.取得所需資料 ..... 每一項檢查的時候,前面就顯示的一個旋轉的動畫(例如GIF或AVI檔)表示"作業中" 但,實際上,例如第3項可能耗時3秒,結果,該動畫就停止不動3秒, 試過將動畫以另一個Thread,也是一樣停止不動3秒, 只有將各個檢查步驟作成另一個Thread,該動畫才會是正常的 謝謝! ===================引 用 GrandRURU 文 章=================== 你的問題我試不出來... 你要不要試著將你的動畫檔放到另一個Form做顯示 ===================引 用 blue 文 章=================== Hi,感謝 leveon & GrandRURU 大大的回應: 但是這樣作在跑檢查程序時,該動畫都是 停止不動的, 只有在沒有程序在跑的時候,動畫檔才會正常的"動", 謝謝! |
|
GrandRURU
站務副站長 發表：240 回覆：1680 積分：1874 註冊：2005-06-21 發送簡訊給我 |
Form2.Show;
Form2.Update; // <-- TGifImage in here try DB.Connect; Table1.Open; finally Form2.Close; end; . . . 參考資料來源：loading form in another thread ===================引 用 blue 文 章=================== Hi,感謝 GrandRURU 大大的回應: 小弟要做這樣子: 1.檢查網路是否是可通的, 2.連結到某網站(檢查是否可連通) 3.登入網站 4.取得所需資料 ..... 每一項檢查的時候,前面就顯示的一個旋轉的動畫(例如GIF或AVI檔)表示"作業中" 但,實際上,例如第3項可能耗時3秒,結果,該動畫就停止不動3秒, 試過將動畫以另一個Thread,也是一樣停止不動3秒, 只有將各個檢查步驟作成另一個Thread,該動畫才會是正常的 謝謝! ===================引 用 GrandRURU 文 章=================== 你的問題我試不出來... 你要不要試著將你的動畫檔放到另一個Form做顯示 ===================引 用 blue 文 章=================== Hi,感謝 leveon & GrandRURU 大大的回應: 但是這樣作在跑檢查程序時,該動畫都是 停止不動的, 只有在沒有程序在跑的時候,動畫檔才會正常的"動", 謝謝! |
|
blue
中階會員 發表：169 回覆：136 積分：81 註冊：2002-04-15 發送簡訊給我 |
Hi,感謝 leveon 大大的回應:
原先測試Panel1完全沒有變化, 剛試了將 Brush.Color := FbkColor; // FillRect(imagerect); 是可以看到 Panel1 的變化了, 但,小弟在該Thread加入的 TAnimate無法動, 是只能使用Image去自行畫出我要的動畫囉? 謝謝! ===================引 用 leveon 文 章=================== 我貼的連結你試過了嗎? ani:TAnimationThread; r:=panel1.clientrect; ani:=TanimationThread.Create(panel1,r,panel1.color,clBlue,25); Application.ProcessMessages; Button1.Enabled:=True; ShowMessage('Done'); ===================引 用 blue 文 章=================== Hi,感謝 GrandRURU 大大的回應: 小弟要做這樣子: 1.檢查網路是否是可通的, 2.連結到某網站(檢查是否可連通) 3.登入網站 4.取得所需資料 ..... 每一項檢查的時候,前面就顯示的一個旋轉的動畫(例如GIF或AVI檔)表示"作業中" 但,實際上,例如第3項可能耗時3秒,結果,該動畫就停止不動3秒, 試過將動畫以另一個Thread,也是一樣停止不動3秒, 只有將各個檢查步驟作成另一個Thread,該動畫才會是正常的 謝謝! ===================引 用 GrandRURU 文 章=================== 你的問題我試不出來... 你要不要試著將你的動畫檔放到另一個Form做顯示 ===================引 用 blue 文 章=================== Hi,感謝 leveon & GrandRURU 大大的回應: 但是這樣作在跑檢查程序時,該動畫都是 停止不動的, 只有在沒有程序在跑的時候,動畫檔才會正常的"動", 謝謝! |
|
leveon
資深會員 發表：30 回覆：389 積分：303 註冊：2012-02-12 發送簡訊給我 |
發表時間：2012-06-28 11:52:43
IP:122.146.xxx.xxx 訂閱
系統時間：2024-04-26 19:37:17
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |