Delphi 流程控制

2021-07-24 14:26:15 字數 1895 閱讀 1766

程式流程控制

(1)條件分之

if...else:

var i:integer;

begin

if i > 0 then

begin

do //不能給';'

end //沒有結束 if...else都不能加';'s

else if i < 0 then

begin

//do

endelse

begin

//do; //兩個語句以上前面的語句必須加';'

//do

end;

end;

case of...else...end

vari:integer

begin

case i of

1: do;//要加分號

2,3:

do;4..10: //如果i在4~10 包含極端 相當於 if i in[4..10]

do;else

do;end;

end;

(2)迴圈

while://先判斷在執行(如同c艹while)

for to:

vari:integer;

begin

for i := 0 to do //或者 for i := 10 downto 0 do (這裡每次步長只能為1 不能更改)

do;end;

while:

vari := 0;

while i <= 10 do

begin

do;inc(i) //自加1

end;

end;

repeat: //先執行在判斷(如同c艹的do while)

vari := 0;

repeat

do;inc(i) //自加1

until i = 10;

end;

abort:

跳出所有模組

tryif true then

abrot;

except

//處理錯誤訊息

end; 

do;    //如果是 try...finally 那麼這裡這句就不會執行

//abrot 之後 執行 except..end 處理異常 然後 do

exit: //正常退出過程

begin

tryif true then

exit;

finally

showmessage('abrot'); //要執行

end;

showmessage('處理完成'); //不執行

halt:(exitcode:integer): //非正常結束乙個應用程式

runerror(exitcode:byte) //生成執行時錯誤,並結束程式

continue: //中斷當前迴圈

vari: integer;

begin

for i := 0 to 2 do

begin

tryif i < 2 then

continue;

do;finally //這裡會中斷以後執行 finally..end的內容然後進入下一迴圈

do;end;

end;

end;

brak: 完全中斷迴圈 如果位於try...finally當中,則finally中的**能夠得到執行

var 

i: integer;

begin

for i := 0 < 3 do

begin

tryif i = 2 then

break; //break之後還會執行 finally...end裡面的內容

do;finally

do;end;

end;

mysql流程控制 MySQL 流程控制

流程控制 1 順序結構 程式從上往下依次執行 2 分支結構 多條路徑選擇一條 3 迴圈結構 在規定範圍內重複執行 一 分支結構 1 if函式 功能 實現分支流 語法 if 表示式1,表示式2,表示式3 執行順序 執行表示式1,成立返回表示式2的值,不成立則返回表示式3的值 應用 任何地方 例 if ...

Python流程控制語句流程控制語句

流程控制語句1 if語句 if 語句基本用法 if 表示式 語句塊其中,表示式可以是乙個單純的布林值或變數,也可以是比較表示式或邏輯表示式,如果表示式為真,則執行 語句塊 如果表示式的值為假,就跳 過 語句塊 繼續執行後面的語句。2 if else語句 if else 語句基本用法 if 表示式 語...

python流程控制 python之流程控制

電腦程式在解決某個具體問題時,包括三種情形,即順序執行所有的語句 選擇執行部分的語句和迴圈執行部分語句,這正好對應著程式設計中的三種程式執行結構流程 順序結構 選擇結構和迴圈結構。事實證明,任何乙個能用計算機解決的問題,只要應用這三種基本結構來寫出的程式都能解決。python語言當然也具有這三種基本...