Evitar solamente Alt+f4 en mi aplicacion

[yusnerqui]

No estoy seguro que sea esto lo que quieres pero prueba esto en el evento on close

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
if Application.Active then
Action:= caNone
else
Action := caFree;
end;

yo creo que pincha