今天我們來看一下delphi的語句。
一、常量宣告語句
和其他語言一樣，常量在宣告時就被賦值，且在程式執行過程中是不可改變的。常量用「=」表示兩邊的值是相等的。
[delphi]view plain
copy
const
pi = 3.14159
; answer = 342
; productname = 'delphi'
;
二、賦值語句
這個語句最常用，在之前也介紹過。這裡就舉個例子。
[delphi]view plain
copy
variable := expression;
擴充套件方法：myfunction(x)。這種方法被呼叫時，其返回值將會被丟棄。
三、goto語句
goto語句可以用來從程式中的乙個地方直接跳轉到另乙個地方，但不常用。
四、復合語句
首尾使用begin和end包括起來的一組語句，可以巢狀使用，也允許空的復合語句。
[delphi]view plain
copy
begin
c:=a;
a:=b;
b:=c;
begin
...
end;
end;
五、if語句
這個在日常的程式開發中也是經常用到。在之前的博文中也有介紹。這裡不做詳述，如有使用其他語言的經驗，只需要注意delphi對於if的語法即可。
[delphi]view plain
copy
ifa
then
b if
a then
b else
c
舉例來說：
[delphi]view plain
copy
ifj <>
0then
begin
result := i/j;
count := count + 1
; end
else
ifcount = last
then
done := true
else
exit;
六、case語句
case語句用來在多個可能的情況下選擇乙個條件。例如
[delphi]view plain
copy
case
mycolor
ofred: x := 1
; green: x := 2
; blue: x := 3
; yellow, orange, black: x := 0
; end
; case
selection
ofdone: form1.
close;
compute: calculatetotal(unitcost, quantity);
else
beep;
end;
七、repeat語句
repeat語句重複執行一行或一段語句直到某一狀態為真。例如
[delphi]view plain
copy
repeat
k := i mod
j;
i := j;
j := k;
until
j =
0;
repeat
write('enter a value (0..9): '
);
readln(i);
until
(i >= 0)
and(i <=
9);
這裡需要說明的是，repeat至少執行一次語句
八、while語句
while語句與repeat語句的不同之處在於while語句在迴圈的開始階段就進行判斷，也就不存在多執行一次迴圈語句的情況了。
[delphi]view plain
copy
while
data[i] <> x
doi := i +
1;
while
i > 0do
begin
ifodd(i)
then
z := z * x;
i := i div
2;
x := sqr(x);
end;
while
noteof(inputfile)
dobegin
readln(inputfile, line);
process(line);
end;
九、for語句
for語句需要明確指定想要的迴圈來遍歷的迭代次數：
[delphi]view plain
copy
fori := 2to
63do
ifdata[i] > max
then
max := data[i];
fori := listbox1
.items
.count -
1downto0do
listbox1.
items[i] := uppercase(listbox1
.items[i]);
fori := 1to
10do
forj := 1to
10do
begin
x := 0
; for
k := 1to
10do
x := x + mat1[i, k] * mat2[k, j];
mat[i, j] := x;
end;
forc := red
toblue
docheck(c);
十、break過程
呼叫break()表示當迴圈中滿足某種條件時立即跳出迴圈。例如
[delphi]view plain
copy
vari:integer
; begin
fori:=1to
100do
begin
ifi=
30then
break;
end;
end;
十一、continue()過程
呼叫continue()重新開始下次迴圈。例如
[delphi]view plain
copy
vari : integer
; begin
fori:=1to
3dobegin
writeln
(i,'before continue'
);
ifi=
2then
continue;
writeln
(i,'after continue'
);
end;
end;
十二、with()語句
在使用記錄型別的時候，使用with語句來針對某乙個變數說明。with語句的結構為
[delphi]view plain
copy
with
obj
dostatement
orwith
obj1,obj2,...,objn
dostatement
with語句的例子
[delphi]view plain
copy
with
orderdate
doif
month =
12then
begin
month := 1
; year := year + 1
; end
else
month := month + 1;
Delphi基礎（四）語句
注釋 1.括號內注釋 2.行注釋 3.符號內注釋 with語句 with 物件 do begin 語句end if語句 1.if then 2.if then else if語句可以巢狀使用，當if需要跟復合語句時，語句需要用begin和end包括 例如 if x y then begin z x ...
Shell 學習筆記四（迴圈語句）
shell常用的迴圈語句包括 for迴圈 while迴圈 until迴圈。這節主要對這幾種迴圈語句的講解。for迴圈一般格式為 for 變數名 in 列表 docommand1 command2 commandn done 當變數值在列表裡，for迴圈即執行一次所有命令，使用變數名獲取列表中的當前取...
JAVA學習筆記 四 迴圈語句
while迴圈 while迴圈 迴圈變數，可以控制迴圈次數。public class test system.out.println count system.out.println hahahhaa while迴圈 實現1 100之和 public class test system.out.pr...