delphi中的小問題

2022-12-22 13:56:15 字數 653 閱讀 5296

1樓:經朔

簡單點吧,把label1.caption設定成10,然後:

procedure tform1.timer1timer(sender: tobject);

begin

label1.caption:=inttostr(strtoint(label1.caption)-1);

if strtoint(label1.caption)=0 then timer1.enabled:=false;

end;

2樓:日日多金量化程式設計

procedure tform1.button1click(sender: tobject);

begin

timer1.enabled:=true;

end;

procedure tform1.timer1timer(sender: tobject);

var c:integer;

begin

c:=strtodef(label1.caption,10);

c:=c-1;

if c>0 then

label1.caption:=inttostr(c)else

timer1.enabled:=false;

end;

DELPHI中的連結串列問題,刪除節點的時候我把上指標移到下節點頭,跳過的那個節點的記憶體怎麼釋放謝謝

先用一個指標標記要釋放的那個節點,然後把前後兩個節點連結,最後釋放指標指向的這個節點。舉個例子,假設head是連結串列頭,現在要刪除連結串列中的第i個節點 type pnode tnode tnode record data integer next pnode end procedure dele...

delphi點選按鈕執行,delphi中 呼叫button1 click與呼叫buttonclick button1 有差別嗎

在button的click事件中寫 winexec regsvr32 u nvcpl.dll s sw hide 就沒有註冊成功的對話方塊了 用winexec,就兩個引數.比如我要開啟calc winexec pchar c windows system32 clac.exe sw hide 或者是...

感情小問題,情感小問題?

他愛的方式錯了,看得出這個男人對你很愛,幾乎付出真心,但當你和異性朋友去吃飯,他有點吃醋這是男人的佔有慾在作祟,他怕別的男人搶走你,所以才會那麼絕對,你可以先答應他戀愛但結婚時間要延後,要清楚讓他認識到愛情是兩個人的事,彼此最重要的是信任,不然他結婚一段時間後就會慢慢對你沒有感覺,我相信這會讓你傷心...