請問在體溫量測記錄系統的狀態列上類似跑馬燈的展現,程式碼要如何設計??

放一個 Timer Interval 你喜歡 onTimer 時變動顯示 若是使用 TLable 等可以變動 Label1.Left 若是 StatusBar Panel 的 Caption 可以用 space 的數量來控制

Raize 元件組裏面，就有一個跑馬燈LED的元件 您可參考看看     TRzLEDDisplay This custom graphic component displays its caption in an LED-style format. 這組元件是要錢的，不過做的相當好，可以考慮看看 http://www.raize.com/DevTools/RzComps/Contents.htm 發表人 - turboted 於 2003/06/06 07:17:44

在create中設定

 
  Title : string ;
.
.
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Title := copy(title,3,length(Title)-2) copy(title,1,2);
  caption := Title ;
end;    procedure TForm1.FormCreate(Sender: TObject);
begin
Title := '測試走馬燈  測試走馬燈 測試走馬燈';
end;    

注意假如要有中文的話要一次copy兩個單位 ---------------------- 一切有為法 如夢幻泡影 如露亦如電 應做如是觀 ----------------------

引言: 請問在體溫量測記錄系統的狀態列上類似跑馬燈的展現,程式碼要如何設計??

嗨! 我在會員分享檔案放上一個可以在Form.caption做跑馬燈的元件, 你可以 下載參考其內容設計, 改成TLable上可以用的(原理都一樣) http://delphi.ktop.com.tw/topic.php?TOPIC_ID=31904