От новичка. Фрагмент кода с ошибкой

[omigos99]

ошибка: error parameter list is too short

for i:=0 to length(st) do if (Ord(getChar(st; i))>0)and(Ord(getChar(st; i))<44)or(Ord(getChar(st; i))>44)and(Ord(getChar(st; i))<48)or(Ord(getChar(st; i))>47+s)  
      then do begin      
      showAlert ('Ошибка ввода данных'; 'Вы ввели число некорректное для данной СС';;;);
      cm := createCommand('Назад', CM_OK, 1); 
      addCommand(cm); 
      repeat 
       delay(100); 
      until getClickedCommand <> emptyCommand; 
      showForm;
      end;

подскажите как исправить эту ошибку и нет ли тут ещё ошибок.
з.ы. МП изучаю второй день

[ViNT]

Сообщение от omigos99

getChar(st; i)

А это откуда?
В MP, как и в "обычном" паскале параметры, передаваемые функции, разделяются запятыми, а не точками с запятой.