Hola, intentaste de esta forma?:
Código Delphi
[-]procedure TForm2.Proveedores1Click(Sender: TObject);
begin
Application.CreateForm(TForm4, Form4);
Form4.Show;
end;
o
Código Delphi
[-]procedure TForm2.Proveedores1Click(Sender: TObject);
begin
Form4:=TForm4.Create(self);
Form4.Show;
end;
Saludos.