Artículos: quitar warnings.

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@283 f4e31baf-9722-1c47-927c-6f952f962d4b
2008-07-22 14:42:39 +00:00 · 2008-07-22 14:42:39 +00:00 · d4d2e120a5
commit d4d2e120a5
parent 155b4f36f6
4 changed files with 4 additions and 2 deletions
--- a/Source/Modulos/Articulos/Views/uViewArticulo.dfm
+++ b/Source/Modulos/Articulos/Views/uViewArticulo.dfm
@ -15,6 +15,7 @@ inherited frViewArticulo: TfrViewArticulo
    Align = alTop
    ParentBackground = True
    TabOrder = 0
+    TabStop = False
    AutoContentSizes = [acsWidth]
    DesignSize = (
      451
--- a/Source/Modulos/Articulos/Views/uViewArticulo.pas
+++ b/Source/Modulos/Articulos/Views/uViewArticulo.pas
@ -237,8 +237,8 @@ begin
 end;

 procedure TfrViewArticulo.SalvarImagen;
-var
-  aAux : String;
+{var
+  aAux : String;}
 begin
 {  ShowHourglassCursor;
  try
--- a/Source/Modulos/Articulos/Views/uViewArticulos.dfm
+++ b/Source/Modulos/Articulos/Views/uViewArticulos.dfm
@ -135,6 +135,7 @@ inherited frViewArticulos: TfrViewArticulos
  end
  inherited pnlAgrupaciones: TTBXDockablePanel
    Visible = True
+    ExplicitWidth = 128
    inherited TBXAlignmentPanel1: TTBXAlignmentPanel
      inherited TBXToolbar1: TTBXToolbar
        object TBXSeparatorItem1: TTBXSeparatorItem
--- a/Source/Modulos/Articulos/Views/uViewArticulos.pas
+++ b/Source/Modulos/Articulos/Views/uViewArticulos.pas