【条件分岐】
■if文の条件を範囲指定で記述する
if内に、in[範囲] という構文で記述可能。
var
iMode: integer;
begin
iMode := 0;
…
if iMode in [1..3] then //iModeが1,2,3の場合
begin
  //処理
end
else if iMode in [4..6] then //iModeが4,5,6の場合
begin
  //処理
end;
■case文
Case iMode of
1: begin
     //処理
   end;
2: begin
     //処理
   end;
end;

【ループ】
■forループ
  for i := 0 to Length(StrFormat) do
  begin
    if Result[i] = '.' then
      Result[i] := DecimalSeparator
    else
      if Result[i] = ',' then
        Result[i] := ThousandSeparator;
  end;

■whileループ
DataSetの全レコードを、レコード型配列にセットする
  while odsEmp not Eof do
  begin
    arrEmp[i].EMP_NO := FieldByName('EMP_NO').AsString;
    arrEmp[i].ENAME  := FieldByName('ENAME').AsString;
    Next;
    Inc(i);
  end;