void __fastcall TForm1::Edit1KeyPress (TObject *Sender, char &Key)
{
if (Key != '+')
Key = 0;
}
Две проблемы
И еще как организовать цыкл для того же Edit, всмысле типо так:
for (i=1;1<17;i=i+1){Edit[COLOR="Red"]i[/COLOR]->Clear();}
а то харит по-одному писать.
Код:
2. Создать поле - массив указателей на TEdit. В конструкторе произвести его заполнение адресами объектов. В функции выполнить цикл по этому массиву
2. Либо организовать цикл по TForm.Controls и проверять св-во ClassName на совпадение с TEdit.