From 253826a910ff95b9c6b0b7967497769ec0ce830d Mon Sep 17 00:00:00 2001 From: roberto Date: Thu, 25 Oct 2007 11:38:10 +0000 Subject: [PATCH] git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES/trunk@168 c93665c3-c93d-084d-9b98-7d5f4a9c3376 --- .../Comisiones/Plugin/Familias_plugin.bdsproj | 492 ------------------ .../Comisiones/Plugin/Familias_plugin.dpk | 42 -- .../Comisiones/Plugin/Familias_plugin.res | Bin 5056 -> 0 bytes .../Comisiones/Plugin/uPluginFamilias.dfm | 81 --- .../Comisiones/Plugin/uPluginFamilias.pas | 74 --- 5 files changed, 689 deletions(-) delete mode 100644 Source/Modulos/Comisiones/Plugin/Familias_plugin.bdsproj delete mode 100644 Source/Modulos/Comisiones/Plugin/Familias_plugin.dpk delete mode 100644 Source/Modulos/Comisiones/Plugin/Familias_plugin.res delete mode 100644 Source/Modulos/Comisiones/Plugin/uPluginFamilias.dfm delete mode 100644 Source/Modulos/Comisiones/Plugin/uPluginFamilias.pas diff --git a/Source/Modulos/Comisiones/Plugin/Familias_plugin.bdsproj b/Source/Modulos/Comisiones/Plugin/Familias_plugin.bdsproj deleted file mode 100644 index 012abf9d..00000000 --- a/Source/Modulos/Comisiones/Plugin/Familias_plugin.bdsproj +++ /dev/null @@ -1,492 +0,0 @@ - - - - - - - - - - - - Familias_plugin.dpk - - - 7.0 - - - 8 - 0 - 1 - 1 - 0 - 0 - 1 - 1 - 1 - 0 - 0 - 1 - 0 - 1 - 1 - 1 - 0 - 0 - 0 - 0 - 0 - 1 - 0 - 1 - 1 - 1 - True - True - WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; - - False - - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - True - False - False - False - True - True - True - True - True - True - - - - 0 - 0 - False - 1 - False - False - False - 16384 - 1048576 - 4194304 - - - - - .\ - ..\..\..\..\Output\Debug\Cliente - ..\..\Lib - ..\..\..\Lib;..\..\Lib - - - - False - - - - - - False - - - True - False - - - - $00000000 - - - - True - False - 1 - 0 - 0 - 0 - False - False - False - False - False - 3082 - 1252 - - - - - 1.0.0.0 - - - - - - 1.0.0.0 - - - - - diff --git a/Source/Modulos/Comisiones/Plugin/Familias_plugin.dpk b/Source/Modulos/Comisiones/Plugin/Familias_plugin.dpk deleted file mode 100644 index 14300abe..00000000 --- a/Source/Modulos/Comisiones/Plugin/Familias_plugin.dpk +++ /dev/null @@ -1,42 +0,0 @@ -package Familias_plugin; - -{$R *.res} -{$ALIGN 8} -{$ASSERTIONS ON} -{$BOOLEVAL OFF} -{$DEBUGINFO ON} -{$EXTENDEDSYNTAX ON} -{$IMPORTEDDATA ON} -{$IOCHECKS ON} -{$LOCALSYMBOLS ON} -{$LONGSTRINGS ON} -{$OPENSTRINGS ON} -{$OPTIMIZATION ON} -{$OVERFLOWCHECKS OFF} -{$RANGECHECKS OFF} -{$REFERENCEINFO ON} -{$SAFEDIVIDE OFF} -{$STACKFRAMES OFF} -{$TYPEDADDRESS OFF} -{$VARSTRINGCHECKS ON} -{$WRITEABLECONST OFF} -{$MINENUMSIZE 1} -{$IMAGEBASE $400000} -{$IMPLICITBUILD OFF} - -requires - rtl, - vcl, - PngComponentsD10, - PNG_D10, - vclactnband, - vclx, - Familias_model, - Familias_controller, - Familias_view, - PluginSDK_D10R; - -contains - uPluginFamilias in 'uPluginFamilias.pas'; - -end. diff --git a/Source/Modulos/Comisiones/Plugin/Familias_plugin.res b/Source/Modulos/Comisiones/Plugin/Familias_plugin.res deleted file mode 100644 index 86c94e6ada7b3c85f6761b1ee234a9f34ef3c861..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 5056 zcmbW5&x;&Y5XWnifD(f4!IPI+L`3!=E9BmaF%VEA#@TDLXpF&R6XJUC)cc=I4kFSA z{{!hg%bp}hVRP_qjvmDJ`>A@>-7}euyEfF+`%$mH-*3IwZ-y~5+miKtn3_w^Pn$V^ zQ861nx4C)wN(Q~H#+K|o*@m~&(3=1I%Llk7>S*pvE7;Yjz^+ljNYba;|&8!P>=GYp<9J^QiRC`-*du(Wb zBJI+RemE@Tm2dSSKL$269_p-ia&WJ{$B|EYy#Bt1`fm?B(CB-l8nlXqgY!6fUOzP@ zr|Te|e4cZxgJWuLF8<`}dughP69?9a%ha4}r`jtX-7UCl^he&nV;_S<)Ya!2FlEJu zrr{t12%dXkNqpywX{@?Eb_MKs@29XRNI;2D%DxW zo|xv^jnf#kFIDZr^e=W==PW{#^6Ao{deqzuxId;ujOZ~3;otiwSzBXu3^t3 z&$C~D3=Umz@OQRR9+}nP>x>=u115dAI{rd2#Mbgv81-@e%IA6)a8SDwHm3Di`~F1x z)jhG~04Fd5o4f^Iah!WFIS0|E#)aohzS6onIG_;>-~Ytz3J0A}=DenTZ*cIo-Ves9 zp>qHmo5lV+rntk2He9_1!t%2yZsF;l)>iGc4jkU$0bBWEPmBKKP>uSjxhXIDsSodT z@EG|gFZa>|hHF!PaN};FzIxxlpPKT;87{i(!eu7T%H?}r^yeP=K2c}If`cyKd-3DW z_4ib`jDt-MZ?C~;z1O=EKN(!YbpFJR_c`u>(C=ph9O_Y*Jz5Z>`Zs7T9Mn$y@ay$^ z{gulxYxXwGq@TIGbG$~Hi*qk8?9|WMkNweF@MU18F;AQKZ>jcWAL86`f59r^Yh;+XfGU10gV*5=*FT)q#qz2B_Ik28(#vUlW{{>1m(1wXK3zHQ3+RoHfz^$cuqg(^F;eqz6WUMUE^m$ z9R1u2H_t9ue%}<_JcD5KB$svgjBysd-ql#|toxF$&>h1Qc)Vw6j~u{SeHg>my$i{SJtD^MnJV!{AK!ZgN9Q4bN2bs7?m1Qo zsLwc-c&GZ4_%7jWppm+9C(?(bpCye?f6Mv)ml~{r9)<=EoH5SYSxm8xsWZv%2MjL$ zd)R%{gxqI&lEaJ6!*jggJMcIz?<5?~hn@VA1Kzcrp$;C`m0CzQdy{!G?|FT$$5W3N zaydTsdE#>2dGSt*&wOX~r{!54?~lxS4gM|rOZH6mRCZMCP#!z)bEv-^up_gJ*i*BY zl>1d-%!E}5v+s{C_OF@Qj;!xrv5)P2yJ4TmKCqke`Aq-U;NJ}WpRu*&|7!3r$c7zU zF#m_6?>Cia!E%D)b;IaF{ zzPG~QEyw>z^LKm}whzS>Dx3Ct`1w98?Y5 - Left = 232 - Top = 16 - end - object ModuleActionList: TActionList - Images = SmallImages - Left = 40 - Top = 72 - object actFamilias: TAction - Category = 'Familias' - Caption = 'Familias' - ImageIndex = 0 - OnExecute = actFamiliasExecute - end - end - object MainMenu: TMainMenu - Images = LargeImages - Left = 40 - Top = 16 - object Ventas1: TMenuItem - Caption = 'Empresa' - object N1: TMenuItem - Tag = 18990 - Caption = '-' - end - object Familias1: TMenuItem - Tag = 19000 - Action = actFamilias - end - end - end - object SmallImages: TPngImageList - PngImages = < - item - PngImage.Data = { - 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF - 61000001A34944415478DA9D922177E3300CC7655636C3B20596CD702C86C7E6 - B141C342EF1BE42318167AECD81916BA6CD0638582852A0BCBA46CCDDAF46E77 - EFF4E2A7D8F2FF2759B6724FD9354BF30B09810EF5B16C43866FACAC7DA67DD5 - E364655A15020ECEDD42AD47C839EE4AE9EC5CE492EBB2CF9DFC676BCA83772D - 6C133CEFE14D395F066B0C032AA4346AD5B9905D20C49BD255350196D4BEF40D - C48A47657F44073D05CEDC9AFBF0585F63B61D1379AF7BF2B702C67D8509B0F6 - 4329E52D1DE8CE2CF557B6B93144CAF13C04767702CCED62B12433587FB99141 - 4E1C03C2B70011B72EC02E479843CEAD6E60D04BEED9C1825B47A54E6273CF15 - F73CE9095226D00B891000FB66C1733E2F71CCACCC08EA36043165755141D334 - 2CE6EEAFE429F0552F3468CD5E370CE05842F04E4FE2DFF6A05979CE04633524 - 15F08707024484E0F9EA36C880ACAE7A70DE87931D7B0190BCD0B1326F11E256 - 20FF0098C454D92324167A5320163B95FF47C0518EC02219F4E9D3AB01C780F4 - 3780910A46D167763E3FF508B95A59BA105F037E76038EC28FE6C9B58DCDEC3F - E273F115E07FEC1D6B02010E884AA1F00000000049454E44AE426082} - Name = 'PngImage0' - Background = clWindow - end> - PngOptions = [pngBlendOnDisabled, pngGrayscaleOnDisabled] - Left = 308 - Top = 16 - Bitmap = {} - end - object ExtraImages: TPngImageList - Height = 28 - Width = 28 - PngImages = <> - Left = 232 - Top = 80 - end -end diff --git a/Source/Modulos/Comisiones/Plugin/uPluginFamilias.pas b/Source/Modulos/Comisiones/Plugin/uPluginFamilias.pas deleted file mode 100644 index 67e8fd46..00000000 --- a/Source/Modulos/Comisiones/Plugin/uPluginFamilias.pas +++ /dev/null @@ -1,74 +0,0 @@ -unit uPluginFamilias; - -interface - -uses - uModuleController, uInterfaces, uHostManager, Menus, Classes, ActnList, - ImgList, Controls, PngImageList; - -type - IMCFamilias = interface(IInterface) - ['{CD2D4FD9-B669-4447-A080-4D797B192A6F}'] - end; - - TPluginFamilias = class(TModuleController, IMCFamilias) - actFamilias: TAction; - ExtraImages: TPngImageList; - LargeImages: TPngImageList; - MainMenu: TMainMenu; - ModuleActionList: TActionList; - SmallImages: TPngImageList; - Ventas1: TMenuItem; - Familias1: TMenuItem; - N1: TMenuItem; - procedure actFamiliasExecute(Sender: TObject); - public - constructor Create(AOwner: TComponent); override; - destructor Destroy; override; - end; - -implementation - -{$R *.dfm} - -uses - Forms, Dialogs, SysUtils, - uFamiliasController, uBizFamilias, uFamiliasViewRegister; - -function GetModule : TModuleController; -begin - Result := TPluginFamilias.Create(NIL); -end; - -exports - GetModule name GET_MODULE_FUNC; - -procedure TPluginFamilias.actFamiliasExecute(Sender: TObject); -var - AFamiliasController : IFamiliasController; - AFamilias : IBizFamilia; -begin - AFamiliasController := TFamiliasController.Create; - AFamilias := (AFamiliasController.BuscarTodos as IBizFamilia); - AFamiliasController.VerTodos(AFamilias); -end; - -constructor TPluginFamilias.Create(AOwner: TComponent); -begin - inherited; - uFamiliasViewRegister.RegisterViews; -end; - -destructor TPluginFamilias.Destroy; -begin - uFamiliasViewRegister.UnregisterViews; - inherited; -end; - -initialization - RegisterModuleClass(TPluginFamilias); - -finalization - UnRegisterModuleClass(TPluginFamilias); - -end.