Case в делфи

[Form_13]

Если например, мне нужно с помощью case сделать так:
1: ...
2: ...
всё остальное: ...

есть такое в case?

[evg_m]

Delphi help F1 Case statements

Each value represented by a caseList must be unique in the case statement; subranges and lists cannot overlap. A case statement can have a final else clause:

case selectorExpression of
caseList1: statement1;
...
caseListn: statementn;
else
statements;
end

[Form_13]

большое спасибо