diff --git a/Source/GUIBase/GUIBase.dproj b/Source/GUIBase/GUIBase.dproj
index c3550861..991b81a5 100644
--- a/Source/GUIBase/GUIBase.dproj
+++ b/Source/GUIBase/GUIBase.dproj
@@ -59,30 +59,30 @@
     <DelphiCompile Include="GUIBase.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="..\Modulos\Recibos de cliente\Base.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\cxLibraryD11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\cxTreeListD11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\dbrtl.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\dxBarD11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\dxBarExtItemsD11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\dxComnD11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\dxGDIPlusD11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\dxLayoutControlD11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\dxPSCoreD11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\dxPScxCommonD11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\dxPScxGrid6LnkD11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\dxPsPrVwAdvD11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\dxThemeD11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\frx11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\frxe11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\fs11.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\JvAppFrmD11R.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\JvCtrlsD11R.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\rtl.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\vcl.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\vcldb.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\vcljpg.dcp" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\vclx.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\Base.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\cxLibraryD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\cxTreeListD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dxBarD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dxBarExtItemsD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dxComnD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dxGDIPlusD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dxLayoutControlD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dxPSCoreD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dxPScxCommonD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dxPScxGrid6LnkD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dxPsPrVwAdvD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\frx11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\frxe11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\fs11.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\JvAppFrmD11R.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\JvCtrlsD11R.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\vcljpg.dcp" />
+    <DCCReference Include="C:\Documents and Settings\Usuario\vclx.dcp" />
     <DCCReference Include="uDialogBase.pas">
       <Form>fDialogBase</Form>
     </DCCReference>
diff --git a/Source/GUIBase/uEditorBase.pas b/Source/GUIBase/uEditorBase.pas
index 69f5a5a6..1da68fc2 100644
--- a/Source/GUIBase/uEditorBase.pas
+++ b/Source/GUIBase/uEditorBase.pas
@@ -263,8 +263,23 @@ procedure TfEditorBase.actImprimirExecute(Sender: TObject);
 begin
   if actImprimir.Enabled then
   begin
-    ImprimirInterno;
-    ActualizarEstadoEditor;
+    if Modified then
+    begin
+      if (ShowConfirmMessage('Se han producido cambios', 'Se han producido cambios y no se puede previsualizar hasta que no se guarden.' + #10#13 +
+        '¿Desea guardarlos ahora?') = IDYES) then
+      begin
+        GuardarInterno;
+        ImprimirInterno;
+        ActualizarEstadoEditor;
+      end
+      else
+        ShowInfoMessage('Recuerde guardar los cambios si quiere previsualizar o imprimir.');
+    end
+    else
+    begin
+      ImprimirInterno;
+      ActualizarEstadoEditor;
+    end
   end;
 end;
 
@@ -295,8 +310,23 @@ procedure TfEditorBase.actPrevisualizarExecute(Sender: TObject);
 begin
   if actPrevisualizar.Enabled then
   begin
-    PrevisualizarInterno;
-    ActualizarEstadoEditor;
+    if Modified then
+    begin
+      if (ShowConfirmMessage('Se han producido cambios', 'Se han producido cambios y no se puede previsualizar hasta que no se guarden.' + #10#13 +
+        '¿Desea guardarlos ahora?') = IDYES) then
+      begin
+        GuardarInterno;
+        PrevisualizarInterno;
+        ActualizarEstadoEditor;
+      end
+      else
+        ShowInfoMessage('Recuerde guardar los cambios si quiere previsualizar o imprimir.');
+    end
+    else
+    begin
+      PrevisualizarInterno;
+      ActualizarEstadoEditor;
+    end;
   end;
 end;
 
diff --git a/Source/GUIBase/uEditorDBItem.dfm b/Source/GUIBase/uEditorDBItem.dfm
index 5608817c..53548e08 100644
--- a/Source/GUIBase/uEditorDBItem.dfm
+++ b/Source/GUIBase/uEditorDBItem.dfm
@@ -77,10 +77,6 @@ inherited fEditorDBItem: TfEditorDBItem
     TabOrder = 2
     object pagGeneral: TTabSheet
       Caption = 'General'
-      ExplicitLeft = 0
-      ExplicitTop = 0
-      ExplicitWidth = 0
-      ExplicitHeight = 0
     end
   end
   inherited StatusBar: TJvStatusBar
