delphi for i := 1 to 10 do begin if Terminated then Exit; sleep(100); end;for i := 1 to 10 dobeginif Terminated thenExit;sleep(100);end;
来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/26 04:38:00
delphifori:=1to10dobeginifTerminatedthenExit;sleep(100);end;fori:=1to10dobeginifTerminatedthenExit;s
delphi for i := 1 to 10 do begin if Terminated then Exit; sleep(100); end;for i := 1 to 10 dobeginif Terminated thenExit;sleep(100);end;
delphi for i := 1 to 10 do begin if Terminated then Exit; sleep(100); end;
for i := 1 to 10 do
begin
if Terminated then
Exit;
sleep(100);
end;
delphi for i := 1 to 10 do begin if Terminated then Exit; sleep(100); end;for i := 1 to 10 dobeginif Terminated thenExit;sleep(100);end;
是这让线程等待一秒钟(10*100=1000毫秒)
在等待的这一秒钟内,如果收到终止请求就立即退出线程(最多等100毫秒就能退出).
这样做法主要是想让线程的实时响应性更好.
这与直接 sleep(1000) 有所区别,如果直接sleep(1000) ,那线程收到终止请求后,就不是立即退出了,而是可能等1000毫秒后才能退出.如果你想等待的时间不是一秒,而是更长时间,那更不能直到用一个sleep来做,记住一定要用一个 for 循环来实现.否则线程会死等在那里.
delphi for i := 1 to 10 do begin if Terminated then Exit; sleep(100); end;for i := 1 to 10 dobeginif Terminated thenExit;sleep(100);end;
delphi中dimens[1].
英语翻译Role & Development:Practice in Delphi Packard in different functions respectively and then focus professionally;Qualification:1) Good communication skill and willing to collaborate with others;2) Sound learning skill and passion for excel
pascal For i:=1 to n
For i = 1 To .Cells.
delphi里弹出“unalbe to invoke code parameters due to ”,
for i = 1 to 3 i=i+inextMsgbox i
for i = 1 to 8 step 10 next i print i 为什么i=11
For i = 1 To 10 Step 3 i = i + 1 Next i MsgBox (i) i=13,
For i = 0 To 13 Step 4 i = i + 1 Next i Print i i=15
delphi if a in[1,2,3,4,5] then b='c' else b=''如果a等于1,2,3,4,5时b等于c,否则等于空 这个句子在delphi报表里面怎么写?
For j = 10 To i + 1 Step -1
VB step1 还有for i=1 to 10 step
For i = 0 To List1.ListCount - 1
FOR i=1 TO thisform.List1.ListCount是什么意思?
vfp中for i=5 to 1 ftet
for i=1 to 10 step -2
for i=1 to 10 step -2