Hola...
Solo tienes que hacer (tomando en cuenta que el botón se encuentra dentro del
Frame):
Código Delphi
[-]
procedure TfrmAlmacen.BtnCloseClick(Sender: TObject);
begin
Self.Parent.Free
end;
recuerda que el parent del frame es un Tab de tu PageControl...
Saludos...