Тема
:
Буква
Показать сообщение отдельно
#
4
17.11.2006, 13:18
vinni
Начинающий
Регистрация: 26.01.2006
Сообщения: 135
Репутация:
10
чуваки, спасибо большое, но я уже нашол такой способ:
Val(Edit1.Text,cx,c1);
Val(Edit2.Text,cy,c2);
Val(Edit3.Text,radius,c3);
if (c1<>0) or (c2<>0) or (c3<>0) then
begin
StatusBar1.SimpleText:='ВВЕДИТЕ ЧИСЛОВОЕ ЗНАЧЕНИЕ!';
exit;
end;
vinni
Посмотреть профиль
Отправить персональное сообщение для vinni
Найти все сообщения от vinni