[alogin]

Как сделать так чтобы в поле edit можно было вводить токо числа,
а если вводят текст, то он должен ругаца и говорить, что нада вводить токо числа ???

Заранее спс

[MegaPiha]

Много раз обсуждалось.
В событии onKeyPress Edita прописать

Код:

  case key of '0'..'9', #8:;
  else 
      key :=chr(0);
      ShowMessage('Ругань всякая...')
  end;

[alogin]

спасиба тебе добрый человек

[Raccoon]

А если наоборот можно вводить только буквы?

[FOX87]

case key of 'A'..'z', #8:;
else
key :=chr(0);
ShowMessage('Ругань всякая...')
end;

Если для русских букв:
case key of 'А'..'я', #8:;
else
key :=chr(0);
ShowMessage('Ругань всякая...')
end;

Для рус и англ:
case key of 'A{на англ языке!!!!}'..'я', #8:;
else
key :=chr(0);
ShowMessage('Ругань всякая...')
end;

[The Shadow]

Еще буква ё есть, ее, кажется, добавить тоже надо.

[Raccoon]

Спасибо! =)