Есть editbox - как запретить ввод символов, отличных от цифр? Точнее по нажатию на кнопку button, если в editbox'е введено не вещественное число, то появляется MessageBox.
Заранее Спасибо!

Кто мешает сделать так, например:

procedure TForm1.Button1Click(Sender: TObject);
var f: double;
begin
  try
    f := StrToFloat(edit1.Text);
  except
    ShowMessage('error: not a float number !!!');
  end;
end;

?

Спасибо за оперативность! Все работает.

Существует такой компонент MaskEdit - там есть шаблоны ввода.
Используй его.

hardcase, прежде всего - есть задание:

Если я тебе в ответ на твой пост про консоль напишу: чего ты Win пользуешь? Есть же *nix-ы, ставь и пользуйся - там проще - тебя это сильно порадует?