Подскажите как сделать парвильно)

[bee_uk]

у меня вводятся значения в Editах
Мне необходимо, чтоб была проверка, что эти значения 1)только неотрицательные,2)только с одной точкой или без неё.
А также нужно проверить, 3)если есть введённое значение в Edit, то далее работает программа, а если не все Editы заполнены...тогда Show Message.
???????

Спасибо

[Sazary]

Сначала проверяете все поля на пустоту. Потом проверяете количество точек в полях. Потом ищете минусы. Если где-нибудь косяк, то показываем сообщение и выходим (return).
Все это делается над строками.

[bee_uk]

над строками - это значит, что перед самым кодом??

if ((Key>='0')&&(Key<='9'))
return;
if (Key==DecimaSeparator)
{if ((Edit1->Text).Pos(DecimalSeparator)!=0)
Key=0;
return;
}

так??

[Sazary]

Сообщение от bee_uk

над строками - это значит, что перед самым кодом??

Это я имел в виду, что переводить в числа не нужно.

Сообщение от bee_uk

так??

А кто такой Key?

На пустоту так:

if(length(Eidt1->Text)==0) // выходим

Про точку: тут одним Pos-ом не обойтись. Либо 2 Pos'а, либо проходим по строке и считаем точки (и если больше 1-й - выходим).
Ну а минус - просто проверяем первый символ строки.

[bee_uk]

Key, я писала, как глобальная переменная...не уверена, что это правильно...но если я пишу так - у меня вдруг вылазят ошибки в других местах(не распознаются русские буквы почему-то из-за этого)

[Sazary]

Так вам нужна проверка в реальном времени (прямо при вводе), или уже потом, например, по нажатию кнопки?
Про точку я это имел в виду:

int cnt=0,i;
for(i=1; i<=Edit1->Text.Length(); i++)
 if(Edit1->Text[i]==DecimalSeparator) ++cnt;
if(cnt>1)
 {
  ShowMessage("Ошибка!");
  return;
 }

[bee_uk]

Да, мне надо,когда на кнопку нажимаешь, что ыбло сообщение, что типа ошибка))

[bee_uk]

и куда вставить этот код про точку???я вставляю как

void __fastcall TForm1::FormCreate(TObject *Sender)
{
 int cnt=0,i;
for(i=1; i<=Edit1->Text.Length(); i++)
 if(Edit1->Text[i]==DecimalSeparator) ++cnt;
if(cnt>1)
 {
  ShowMessage("Ошибка!");
  return;
 }

и ничего!(((

Модератор: тег CODE

[Sazary]

А при чем тут FormCreate? Ставьте на кнопку. Этот код должен выполняться, когда в эдите уже что-то есть.

[pu4koff]

Так в билдере должны быть функции: TryStrToInt / TryStrToFloat (в делфях по крайней мере есть, думаю и в билдер "завезли").
Сначала пытаетесь строку перевести в число, если удалось, то уже число проверяете отрицательное оно или какое-то еще.

int x;
if (TryStrToInt(Edit1->Text, x))
{
  if (x < 0)
  {
    ShowMessage("x < 0");
    return;
  }
}
else
{
  ShowMessage("Введено некорректное число");
  return;
}