Форум: "Основная";
Текущий архив: 2002.05.06;
Скачать: [xml.tar.bz2];
Внизedit1 Найти похожие ветки
← →
ymin (2002-04-23 13:51) [0]Как написать код, чтобы в Tedit1 можно было написать только число от 1 до 300?
← →
Anatoly Podgoretsky (2002-04-23 13:56) [1]Зачем ограничиваешь пользователя, пусть пишет что угодно, а ты проконтролируй результат.
← →
ymin (2002-04-23 13:57) [2]а простите как?
← →
gek (2002-04-23 13:58) [3]Обработай OnExit
← →
Андрей Сенченко (2002-04-23 14:03) [4]Можно конечно контролировать OnChange, но уж слишком громоздко получится
← →
Игорь Шевченко (2002-04-23 14:06) [5]День добрый,
А не проще ли использовать TRxCalcEdit и установить у него Min и Max ?
И пользователю приятнее будет тем, что он не сможет ввести что угодно и получить сообщение об ошибке при проверке, а сразу поймет, что вводить можно только число от 1 до 300 :-))
С уважением,
← →
ymin (2002-04-23 14:07) [6]>> gek
а как это?
Например??
← →
ymin (2002-04-23 14:08) [7]а где взять это? TRxCalcEdit
← →
gek (2002-04-23 14:26) [8]procedure edit1onexit(sender:tobject);
var
i:integer;
begin
i:=strtointdef(edit1.Text,0);
if (i= 0)or(i>300)then
begin
Showmessage("Ну ну")
edit1.SetFocus;
end;
end;
← →
Андрей Сенченко (2002-04-23 14:43) [9]>> Игорь Шевченко © (23.04.02 14:06)
>> А не проще ли использовать TRxCalcEdit
В данном случае не проще. Судя по постам, ymin © только начинает что-то по серьезному писать и вроде как стремится понять то, что делает.
Используя все готовенькое, ИМХО, сложно научиться чему-либо. Пусть уж пару раз сам сделает то, что сделали разработчики RX ( кстати я не думаю, что у них этот вопрос решен кардинально в сторону от обработки событий ввода ), а потом в случае необходимости срочно что-то сделать юзает сторонние наборы компонент
← →
Song (2002-04-23 14:46) [10]На onChange Вам нужно сначла проверять вводит ли пользователь числа, а потом переводить в число и проверять больше ли оно 300
← →
Anatoly Podgoretsky (2002-04-23 14:52) [11]Нет смысла делать какие либо проверки в onChange достаточно про верить при выходе или при закрытии. Закрытие может произойти и без выхода.
← →
PaRL (2002-04-23 14:54) [12]
> Используя все готовенькое, ИМХО, сложно научиться чему-либо.
Ага. Я когда совсем чайником был и когда списывал примеры из книги, это нихрена не помогло научиться чему-либо, ну разве что несколько функций узнавал, а вот когда сам скрипя зубами начнешь разбираться, тогда и результат будет.
← →
Игорь Шевченко (2002-04-23 14:59) [13]День добрый, Андрей Сенченко ©,
> Используя все готовенькое, ИМХО, сложно научиться чему-либо
Это так, но при этом, обычно подразумевается собственная мыслительная работа или изучение учебных пособий/чужих исходных текстов, а не поиски готовых ответов на вопрос: "А как ...?"
> Пусть уж пару раз сам сделает то, что сделали разработчики
> RX
Вы это всерьез? :-)
С уважением,
← →
Андрей Сенченко (2002-04-23 16:37) [14]>> Игорь Шевченко © (23.04.02 14:59)
>> Вы это всерьез? :-)
Применительно к конкретному классу TRxCalcEdit - а почему бы и нет ? :::::)))))))))
← →
Shrek (2002-04-23 17:12) [15]только onchange.
или компонент SpinEdit
← →
В.И.Чапаев (2002-04-24 04:18) [16]в событии
onkeypress
пишешьcase Key of
"0".."9": ;
#8: ;
#13: ;
else key:=chr(0);
end;
а вonchange
if strtoint(edit1.text)>300 then edit1.text:=inttostr(300);
if strtoint(edit1.text)<1 then edit1.text:=inttostr(1);
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.05.06;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.004 c