}
//---------------------------------------------------------------------------
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 - Модель затвердевания стали
Самое читаемое:
Исследование зон затенения сигналов систем сотовой связи в районах г. Йошкар-Олы
С
начала 70-х годов внимание исследователей и инженеров во многих странах было
обращено к проблеме распространения ультракоротких волн (УКВ) в городах. Это
связано с интенсивным развитием систем радиосвязи различного назначения - от
телевидения до систем связи с подвижными объектами и радиотелефонии, играющих в
жизни городов ...