Ocultar botones distintos form

[ecfisa]

Hola.

Recibí bién tu ejemplo por pm.

Fijate que incluí el método de clase ShowForm para que la creación se haga dentro del mismo código del form.

No tenes que llamar a Form2 así:

Código Delphi [-]
procedure TForm4.Formulario22Click(Sender: TObject);
begin
   tform2.Create(self).ShowModal; // NO
end;

Tenes que llamarlo de igual modo que lo hace Form1:

Código Delphi [-]
procedure TForm4.Formulario22Click(Sender: TObject);
begin
  TForm2.ShowForm(False);  // False = No visible
end;

Saludos.