Programalama > DELPHI

type TWeekDays = (Monday, Tuesday, Wednesday,
                 Thursday, Friday, Saturday, Sunday);

var SomeDay : TWeekDays;

for SomeDay := Monday to Sunday do
 if SomeDay = Tuesday then
  ShowMessage('Tuesday it is!');

TPosition = (poDesigned, poDefault, poDefaultPosOnly,
             poDefaultSizeOnly, poScreenCenter);

type TWorkDays = Monday .. Friday;