[Decoding]

Сначала пропиши имя модуля первой формы в uses второй

Код:

unit Form2;

uses
  ..., Form1;

а потом так

Код:

procedure TForm2.Button1Click(Sender: TObject);
begin
   Form1.Edit1.Text := 'что угодно';
end;