Quitadas las llamadas a 'ShowCapado'
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@922 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
parent
28cc4ff877
commit
4f94bafe91
@ -106,7 +106,6 @@ uses
|
||||
}
|
||||
procedure TfEditorAlbaranesCliente.actCancelarEnvioExecute(Sender: TObject);
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
|
||||
@ -134,7 +133,6 @@ end;
|
||||
|
||||
procedure TfEditorAlbaranesCliente.actConfirmarRecepcionExecute(Sender: TObject);
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
|
||||
@ -168,7 +166,6 @@ end;
|
||||
|
||||
procedure TfEditorAlbaranesCliente.actGenerarEtiquetasExecute(Sender: TObject);
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
//Miramos si viene de un pedido previo, si no es asi le preguntamos si desea imprimir la referencia del cliente
|
||||
@ -231,7 +228,6 @@ procedure TfEditorAlbaranesCliente.actEnviarExecute(Sender: TObject);
|
||||
// AFacturasController : IFacturasClienteController;
|
||||
// AAlbaran : IBizAlbaranCliente;
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
bCambiarEstado := False;
|
||||
|
||||
@ -274,7 +274,6 @@ end;
|
||||
|
||||
procedure TfEditorFacturaProveedor.ImprimirInterno;
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
FController.Print(FFactura);
|
||||
@ -352,7 +351,6 @@ end;
|
||||
|
||||
procedure TfEditorFacturaProveedor.PrevisualizarInterno;
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
FController.Preview(FFactura);
|
||||
|
||||
@ -90,7 +90,6 @@ uses
|
||||
}
|
||||
procedure TfEditorPedidosProveedor.actCambiarSituacionExecute(Sender: TObject);
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
FController.CambiarSituacion(FPedidos)
|
||||
|
||||
@ -246,7 +246,6 @@ end;
|
||||
|
||||
procedure TfEditorReciboProveedor.ImprimirInterno;
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
FController.Print(FRecibo);
|
||||
@ -288,7 +287,6 @@ end;
|
||||
|
||||
procedure TfEditorReciboProveedor.PrevisualizarInterno;
|
||||
begin
|
||||
AppFactuGES.ShowCapado;
|
||||
{
|
||||
inherited;
|
||||
FController.Preview(FRecibo);
|
||||
|
||||
Loading…
Reference in New Issue
Block a user