Cómo cerrar un Formulario desde otro Formulario

[kainchu3102]

Hola buenas gente queria hacer un consulta, como puede hacer para cerrar un Formulario desde otro Formulario en el evento Close, ambos formulario se ejecutan de forma ShowModal. pero intente podiendo en el evento onclose y no lo cierra.

Código Delphi [-]
procedure TFORMVENTAS.FormClose(Sender: TObject; var Action: TCloseAction);
begin
        FORMPRINCIPAL.Close;
end;

Que podria ser que me estaria faltando?. Muchas gracias desde ya.