Repaso de clientes

git-svn-id: https://192.168.0.254/svn/Proyectos.Noviseda_FactuGES2/trunk@71 f33bb606-9f5c-448d-9c99-757f00063c96
This commit is contained in:
David Arranz 2010-01-27 15:43:32 +00:00
parent be1e6b4c2e
commit 9540b9e48b

View File

@ -178,6 +178,9 @@ var
AClientes: IBizCliente; AClientes: IBizCliente;
AllItems: Boolean; AllItems: Boolean;
begin begin
inherited;
{
AClientes := Nil; AClientes := Nil;
AllItems := False; AllItems := False;
@ -217,6 +220,7 @@ begin
end; end;
end; end;
end; end;
}
end; end;
procedure TfEditorClientes.PonerTitulos(const ATitulo: string); procedure TfEditorClientes.PonerTitulos(const ATitulo: string);
@ -233,6 +237,10 @@ var
AClientes: IBizCliente; AClientes: IBizCliente;
AllItems: Boolean; AllItems: Boolean;
begin begin
inherited;
//Se desactiva las opciones de impresion
{
AClientes := Nil; AClientes := Nil;
AllItems := False; AllItems := False;
@ -272,6 +280,7 @@ begin
end; end;
end; end;
end; end;
}
end; end;
end. end.