[yusnerqui]

Pues te pudieras definir un constructor para tu form4

Código Delphi [-]
 Constructor CreateDiferente(AOwner: TComponent;FormLLama : Byte);

Implementation
 
Constructor TForm4.CreateDiferente(AOwner: TComponent;FormLLama : Byte);
begin
  Inherited Create (AOwner);
  Case  FormLLama of
    1:'Hago esto';
    2:'Hago lo otro'
    3:'Hago lo de más allá'
  end;
  showmodal;
end; 
 
//ahora para crear tu forma desde una de las otras puedes decir.
  with TForm4.CreateDiferente(Application,1) do
     free;

Espero que esto te guste, y sea lo que buscas.

Saludos Yusnerqui