В общем как сделать так, чтобы при нажатии кнопки не вылазила ошибка, т.е. что-то я не правильно определяю....
На форме Edit1, остальные Edit'ы создаются динамически.
Код:
implementation
uses Unit2;
......
функции
......
PROCEDURE FILLING_COMBOBOX_FILE;
Begin
Form1.Edit1.Text:='1'; //Работает
TEdit('Edit'+IntToStr(1)+IntToStr(1)).Text:='1';//Компилируется, но при выполнении выдается ошибка
End;
.....
procedure TForm1.Button2Click(Sender: TObject);
begin
PROCEDURE FILLING_COMBOBOX_FILE;
end;
....