}
//---------------------------------------------------------------------------
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 - Модель затвердевания стали
Самое читаемое:
Следящий электропривод
Автоматизация процессов управления различными
объектами связана с широким использованием следящих приводов. Следящие приводы
нашли применение во многих областях техники: в системах управления станками, в
системах управления манипуляторами, в моделирующих стендах, в системах
управления объектами вооружения и т. д.
Следящий электро ...