Запрет ввода в Stringgrid

[D-Snaker]

Пишу одну программу, всё сделал, но столкнулся с проблемой. Нужно, чтобы в стрингрид можно было ввести только числа 3,4 и 5. Причем только одну цифру. С другими компонентами прокатывает онкейпресс, а вот тут споткнулся и завис - ведь нужно еще координаты ячейки определить... Помогите, ребят, на вас вся надежда

[SERG1980]

Помнится в одной из прог делал так

procedure TForm4.StringGrid1KeyPress(Sender: TObject; var Key: Char);
begin
 if not (key in['0'..'9',#8,',']) then key:=#0;
 if ((Col=2)and(Row=8))or((Col=1)and(Row=11)) then
 begin
  key:=#0;
  messagebox(0,'Этот параметр не имеет значения отключения','Ошибка ввода данных',MB_ICONERROR+MB_OK+MB_SYSTEMMODAL);
 end;
end;