Код: Выделить всё
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text:='dfdfdfd';
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Edit1.Name:='Edit2';
end;
Edit1.Text:='dfdfdfd'; теперь не работает, а Edit2 компилятор написать не даёт
