Хотелось бы поинтересоваться как в делфи сделать так чтобы в компонент Edit можно было бы вводить только цифры. В паскале делал через ОРД но не знаю как тут это всё дело связать с

procedure TLogs.Edit2Change(Sender: TObject);
begin

end;

 procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not(Key in ['0'..'9']) then
  Key:=#0;
end;

а чтобы END и Home держались какие цифорки надо ещё учесть ?

Ничего не надо больше учитывать... Home и End и так будут работать...

Немного непонятно как данную операцию связать с конкретными эдитами. У меня на форме их 3 и я хочу чтобы именно в 2х из них можно было вводить только цифры. Я описал процедуру описанную вами выше, изменив соответсвенно название формы на свою. Программа запускается но ни в одном не работает: во все 3 эдита можно вводить и цифры и буквы.

а в инспекторе объектов прописал связь события с этой процедурой?

Именно это я и забыл сделать. Спасибо Мисс Графити. Извиняйте, ещё не опытен.

извеняюс наверно за глупый вопрос а какой код клавиши нужно добавить чтобы BackSpace работал в данном Edite

BackSpace и так работает для TEdit (если ты ничего не менял. А если менял, то показывай, как...)

вот если так пропимано то при нажатии на бекспэйс ничего не происходит.....

всё сам уже нашёлююю нужно #8 добавть

...if not(Key in ['0'..'9',#8]) then...

Кстати, ты думаешь, тебя это спасет от ввода НЕ цифр?

Copy + Paste еще никто не отменял ...

а есть ещё варианты???
пока вышел из ситуёвины тем что проверяю значение едита после его ввода непосредственно перед началоп операций с его значением... ИМХО както это неправильно

Варианты есть всегда...

На вкладке Additional есть компонент TMaskEdit... Вот если ты туда внесешь маску, позволяющую вводить только числа, то никакими Copy/Paste буквы не запишешь...

Ctrl+V и так не работает.
А вот щелчок правой кнопкой... Можно, конечно, отлавливать...

volvo, у MaskEdit свои недостатки. Можно, например, ввести такое: "1 22" при маске "только цифры"
хотя... если кол-во цифр заранее известно, можно забить не 9, а 0...