}
//---------------------------------------------------------------------------
fastcall TForm1::Edit2KeyPress(TObject *Sender, char &Key)
{(Key)
{'0':case '1':case '2':'3':case '4':case '5':'6':case '7':case '8':'9':case 8:break;',':
{=',';(Edit2->Text.Pos(Key) !=0) Key=0;
break;
}:Key=0;
}
}
ПРИЛОЖЕНИЕ В
Результаты работы программы
Рисунок 1 - Модель затвердевания стали
Самое читаемое:
Аппаратура цифровой радиосвязи в нелицензируемой полосе частот
Аппаратура
цифровой радиосвязи предназначена для решения широкого круга задач беспроводной
связи (дистанционного управления, телеметрии, сигнализации и оповещения) на
небольших территориях. Она находит применение в инженерных системах жилых
микрорайонов, в системах пожарной и охранной сигнализации, в
производственно-технологических ...