在delphi如何使變數隨timer而改變
1樓:網友
很簡單啊。變數i定義在過程之外(單元級全域性變數),然後在timer控制項的ontimer事件中寫一條賦值語句: i:=i+1; 就行了。
2樓:網友
樓上的注意timer的interval屬性要設為1,告訴你另外乙個辦法就是註冊timer執行緒給主窗體,這個是c++管用的方法,因為c++裡沒有timer控制項,然後就可以定時激發了,也可以用獲取系統時間的辦法。
3樓:隨風姬如雪
先放乙個timer控制項到form中,timer在system中,然後設定timer控制項的interval屬性為1000(即1000毫秒),然後在timer的ontime時間中加入**。
如一樓所說的那樣,var
form1: tform1;
i:integer;
implementation
r *.dfm}
procedure : tobject);
begini:=0;
end;procedure : tobject);
vari:integer;
begini:=i+1;
end;end.
delphi timer用法
4樓:經朔
就是個定時器。enabled就是開關,為false時這個東西就不工作了,裡面的**就不會被執行了。
它有個interval屬性,這個的單位是毫秒。當enabled為true時,每隔interval毫秒,就執行一次裡面的**。
比如,interval設為1000,則每隔1000毫秒,裡面的**就被執行一次。
delphi timer能不能帶引數
5樓:網友
不要在ttimer的事件裡面寫處理**,把**抽出來作為乙個函式或過程,在ttimer的事件**裡呼叫就行了,你想設什麼引數都可以。
procedure dotimer(param_1,param_2,..param_n: param_type);begin
end;procedure : tobject);
begindotimer(param_1,param_2,..param_n);
end;procedure : tobject);
begindotimer(param_1,param_2,..param_n);
end;procedure : tobject);
begindotimer(param_1,param_2,..param_n);
end;procedure : tobject);
begindotimer(param_1,param_2,..param_n);
end;procedure : tobject);
begindotimer(param_1,param_2,..param_n);
end;
delphi中timer的使用
6樓:網友
procedure : tobject);
false;
end;procedure : tobject);
begincase of
end;:=true;
end;procedure : tobject);
false;//設為false,可以不設,但這樣會在你設定的時間後再次執行。
do something;//你要做的事情。
end;
delphi timer**
7樓:網友
project--view source
form4:=;
使螞嫌旦這個窗體可見。
重新整理這個窗體。
工程建立應用程式的主窗體,者晌並裝入記憶體。
form4);
隱藏閃現窗悶擾體。
釋放閃現窗體所佔用的資源。, form1);
form2);
form3);
end./主窗體。
procedure : tobject);
var/定義乙個基準時間。
currenttime:longint;
begin/取得這個基準時間值。
currenttime:=gettickcount div 1000;
如果延時沒有達到"4"秒,什麼也不做,繼續這個迴圈。
while (longint(gettickcount div 1000)<(currenttime+4)) do;
end;
求delphi timer的用法。
8樓:後初同
project--view source begin ; form4:=; //使這個窗體可見 ; //重新整理這個窗體 ; //工程建立應用程式的主窗體,並裝入記憶體 , form4); //隱藏閃現窗體 ; //釋放閃現窗體所佔用的資源 ; form1); form2); form3); end. //主窗體 procedure :
tobject); var //定義乙個基準時間 currenttime:longint; begin //取得這個基準時間值 currenttime:=gettickcount div 1000; //如果延時沒有達到"4"秒,什麼也不做,繼續這個迴圈 while (longint(gettickcount div 1000)<(currenttime+4)) do; end;
delphi timer 設計
9樓:網友
先設乙個全域性祥襲消變數:
run : integer;
button1按鈕下初始 run值為0 :
procedure : tobject);
beginrun :=0;
true;end;timer控制項的timer事件中讓run+1;
procedure : tobject);
beginrun :=run + 1;
end;button2按謹知禪毀鈕下顯示執行的事件,即為run 的值:
procedure : tobject);
inttostr(run);
end;
delphi中的timer問題
10樓:oo木葉之魂
s:=;
'歡迎您';
sleep(500);
還有,如果interval是1000的話,sleep(500)比較好,因為單位是毫秒,500就是半秒的意思,sleep(1)無意義。
delphi timer
11樓:網友
將timer的時間設攔首置為200ms, 讀完乙個重新正滾啟簡清數動,設定乙個計數器, 記錄當前的函式位置。
Python的 如何使跨模組的變數
1 import 模組 模組.變數名 2 from 模組 import 變數名,這樣可以直接使用不過不太應用後面的那種,可能會出現重名的變數,無法分辨 python如何在乙個模組中呼叫另乙個模組中的變數 python在乙個模組中呼叫另乙個模組中的變數步驟如下 1 要實現變數的深度拷貝,專需要使用到c...
在ecel中如何使用, 在excel中如何使用
是絕對引用的意思,比如 b1,b1,b 1 三者的區別如下 b1 橫拉列不變,下拉時改變單元格 當下拉時,會演變成 b2 b3 b4 b5.當橫拉時,會演變成 b1 b1 b1 b1.b1 無論下拉或者橫拉,橫或者列都有可能會變當下拉時,會演變成b2 b3 b4 b5.當橫拉時,會演變成c1 d1 ...
C在CLass1中建立的變數如何使其變成公共變數,使任
可以使用靜態變數 如 class class1 使用時用類名.變數名就好,如class1.var1 50 在c 裡沒有全域性變數的概念!但是,如果你想定義某個變數具有全域性功能的話,你可以用public 和static來定義。最好是定義在某個類裡面。比如 定義乙個全域性的整型變數 假設在 useri...