их СИТУАЦІЙ були прий-няті Такі заходь:
. Для коректного Введення року НЕ дозволяється залішаті поле порожнім
(_year =="")
{
* err=«Заповніть поле Рік»; false;
}
. Для коректного Введення року НЕ дозволяється вводіті рік Менш чем 1900 та не більш чем 2013
((((TEdit *) Sender) -> Text.Length () <3) | | (StrToInt (eYear-> Text) <1900) | | (StrToInt (eYear-> Text)> 2013))
{(0, «некоректно дата», «Помилка», mrOk);;
}
. Для коректного Введення року БУВ Доданий обробнік подій для полів Введення OnKeyPress, Який НЕ дозволяє вводіті Нічого окрім цифр та не більш чем 4 рази
if ((Key>=«0») && (Key <= «9») | | (Key == VK_BACK))
Key!=0;=0; (Key == VK_BACK); (((TEdit *) Sender) -> Text.Length ()> 3)
{= 0; ;
}
4. Для коректного Введення типом промісловості НЕ дозволяється залішаті поле порожнім
(_kind =="")
{
* err=«Заповніть поле Вид промисловості»; false;
}
5. Для коректного Введення типом промісловості БУВ Доданий обробнік подій для полів Введення OnKeyPress, Який НЕ дозволяє Введення Нічого окрім букв російського та українського алфавіту
(((Key>=«а») && (Key <= «я»)) | | ((Key>=«А») && (Key<=«Я»))||(Key<=«і»)||(Key<=«ї»)||(Key<=«І»)||(Key<=«Ї»)|| (Key == VK_BACK))!=0;=0;
6. Для коректного запровадження про єму виробництва НЕ дозволяється залішаті поле порожнім
if (_size =="")
{
* err=«Заповніть поле Обсяг виробництва»; false;
}
7. Для коректного запровадження про єму виробництва БУВ Доданий обробнік подій для полів Введення OnKeyPress, Який НЕ дозволяє вводіті Нічого окрім цифр
((Key>=«0») && (Key <«9») | | (Key == VK_BACK))!=0;=0; p>
8. Для коректного Введення регіону НЕ дозволяється залішаті поле порожнім
(_region =="")
{
* err=«Заповніть поле Регіон»; false;
}
9. Для коректного будування діаграмі НЕ дозволяється додаваті до табліці запісів Однаково запісів
p=sgData-> RowCount; (int i=1;i<p;i++)(eRegion->Text==sgData->Cells[3][i])(eKind->Text==sgData->Cells[1][i])(eYear->Text==sgData->Cells[0][i])
{(0, «Такий запис вже присутня», «Помилка», mrOk);;
}
10. Для коректного будування діаграмі НЕ дозволяється будування при порожній табліці
(sgData-> Cells [0] [1] =="")
{(0, «Перед побудовою графіка заповніть таблицю з даними», «Помилка», mrOk);;