Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для Drongo

Будем жить, Маэстро...


Сообщения: 6694
Благодарности: 1393

Профиль | Сайт | Отправить PM | Цитировать


ShadowMas,
Код: Выделить весь код
if(Edit2->Text != "" && Edit1->Text != "" && StrToInt(Edit2->Text)<=StrToInt(Edit1->Text)
Если Edit не равен пустому и содержимое первого Edit меньше или равно содержимому второго Edit то очистить второй Edit и установить фокус на него, я извиняюсь, это не совсем тот код, но мне он тогда помог. Нужно условие немножко изменить с && на || и добавить в обработчике onExit строки: Естественно Edit'ы могут быть разными.
Код: Выделить весь код
Edit1->Text=""; //Очищаем Edit1...
Edit1->SetFocus(); //...и устанавливаем фокус на него.
можно ещё так, в обработчике OnKeyPress:
Код: Выделить весь код
//Функция ввода, проверяет ввод только цифр  А != 0 или D != 0, для Edit1 и Edit2
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
        if ((Key >= '0') && (Key <= '9') || Key == '-' || Key == VK_BACK) {}  // цифры
        else if ((Key == '.') || (Key == ','))//{ // запятая
//                if (((TEdit*)Sender)->Text.Pos(DecimalSeparator)!= 0) // если запятая уже есть
                    Key = 0;
  //              else // если ещё нет
    //                Key = DecimalSeparator;
      //        }
             else
                   Key = 0; // не цифра
}
Здесь я оставил символ '-' - минус, точку и запятую, чтобы вводить дробные отрицательные значения.

-------
Правильная постановка вопроса свидетельствует о некотором знакомстве с делом.
3нание бывает двух видов. Мы сами знаем предмет — или же знаем, где найти о нём сведения.
[Quick Killer 3.0 Final [OSZone.net]] | [Quick Killer 3.0 Final [SafeZone.cc]] | [Парсер логов Gmer] | [Парсер логов AVZ]

http://tools.oszone.net/Drongo/Userbar/SafeZone_cc.gif

Это сообщение посчитали полезным следующие участники:

Отправлено: 17:27, 15-10-2008 | #6