[_Я_]

подскажите как сделать так, чтобы в комонент Edit можно было вводить только числа и пробел (оба варианта). Там как-то через KeyPress.. вот точно не знаю

[Aristarh Dark]

На самом деле вче довольно просто

Код:

procedure TForm.EditKeyPress(Sender: TObject; var Key: Char);
begin
  if not(Key in ['0'..'9',chr(8),' ']) then
  Key:=#0;
end;

chr(8) добавлено для того, чтобы работала кнопка backspace.
ЗЫЖ Если понадобится вводить не целые числа, то в допустимое множество нужно добавить DecimalSeperator

[aleksandr278]

А как сделать чтоб можно было вводить только цифры и буквы. С цифрами все понятно, а вот с буквами не получается.

[lmikle]

Для латинских букв будет так:

Код:

procedure TForm.EditKeyPress(Sender: TObject; var Key: Char);
begin
  if not(Key in ['0'..'9',chr(8),' ','A'..'Z','a'..'z']) then
  Key:=#0;
end;