diff --git a/Source/GUIBase/uEditorDBItem.pas b/Source/GUIBase/uEditorDBItem.pas
index b2fcc6a6..1c659633 100644
--- a/Source/GUIBase/uEditorDBItem.pas
+++ b/Source/GUIBase/uEditorDBItem.pas
@@ -26,8 +26,6 @@ type
     procedure lblDesbloquearClick(Sender: TObject);
   protected
     procedure EliminarInterno; override;
-    procedure PrevisualizarInterno; override;
-    procedure ImprimirInterno; override;
     procedure ActualizarEstadoEditor; override;
   end;
 
@@ -64,19 +62,6 @@ begin
   actCerrar.Execute;
 end;
 
-procedure TfEditorDBItem.ImprimirInterno;
-begin
-  inherited;
-  if Modified then
-  begin
-    if (ShowConfirmMessage('Se han producido cambios', 'Se han producido cambios y no se puede imprimir hasta que no se guarden.' + #13#10 +
-      '¿Desea guardarlos ahora?') = IDYES) then
-      actGuardar.Execute
-    else
-      ShowInfoMessage('Recuerde guardar los cambios si quiere previsualizar o imprimir.');
-  end;
-end;
-
 procedure TfEditorDBItem.lblDesbloquearClick(Sender: TObject);
 begin
   inherited;
@@ -92,19 +77,6 @@ begin
   end;
 end;
 
-procedure TfEditorDBItem.PrevisualizarInterno;
-begin
-  inherited;
-  if Modified then
-  begin
-    if (ShowConfirmMessage('Se han producido cambios', 'Se han producido cambios y no se puede previsualizar hasta que no se guarden.' + #10#13 +
-      '¿Desea guardarlos ahora?') = IDYES) then
-      actGuardar.Execute
-    else
-      ShowInfoMessage('Recuerde guardar los cambios si quiere previsualizar o imprimir.');
-  end;
-end;
-
 initialization
   RegisterClass(TfEditorDBItem);
 
diff --git a/Source/Modulos/Albaranes de cliente/Views/uViewDatosYSeleccionClienteAlbaran.pas b/Source/Modulos/Albaranes de cliente/Views/uViewDatosYSeleccionClienteAlbaran.pas
index cfbcd938..27f37726 100644
--- a/Source/Modulos/Albaranes de cliente/Views/uViewDatosYSeleccionClienteAlbaran.pas	
+++ b/Source/Modulos/Albaranes de cliente/Views/uViewDatosYSeleccionClienteAlbaran.pas	
@@ -322,13 +322,13 @@ begin
     if FCliente.ID > 0 then
        edtPersonaContacto.Enabled := True;
 
-    if FCliente.Direcciones.RecordCount > 0 then
-      ElegirDireccionCliente
-    else begin
-      FAlbaran.Edit;
-      FAlbaran.PERSONA_CONTACTO := FCliente.PERSONA_CONTACTO;
-      RefrescarDireccion;
-    end;
+//    if FCliente.Direcciones.RecordCount > 0 then
+//      ElegirDireccionCliente
+//    else begin
+//      FAlbaran.Edit;
+//      FAlbaran.PERSONA_CONTACTO := FCliente.PERSONA_CONTACTO;
+//      RefrescarDireccion;
+//    end;
   end
   else begin
     dsCliente.DataTable := NIL;
diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES
index ad8e8b78..231fbf6f 100644
Binary files a/Source/Servidor/FactuGES_Server.RES and b/Source/Servidor/FactuGES_Server.RES differ
diff --git a/Source/Servidor/FactuGES_Server.rc b/Source/Servidor/FactuGES_Server.rc
index 55ee2251..ea4994ae 100644
--- a/Source/Servidor/FactuGES_Server.rc
+++ b/Source/Servidor/FactuGES_Server.rc
@@ -14,7 +14,7 @@ BEGIN
          BEGIN
               VALUE "FileVersion", "1.7.8.0\0"
               VALUE "ProductVersion", "1.7.8.0\0"
-              VALUE "CompileDate", "jueves, 19 de noviembre de 2009 13:03\0"
+              VALUE "CompileDate", "martes, 24 de noviembre de 2009 11:06\0"
          END
     END
     BLOCK "VarFileInfo"