From 0f41ff0a607a2ac90d769e8fa84de74a5781a830 Mon Sep 17 00:00:00 2001 From: roberto Date: Mon, 9 Jun 2008 07:53:09 +0000 Subject: [PATCH] =?UTF-8?q?Arreglo=20de=20impresion=20y=20previsualizaci?= =?UTF-8?q?=C3=B3n=20de=20fichas=20de=20empleado=20que=20solo=20se=20pod?= =?UTF-8?q?=C3=ADa=20hacer=20ciertos=20sitios?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@446 0c75b7a4-871f-7646-8a2f-f78d34cc349f --- .../Contactos/Views/Contactos_view.res | Bin 384 -> 4748 bytes .../Contactos/Views/uEditorEmpleado.dfm | 117 ++++++++---------- .../Contactos/Views/uEditorEmpleado.pas | 43 ++++++- .../Contactos/Views/uEditorEmpleados.dfm | 20 ++- .../Contactos/Views/uEditorEmpleados.pas | 12 +- .../Modulos/Contactos/Views/uViewEmpleado.dfm | 100 +++++++-------- .../Modulos/Contactos/Views/uViewEmpleado.pas | 8 +- Source/Servidor/FactuGES_Server.RES | Bin 23200 -> 23204 bytes Source/Servidor/FactuGES_Server.rc | 2 +- 9 files changed, 159 insertions(+), 143 deletions(-) diff --git a/Source/Modulos/Contactos/Views/Contactos_view.res b/Source/Modulos/Contactos/Views/Contactos_view.res index 8b251f312bcccec5485024f6fe8d80e1cdf25746..1641339fcc482e7e3492d1b45813a86619622c33 100644 GIT binary patch literal 4748 zcmbW5&ub)A5XUPdpe&2#;C*uNAUVhgd+&(4um@dnom`vXF9g}ZuHJ;se=<3UNdFJg zbCw+UD9j$byGIXV`~6hC>h4S?F|k9X-j90q{Z_qtZ<;nUJCO8!h?p${kR>3GhM`oH*q zk=UsjOCIgA_4!`B+Gb&`I84R)bT4dy-BQV<-SyFz?R8ILEQ(+JB$u{sEXE@j@B*7W zT;iZH#|OJ<&DO$RCkM6VbK3(B(k{nbdv1lpc;E$xz9as|v3uE1V{hw2w~g3eD0an7 z{BT%G%irdMe*|oDJmgvJaA2`9B<6Xi*?M~Q;)@Sbfwf3uf zVaWkbUjU=;sL{BlYemIZXv%qZ{SZw{-TCU+;!nH6KDDIJumU+9{E0zXW4>7T)y|>$DQlv zRJe?TjSp{c!DqeayAnSMTtZZT;>LN7J0Rls+5m@q)MbyB*eL%Eu@(+$Cw}Pd@q7N| z%Q0*AHpCP^b9v`@jx-l_FD>khpW2W8(OU2&V5TrnoAY-m_hlcV?zq3;7{2gF{J#Hc z6R+o~mVenX?>@W0@_DVzyOFs(5464CY{!q9ChoF#_*eXi@4gFuV8?vhl=_w5$iKL0 zEV0nMBcN08xtRmsgJrqjh@s#|{?*ssnsG)mH*wa6{efF0JFWHok@kA5%b661{B38= zCcgJ|*ZFTpV$8<-&+AWpa)Q8*`wL&hMeNQ^v6I7$HSdLZhZ^&+6<@Uw_Zsml9^v3W zVvPDBKHh;i=RU4J_ta3E;)Mn>Y+L zKLZ0UQ+*km9FO-b?U4gmn-62iwzH6&*duKGo~aUV)bYDla8wWZ9+^7p-F<8lP@i!m z@vhbD_${F}h>^T;C(?(b*OJDk?{dEXB?nuehoON3HAb!7Mr7-ls!84-5V-jJugbu<_$}mU=Yd9!?TOX;|B-#B)+0x#9q*yqJiqS!`49d=7ztk$O+9=1i;?K_|J<8T z?0b7=-`Z3A#vV$4XJ5(lQ~TOZHUFdA%oWvK5zg&_IKXIbughQBA8XAsd#=@|TFLXC zy(^m((;DnQmDQKatmw!@c`| G?EMQ&4NnpP delta 11 ScmeBCZD5|Duvteife`=|>;pCc diff --git a/Source/Modulos/Contactos/Views/uEditorEmpleado.dfm b/Source/Modulos/Contactos/Views/uEditorEmpleado.dfm index a35908f8..3e510bf6 100644 --- a/Source/Modulos/Contactos/Views/uEditorEmpleado.dfm +++ b/Source/Modulos/Contactos/Views/uEditorEmpleado.dfm @@ -3,7 +3,7 @@ inherited fEditorEmpleado: TfEditorEmpleado ClientHeight = 583 ClientWidth = 929 ExplicitWidth = 937 - ExplicitHeight = 610 + ExplicitHeight = 617 PixelsPerInch = 96 TextHeight = 13 inherited JvNavPanelHeader: TJvNavPanelHeader @@ -112,20 +112,20 @@ inherited fEditorEmpleado: TfEditorEmpleado inherited eCalle: TcxDBTextEdit Top = 216 ExplicitTop = 216 - ExplicitWidth = 174 - Width = 174 + ExplicitWidth = 341 + Width = 341 end inherited eProvincia: TcxDBTextEdit Top = 270 ExplicitTop = 270 - ExplicitWidth = 174 - Width = 174 + ExplicitWidth = 341 + Width = 341 end inherited ePoblacion: TcxDBTextEdit Top = 243 ExplicitTop = 243 - ExplicitWidth = 108 - Width = 108 + ExplicitWidth = 240 + Width = 240 end inherited eCodigoPostal: TcxDBTextEdit Left = 397 @@ -136,82 +136,82 @@ inherited fEditorEmpleado: TfEditorEmpleado inherited eObservaciones: TcxDBMemo Top = 348 ExplicitTop = 348 - ExplicitWidth = 185 - ExplicitHeight = 148 - Height = 148 - Width = 185 + ExplicitWidth = 871 + ExplicitHeight = 90 + Height = 90 + Width = 871 end inherited eFechaNacimiento: TcxDBDateEdit Top = 84 ExplicitTop = 84 - ExplicitWidth = 80 - Width = 80 + ExplicitWidth = 341 + Width = 341 end inherited eFechaAltaEmpresa: TcxDBDateEdit Top = 111 ExplicitTop = 111 - ExplicitWidth = 80 - Width = 80 + ExplicitWidth = 341 + Width = 341 end inherited cbCategoria: TcxDBComboBox Top = 138 ExplicitTop = 138 - ExplicitWidth = 225 - Width = 225 + ExplicitWidth = 341 + Width = 341 end inherited eTlfParticular: TcxDBTextEdit Left = 585 Top = 57 ExplicitLeft = 585 ExplicitTop = 57 - ExplicitWidth = 172 - Width = 172 + ExplicitWidth = 308 + Width = 308 end inherited eTlfTrabajo: TcxDBTextEdit Left = 585 Top = 30 ExplicitLeft = 585 ExplicitTop = 30 - ExplicitWidth = 172 - Width = 172 + ExplicitWidth = 308 + Width = 308 end inherited cbContrato: TcxDBComboBox Left = 585 Top = 270 ExplicitLeft = 585 ExplicitTop = 270 - ExplicitWidth = 292 - Width = 292 + ExplicitWidth = 308 + Width = 308 end inherited eTlfMovil: TcxDBTextEdit Left = 585 Top = 84 ExplicitLeft = 585 ExplicitTop = 84 - ExplicitWidth = 172 - Width = 172 + ExplicitWidth = 308 + Width = 308 end inherited eFax: TcxDBTextEdit Left = 585 Top = 111 ExplicitLeft = 585 ExplicitTop = 111 - ExplicitWidth = 172 - Width = 172 + ExplicitWidth = 308 + Width = 308 end inherited eNombre: TcxDBTextEdit Top = 57 ExplicitTop = 57 - ExplicitWidth = 263 - Width = 263 + ExplicitWidth = 341 + Width = 341 end inherited eNIFCIF: TcxDBTextEdit Left = 259 Top = 30 ExplicitLeft = 259 ExplicitTop = 30 - ExplicitWidth = 194 - Width = 194 + ExplicitWidth = 203 + Width = 203 end inherited eMailTrabajo: TcxDBHyperLinkEdit Left = 585 @@ -219,8 +219,8 @@ inherited fEditorEmpleado: TfEditorEmpleado Properties.Prefix = 'mailto:' ExplicitLeft = 585 ExplicitTop = 162 - ExplicitWidth = 129 - Width = 129 + ExplicitWidth = 279 + Width = 279 end inherited eMailParticular: TcxDBHyperLinkEdit Left = 585 @@ -228,36 +228,36 @@ inherited fEditorEmpleado: TfEditorEmpleado Properties.Prefix = 'mailto:' ExplicitLeft = 585 ExplicitTop = 190 - ExplicitWidth = 165 - Width = 165 + ExplicitWidth = 279 + Width = 279 end inherited eDuracionContrato: TcxDBTextEdit Left = 585 Top = 297 ExplicitLeft = 585 ExplicitTop = 297 - ExplicitWidth = 114 - Width = 114 + ExplicitWidth = 308 + Width = 308 end inherited ePaginaWeb: TcxDBHyperLinkEdit Left = 585 Top = 217 ExplicitLeft = 585 ExplicitTop = 217 - ExplicitWidth = 165 - Width = 165 + ExplicitWidth = 279 + Width = 279 end inherited eReferencia: TcxDBTextEdit Top = 30 ExplicitTop = 30 - ExplicitWidth = 97 - Width = 97 + ExplicitWidth = 105 + Width = 105 end inherited ePersonaContacto: TcxDBTextEdit Top = 297 ExplicitTop = 297 - ExplicitWidth = 256 - Width = 256 + ExplicitWidth = 341 + Width = 341 end end inherited dsContacto: TDADataSource @@ -283,18 +283,6 @@ inherited fEditorEmpleado: TfEditorEmpleado inherited ToolBar1: TToolBar Width = 915 ExplicitWidth = 915 - inherited ToolButton1: TToolButton - ExplicitWidth = 113 - end - inherited ToolButton4: TToolButton - ExplicitWidth = 113 - end - inherited ToolButton2: TToolButton - ExplicitWidth = 113 - end - inherited ToolButton7: TToolButton - ExplicitWidth = 113 - end end end end @@ -305,7 +293,6 @@ inherited fEditorEmpleado: TfEditorEmpleado inherited frViewPersonalContacto1: TfrViewPersonalContacto Width = 915 Height = 454 - ExplicitTop = 0 ExplicitWidth = 915 ExplicitHeight = 454 inherited cxGrid: TcxGrid @@ -331,6 +318,7 @@ inherited fEditorEmpleado: TfEditorEmpleado Align = alClient ParentBackground = True TabOrder = 0 + TabStop = False AutoContentSizes = [acsWidth, acsHeight] LookAndFeel = dxLayoutOfficeLookAndFeel object eFormacionBasica: TcxDBMemo @@ -351,8 +339,8 @@ inherited fEditorEmpleado: TfEditorEmpleado StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 0 - Height = 89 - Width = 580 + Height = 116 + Width = 871 end object eFormacionComplementaria: TcxDBMemo Left = 22 @@ -372,8 +360,8 @@ inherited fEditorEmpleado: TfEditorEmpleado StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 1 - Height = 89 - Width = 580 + Height = 116 + Width = 871 end object eFormacionRecibida: TcxDBMemo Left = 22 @@ -393,8 +381,8 @@ inherited fEditorEmpleado: TfEditorEmpleado StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 2 - Height = 89 - Width = 580 + Height = 116 + Width = 871 end object dxLayoutControl1Group_Root: TdxLayoutGroup Caption = 'Formaci'#243'n b'#225'sica' @@ -448,6 +436,7 @@ inherited fEditorEmpleado: TfEditorEmpleado Align = alClient ParentBackground = True TabOrder = 0 + TabStop = False AutoContentSizes = [acsWidth, acsHeight] LookAndFeel = dxLayoutOfficeLookAndFeel object eExperiencia: TcxDBMemo @@ -469,8 +458,8 @@ inherited fEditorEmpleado: TfEditorEmpleado StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 0 - Height = 89 - Width = 580 + Height = 408 + Width = 871 end object dxLayoutGroup1: TdxLayoutGroup Caption = 'Formaci'#243'n b'#225'sica' diff --git a/Source/Modulos/Contactos/Views/uEditorEmpleado.pas b/Source/Modulos/Contactos/Views/uEditorEmpleado.pas index 68b86982..b5f3e5d9 100644 --- a/Source/Modulos/Contactos/Views/uEditorEmpleado.pas +++ b/Source/Modulos/Contactos/Views/uEditorEmpleado.pas @@ -12,7 +12,13 @@ uses uIEditorEmpleado, pngimage, TBXStatusBars, JvExComCtrls, JvStatusBar, uViewDetallesGenerico, uViewContactoDatosBancarios, dxLayoutLookAndFeels, dxLayoutControl, cxContainer, cxEdit, cxTextEdit, cxMemo, cxDBEdit, cxControls, - uDAInterfaces, uViewContactoListaDatosBancarios, uViewPersonalContacto; + uDAInterfaces, uViewContactoListaDatosBancarios, uViewPersonalContacto, + dxSkinsCore, dxSkinBlack, dxSkinBlue, dxSkinCaramel, dxSkinCoffee, + dxSkinGlassOceans, dxSkiniMaginary, dxSkinLilian, dxSkinLiquidSky, + dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMoneyTwins, dxSkinOffice2007Black, + dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink, + dxSkinOffice2007Silver, dxSkinSilver, dxSkinStardust, dxSkinsDefaultPainters, + dxSkinValentine, dxSkinXmas2008Blue, dxSkinsdxLCPainter; type TfEditorEmpleado = class(TfEditorContacto, IEditorEmpleado) @@ -39,6 +45,8 @@ type procedure actGruposEmpleadoExecute(Sender: TObject); protected procedure EliminarInterno; override; + procedure ImprimirInterno; override; + procedure PrevisualizarInterno; override; procedure SetContacto(const Value: IBizContacto); override; public constructor Create(AOwner: TComponent); override; @@ -48,7 +56,8 @@ type implementation uses - uEditorDBItem, uDialogUtils, uGruposEmpleadoController, uBizGruposEmpleado; + uEditorDBItem, uDialogUtils, uGruposEmpleadoController, uBizGruposEmpleado, + uEmpleadosController; {$R *.dfm} @@ -81,6 +90,21 @@ begin inherited; end; +procedure TfEditorEmpleado.ImprimirInterno; +var + Respuesta : Integer; + AFichas: IBizEmpleado; + AllItems: Boolean; +begin + AFichas := Nil; + AllItems := False; + + AFichas := (Contacto as IBizEmpleado); + + if Assigned(AFichas) then + (FController as IEmpleadosController).Print(AFichas); +end; + procedure TfEditorEmpleado.PonerTitulos(const ATitulo: string); var FTitulo : String; @@ -96,6 +120,21 @@ begin inherited PonerTitulos(FTitulo); end; +procedure TfEditorEmpleado.PrevisualizarInterno; +var + Respuesta : Integer; + AFichas: IBizEmpleado; + AllItems: Boolean; +begin + AFichas := Nil; + AllItems := False; + + AFichas := (Contacto as IBizEmpleado); + + if Assigned(AFichas) then + (FController as IEmpleadosController).Preview(AFichas); +end; + procedure TfEditorEmpleado.SetContacto(const Value: IBizContacto); begin inherited; diff --git a/Source/Modulos/Contactos/Views/uEditorEmpleados.dfm b/Source/Modulos/Contactos/Views/uEditorEmpleados.dfm index 98acf8b8..271d0237 100644 --- a/Source/Modulos/Contactos/Views/uEditorEmpleados.dfm +++ b/Source/Modulos/Contactos/Views/uEditorEmpleados.dfm @@ -103,27 +103,15 @@ inherited fEditorEmpleados: TfEditorEmpleados Width = 786 ExplicitWidth = 786 inherited txtFiltroTodo: TcxTextEdit - Style.LookAndFeel.SkinName = '' - StyleDisabled.LookAndFeel.SkinName = '' - StyleFocused.LookAndFeel.SkinName = '' - StyleHot.LookAndFeel.SkinName = '' ExplicitWidth = 689 Width = 689 end inherited edtFechaIniFiltro: TcxDateEdit - Style.LookAndFeel.SkinName = '' - StyleDisabled.LookAndFeel.SkinName = '' - StyleFocused.LookAndFeel.SkinName = '' - StyleHot.LookAndFeel.SkinName = '' ExplicitWidth = 290 Width = 290 end inherited edtFechaFinFiltro: TcxDateEdit Left = 394 - Style.LookAndFeel.SkinName = '' - StyleDisabled.LookAndFeel.SkinName = '' - StyleFocused.LookAndFeel.SkinName = '' - StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 394 ExplicitWidth = 382 Width = 382 @@ -162,6 +150,14 @@ inherited fEditorEmpleados: TfEditorEmpleados BuiltInReportLink = True end end + inherited cxViewGridPopupMenu: TcxGridPopupMenu + PopupMenus = < + item + GridView = frViewEmpleados1.cxGridView + HitTypes = [gvhtCell] + Index = 0 + end> + end end inherited EditorActionList: TActionList [4] Left = 72 diff --git a/Source/Modulos/Contactos/Views/uEditorEmpleados.pas b/Source/Modulos/Contactos/Views/uEditorEmpleados.pas index 9d1fdc00..911d4e31 100644 --- a/Source/Modulos/Contactos/Views/uEditorEmpleados.pas +++ b/Source/Modulos/Contactos/Views/uEditorEmpleados.pas @@ -93,12 +93,11 @@ begin end; procedure TfEditorEmpleados.ImprimirInterno; -{var +var Respuesta : Integer; AFichas: IBizEmpleado; - AllItems: Boolean;} + AllItems: Boolean; begin -{ AFichas := Nil; AllItems := False; @@ -121,18 +120,17 @@ begin if AllItems then begin SeleccionarFilasDesdeGrid(ViewGrid._FocusedView, (Contactos as ISeleccionable).SelectedRecords); - AFichas := (Controller as IFacturasClienteController).ExtraerSeleccionados(Facturas) as IBizEmpleado; + AFichas := (Controller as IEmpleadosController).ExtraerSeleccionados(Contactos) as IBizEmpleado; end else - AFichas := Facturas; + AFichas := (Contactos as IBizEmpleado); if Assigned(AFichas) then - FController.Preview(AFichas, AllItems); + (FController as IEmpleadosController).Print(AFichas, AllItems); end; end; end; end; -} end; procedure TfEditorEmpleados.PonerTitulos(const ATitulo: string); diff --git a/Source/Modulos/Contactos/Views/uViewEmpleado.dfm b/Source/Modulos/Contactos/Views/uViewEmpleado.dfm index 8299327d..712de4d8 100644 --- a/Source/Modulos/Contactos/Views/uViewEmpleado.dfm +++ b/Source/Modulos/Contactos/Views/uViewEmpleado.dfm @@ -7,16 +7,16 @@ inherited frViewEmpleado: TfrViewEmpleado Height = 391 ExplicitHeight = 391 inherited PngSpeedButton1: TPngSpeedButton - Left = 613 - ExplicitLeft = 613 + Left = 612 + ExplicitLeft = 612 end inherited PngSpeedButton2: TPngSpeedButton - Left = 613 - ExplicitLeft = 613 + Left = 612 + ExplicitLeft = 612 end inherited PngSpeedButton3: TPngSpeedButton - Left = 613 - ExplicitLeft = 613 + Left = 612 + ExplicitLeft = 612 end inherited eCalle: TcxDBTextEdit Left = 121 @@ -56,8 +56,8 @@ inherited frViewEmpleado: TfrViewEmpleado Top = 364 TabOrder = 20 ExplicitTop = 364 - ExplicitHeight = 148 - Height = 148 + ExplicitHeight = 20 + Height = 20 end object eFechaNacimiento: TcxDBDateEdit [8] Left = 121 @@ -121,37 +121,13 @@ inherited frViewEmpleado: TfrViewEmpleado Left = 429 TabOrder = 12 ExplicitLeft = 429 - ExplicitWidth = 91 - Width = 91 end inherited eTlfTrabajo: TcxDBTextEdit Left = 429 TabOrder = 11 ExplicitLeft = 429 - ExplicitWidth = 127 - Width = 127 end - inherited eTlfMovil: TcxDBTextEdit - Left = 429 - TabOrder = 13 - ExplicitLeft = 429 - ExplicitWidth = 155 - Width = 155 - end - inherited eFax: TcxDBTextEdit - Left = 429 - TabOrder = 14 - ExplicitLeft = 429 - ExplicitWidth = 121 - Width = 121 - end - inherited eNombre: TcxDBTextEdit - Left = 121 - ExplicitLeft = 121 - ExplicitWidth = 263 - Width = 263 - end - object cbContrato: TcxDBComboBox [16] + object cbContrato: TcxDBComboBox [13] Left = 429 Top = 280 DataBinding.DataField = 'CONTRATO' @@ -175,6 +151,22 @@ inherited frViewEmpleado: TfrViewEmpleado TabOrder = 18 Width = 292 end + inherited eTlfMovil: TcxDBTextEdit + Left = 429 + TabOrder = 13 + ExplicitLeft = 429 + end + inherited eFax: TcxDBTextEdit + Left = 429 + TabOrder = 14 + ExplicitLeft = 429 + end + inherited eNombre: TcxDBTextEdit + Left = 121 + ExplicitLeft = 121 + ExplicitWidth = 263 + Width = 263 + end inherited eNIFCIF: TcxDBTextEdit Left = 198 ExplicitLeft = 198 @@ -197,29 +189,7 @@ inherited frViewEmpleado: TfrViewEmpleado ExplicitWidth = 165 Width = 165 end - inherited ePaginaWeb: TcxDBHyperLinkEdit - Left = 429 - TabOrder = 17 - ExplicitLeft = 429 - ExplicitWidth = 165 - Width = 165 - end - inherited eReferencia: TcxDBTextEdit - Left = 121 - ExplicitLeft = 121 - ExplicitWidth = 38 - Width = 38 - end - inherited ePersonaContacto: TcxDBTextEdit - Left = 121 - Top = 307 - TabOrder = 10 - ExplicitLeft = 121 - ExplicitTop = 307 - ExplicitWidth = 256 - Width = 256 - end - object eDuracionContrato: TcxDBTextEdit [23] + object eDuracionContrato: TcxDBTextEdit [20] Left = 429 Top = 307 DataBinding.DataField = 'DURACION' @@ -237,6 +207,24 @@ inherited frViewEmpleado: TfrViewEmpleado TabOrder = 19 Width = 114 end + inherited ePaginaWeb: TcxDBHyperLinkEdit + Left = 429 + TabOrder = 17 + ExplicitLeft = 429 + ExplicitWidth = 165 + Width = 165 + end + inherited eReferencia: TcxDBTextEdit + Left = 121 + ExplicitLeft = 121 + end + inherited ePersonaContacto: TcxDBTextEdit + Left = 121 + Top = 307 + TabOrder = 10 + ExplicitLeft = 121 + ExplicitTop = 307 + end inherited dxLayoutControlContactoGroup_Root: TdxLayoutGroup inherited dxLayoutControlContactoGroup9: TdxLayoutGroup inherited dxLayoutControlContactoGroup4: TdxLayoutGroup diff --git a/Source/Modulos/Contactos/Views/uViewEmpleado.pas b/Source/Modulos/Contactos/Views/uViewEmpleado.pas index 7c93593d..f42043a0 100644 --- a/Source/Modulos/Contactos/Views/uViewEmpleado.pas +++ b/Source/Modulos/Contactos/Views/uViewEmpleado.pas @@ -8,7 +8,13 @@ uses dxLayoutControl, cxMemo, cxDBEdit, cxContainer, cxEdit, cxTextEdit, cxControls, cxMaskEdit, cxSpinEdit, ImgList, PngImageList, ActnList, cxHyperLinkEdit, Buttons, PngSpeedButton, cxDropDownEdit, cxCalendar, cxGraphics, uGruposEmpleadoController, - uDAInterfaces; + uDAInterfaces, dxSkinsCore, dxSkinBlack, dxSkinBlue, dxSkinCaramel, + dxSkinCoffee, dxSkinGlassOceans, dxSkiniMaginary, dxSkinLilian, + dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMoneyTwins, + dxSkinOffice2007Black, dxSkinOffice2007Blue, dxSkinOffice2007Green, + dxSkinOffice2007Pink, dxSkinOffice2007Silver, dxSkinSilver, dxSkinStardust, + dxSkinsDefaultPainters, dxSkinValentine, dxSkinXmas2008Blue, + dxSkinsdxLCPainter; type IViewEmpleado = interface(IViewContacto) diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES index 929fe00068b57211600f0ab8df8dbc1af578f7d5..a414c802251397bfc81b64d2007a1399ed9adb56 100644 GIT binary patch delta 83 zcmZ3mm2t^d#tnBO7*|Zb8zB!Q|3*YJvQ3VRRAziMxi+$zIgLSi^6yAl(K3cihE#?k khCCoy%%H=dz+k{&Hd#ALmD>==vSKh{uwY=A92w;f0ODI1b^rhX delta 79 zcmZ3om2tsV#tnBO7?(`G8zB!Q|3*YJvP_PQRAziIxi+$zIfX%K^6yAl;VgzyhE#?! eATDOmVNhT&U@)Dm8>Px=1Y}tOvBl)rD0cvUniu;3 diff --git a/Source/Servidor/FactuGES_Server.rc b/Source/Servidor/FactuGES_Server.rc index 21d1d7a1..fe52a7b9 100644 --- a/Source/Servidor/FactuGES_Server.rc +++ b/Source/Servidor/FactuGES_Server.rc @@ -14,7 +14,7 @@ BEGIN BEGIN VALUE "FileVersion", "1.0.5.0\0" VALUE "ProductVersion", "1.0.5.0\0" - VALUE "CompileDate", "jueves, 05 de junio de 2008 20:08\0" + VALUE "CompileDate", "viernes, 06 de junio de 2008 10:48\0" END END BLOCK "VarFileInfo"