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

有關跑馬燈怎摸製作?

尚未結案
dinoca
一般會員


發表:26
回覆:14
積分:8
註冊:2004-11-04

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-11-26 00:51:05 IP:220.229.xxx.xxx 未訂閱
請問各位大大: 是否有人可以提供, K.Top網站上面有一組跑馬燈是可以hyper link的寫法呢? 另外如果我要把這個跑馬燈放在delphi application裡面的話,我應該要怎摸做? 拜託各位大大指點一下 謝謝
hahalin
版主


發表:295
回覆:1698
積分:823
註冊:2002-04-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-11-26 01:49:20 IP:218.170.xxx.xxx 未訂閱
也許使用 TWebBrowser元件,就可以直接使用Html的跑馬燈code了...
magicbear
一般會員


發表:5
回覆:10
積分:3
註冊:2004-11-20

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-11-27 21:16:57 IP:202.175.xxx.xxx 未訂閱
沒必要用TWebBrowser元件吧....有點大材小用...... 給你一個,幾天前寫的,自己稍加修改吧    procedure TForm1.ani(Sender: TObject); var   i: integer;   j: integer; // 用於往覆跑馬燈用 begin   i:=self.Width;   j:=100; // 用於往覆跑馬燈用   while i>=0 do // 可以改成(i>=0) or (i<=self.width)   begin     (Sender as TLabel).Left:=i;  // 不一定是Label, 可以自己修改     application.ProcessMessages; // 防止死機的一句     i:=i-j;  // 100為每次寬度減的數目     sleep(100); // 暫停的時間,如果沒有會太快     if i<0 then j:=-j; // 用於往覆跑馬燈用 end; end;
dinoca
一般會員


發表:26
回覆:14
積分:8
註冊:2004-11-04

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-12-01 01:45:11 IP:220.229.xxx.xxx 未訂閱
那所顯示出來的文字,怎摸設定hyper link? 麻煩幫幫忙,請各位大大指點一下 謝謝
orson
中階會員


發表:5
回覆:135
積分:58
註冊:2002-07-11

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-12-01 10:13:52 IP:211.74.xxx.xxx 未訂閱
引言: 那所顯示出來的文字,怎摸設定hyper link? 麻煩幫幫忙,請各位大大指點一下 謝謝
當USER CLICK他的時候 SHELLEXECUTE你要連結的HyperLine就搞定啦。 Orson
Ktop_Robot
站務副站長


發表:0
回覆:3511
積分:0
註冊:2007-04-17

發送簡訊給我
#6 引用回覆 回覆 發表時間:2007-04-26 13:51:20 IP:000.000.xxx.xxx 未訂閱
提問者您好:


以上回應是否已得到滿意的答覆?


若已得到滿意的答覆,請在一週內結案,否則請在一週內回覆還有什麼未盡事宜,不然,
將由版主(尚無版主之區域將由副站長或站長)自由心證,選擇較合適之解答予以結案處理,
被選上之答題者同樣會有加分獎勵同時發問者將受到扣 1 分的處分。不便之處,請見諒。


有問有答有結案,才能有良性的互動,良好的討論環境需要大家共同維護,感謝您的配合。

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