[Alegun]

Да нет, этот end; оператору выбора case принадлежит, нужно новый добавить, из курса молодого делфийца немного

Код:

 if {условие} then 
  begin
   case {переменная} of
{значение1} :
{значение2} :
{значение3} :
...
   else {case}

   end; {case}

   end else
    begin
...
    end;