From 33a1a634fbb241fe84639b061749e18b2cc152a1 Mon Sep 17 00:00:00 2001 From: anderson.peterle@previdencia.gov.br Date: Thu, 10 Mar 2011 19:32:26 +0000 Subject: [PATCH] Exclusão para posterior reposição com versão 2.6-Beta-2 --- WinVNC.pas | 61 ------------------------------------------------------------- cacic2.cfg | 38 -------------------------------------- cacic_icon.ico | Bin 3774 -> 0 bytes cacic_logo.png | Bin 4238 -> 0 bytes frmConfiguracoes.dfm | 212 -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- frmLog.dfm | 163 ------------------------------------------------------------------------------------------------------------------------------------------------------------------- frmsenha.pas | 89 ----------------------------------------------------------------------------------------- 7 files changed, 0 insertions(+), 563 deletions(-) delete mode 100755 WinVNC.pas delete mode 100755 cacic2.cfg delete mode 100755 cacic_icon.ico delete mode 100755 cacic_logo.png delete mode 100755 frmConfiguracoes.dfm delete mode 100755 frmLog.dfm delete mode 100755 frmsenha.pas diff --git a/WinVNC.pas b/WinVNC.pas deleted file mode 100755 index ff340d9..0000000 --- a/WinVNC.pas +++ /dev/null @@ -1,61 +0,0 @@ -unit WinVNC; - -interface - -uses - Windows, Classes; - -type - WinVNCThread = class(TThread) - private - HND : THandle; - StartTID : THandle; - StartID : DWORD; - StartServer : procedure; - StopServer : procedure; - protected - procedure Execute; override; - public - procedure Finish; - procedure Start; - end; - -implementation - -uses SysUtils; - -procedure WinVNCThread.Execute; -begin - Synchronize(Start); -end; - -procedure WinVNCThread.Finish; -begin - HND := LoadLibrary('modulos\cacicrc.dll'); - if (HND <> 0) then - begin - StopServer := GetProcAddress(HND,'StopServer'); - if Assigned(StopServer) then - begin - StopServer; - end; - FreeLibrary(HND); - end; -end; - -procedure WinVNCThread.Start; -begin - HND := LoadLibrary('modulos\cacicrc.dll'); - if (HND <> 0) then - begin - StartServer := GetProcAddress(HND,'StartServer'); - if Assigned(StartServer) then - begin - StartTID := CreateThread(nil, 0, @StartServer, nil, 0, StartID); - if StartTID = 0 then - { O servidor não pôde ser inicializado. } - end; - end; -end; - -end. diff --git a/cacic2.cfg b/cacic2.cfg deleted file mode 100755 index bce8f6c..0000000 --- a/cacic2.cfg +++ /dev/null @@ -1,38 +0,0 @@ --$A8 --$B- --$C+ --$D+ --$E- --$F- --$G+ --$H+ --$I+ --$J- --$K- --$L+ --$M- --$N+ --$O+ --$P+ --$Q- --$R- --$S- --$T- --$U- --$V+ --$W- --$X+ --$YD --$Z1 --cg --AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; --H+ --W+ --M --$M16384,1048576 --K$00400000 --LE"c:\arquivos de programas\borland\delphi7\Projects\Bpl" --LN"c:\arquivos de programas\borland\delphi7\Projects\Bpl" --w-UNSAFE_TYPE --w-UNSAFE_CODE --w-UNSAFE_CAST diff --git a/cacic_icon.ico b/cacic_icon.ico deleted file mode 100755 index 7a5f13b..0000000 Binary files a/cacic_icon.ico and /dev/null differ diff --git a/cacic_logo.png b/cacic_logo.png deleted file mode 100755 index 3c17e3d..0000000 Binary files a/cacic_logo.png and /dev/null differ diff --git a/frmConfiguracoes.dfm b/frmConfiguracoes.dfm deleted file mode 100755 index d277a5a..0000000 --- a/frmConfiguracoes.dfm +++ /dev/null @@ -1,212 +0,0 @@ -object FormConfiguracoes: TFormConfiguracoes - Left = 147 - Top = 108 - BorderIcons = [] - BorderStyle = bsSingle - Caption = 'CACIC - Configura'#231#245'es' - ClientHeight = 137 - ClientWidth = 299 - Color = clBtnFace - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [] - FormStyle = fsStayOnTop - Icon.Data = { - 0000010001003030000000000000A80E00001600000028000000300000006000 - 00000100080000000000800A0000000000000000000000000000000000000000 - 0000FFFFFF001F59FD0070E1360077C7CB0027636C000017B900376F0B000012 - 5B00A3FFFF0030C8F9004B71BB006494F800499C4A006DC183001B382D001954 - A6003B938700002BF30036A2D9004DBCB100092D87008EF2D20025375E007ED7 - F70000092E001C50D3004E9E1F0080E4910063B55900112608005F9DA0003955 - 8E003055450061ABD000244D04003778F4005781D90063B5FE005FBC32003B85 - 5B000534CA0074C7A9005D8F7E004282260017223B0073D463002D58260045B3 - F9003875D50081DFB500416F73002F477700083CFF00338FC3002667870092F3 - F3002EB8E7000021D500001DA000132127002757BC00021C780083DADC00447E - 45004262A400080E15005899B5003D9B9A00020245006EBEE00069ACB7005398 - ED000C3CA2002E6C57007ADA79002842470053A830001F3D15004F8486000F48 - BC001D2C49004C8BC10047AEA0006DA2FF006ECE4F00226197004390D400012E - DD0016388600264C320075CD910030515900113562000B31B60058A5F900549C - D80069CD300030797F0002114500325B7F0094FADE00274F190056AE24005078 - C9006DA99C005E8DE900326B1C0047963900559095007ACDE1007BD6A2003F8E - 5700357D6C003C6C96002D6BFB0089E9C3004082ED0071BDC0003B66660089E9 - FF007FD4BD000032FD0087E0EA00326EE7000024B00010244C001E333A002E5C - 14000026C10065BD490072C29A001941AD0016499800001B8E0084DCCB004893 - 27003C8539002A3F6900205C8E0076CBF1000C1B0B00172E16004F8FDF0098FD - FC00478054001854B8003D791D0032596F00164DFD002C6E6E0064A7AB004181 - D6000C151F000333EE004188CA0042746500294D28002FADDC001C3B05003466 - 2900354F85003EAEEE006699F40035878500365C630030C0F00072D741008FEE - EB0053B13B004669B00034628A00519C3F003C96960002061000131D3000000B - 3A0060B150000129CE0087E3CF0073C1D4004D94F80063C32C004E9F2A003D5C - 99002C6D7B0085E6AA0076D86F001E4B3E005693AB002C64990074D850001D3D - 6300408E3F00679AFE00345951003A8964000B3AB700172B21005EA7D8000407 - 0600316310005AB32B005A88E200B1FFFF00539DF700233C3A0005237D00144C - AF00537ED00053898D0018320600002FE7007ED2D80071D45A00296355001C59 - A4000007240088E3E100102F810068ACA60042934B005F91F000265630004B7F - 7E000E2A4400418D35000E1724006BD335001246F6002662FE0076C4C1006FC6 - 8D001247A1002C57860032611C006CBAD50036B1E700050F33005690E6004894 - DA0075C5DF0073C89F0087E9B8000021B5002B494C003F9ADA009DFFFE005A97 - 9800112111007DCFC6006ABDFE000630D5004260AD004F9D34003AA5E0000000 - 0000000000000000000000000000000000000000000000000000000000000000 - 0000000000000000000000000000000000003E08000000000000000000000000 - 0000000000000000000000000000000000000000000000008608000000000000 - 00087A5800000000000000000000000000000000000000000000000000000000 - 0000000000000000D47A630000000000B0D47A7A7D0000000000000000000000 - 0000000000000000000000000000000000000000000000B27A7A810000000000 - 867A7A7AB2000000000000000000000000000000000000000000000000000000 - 00000000000000587A7A7A08000000B07A7A7A7AD40000000000000000000000 - 00000000000000000000000000000000000000000000867A7A7A7AD400000063 - 587A7A7A12860000000000000000000000000000000000000000000000000000 - 000000000000F47A7A7A7A581900005CEA817AFCC55900000000000000000000 - 00000000000000000000000000000000000000000000595ED47AF4AB7F00003F - A8943BC069DC0000000000000000000000000000000000000000000000000000 - 000000000000DC2BDB8633F76D003CDAF7387797CC3F00000000000000000000 - 000000173434348A00000000000000000000000000A538CC4F3390F79700003F - F790F790F73F4C0000000000000017A1AA68CBDEC25454C26A250BB834000000 - 0000000000E038F7A8F790F71F0000F80990F790F73F000000000000200B0C54 - 5454C2C2C2C2C2C2C2545454C2D1B83400000000003338F7F790F709A500000F - 1FF7F790097600000000B8CB5454C2C2C2C2C25454C25454C2C2C2C2C25454C2 - 0B170000003CD50990F790F8C600001E2CD29009E721C800A1D15454C2C2C2C2 - C2C2546820202041CB54C2C2C2C2C2C254DEAA000000C33F09A8E093F900008D - B72C334F402399AAC254C2C2C2C2C2C2C2C220B8AA0BAAAA204154C2C2C2C2C2 - C2C2542500C8C991D29C882C00000000660388881B5AFD4857DEC2C2C2C2C2C2 - 54A141CBC2C254C22520B854C2C2C2C2C2C2EFF08F2D80B788B7034E00000000 - F94D03E41B510CF639FF6AC2C2C2C2C2CB8A6AC2C2C2C2C2C2CB3468C2C2C2C2 - C2EFED398F257F67E4032C0000000000004E27B69DBEA29BF6A6FFEFC2C2C2C2 - DECBC2C2C2C2C2C2C2C2CBCBC2C2C20C8FEDA6575730C0EBE4B78E0000000000 - 00429F9351489EA657F6A6ED8FC2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C20C8F - A6A69B570A9EEF7F93D3000000000000992541F96AC28F9EA65757A6398F0CC2 - C2C2C2C2C2C2C2C2C2C2C2C2C2DEF00A399BF60A9E8F540B8D0BA10000000000 - 68C20CCBC2C2C28F9E0AF69B36EFC2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2EF36 - 9BF60A138FC2C2C2CBC2A38A00000041C2C2C2C2C2C2C2C28F9EA6F0DEC2C2C2 - C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2CBF60A13EFC2C2C2C2C2C2C2A35100AFC2 - C2C2C2C2C2C2C2C2C2EF9BDEC2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2 - EF9BDEC2C2C2C2C2C2C2C2C2CB002DC2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2 - C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C22DAFC2 - C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2 - C2C2C2C2C2C2C2C2C2C2C2C2C2AF0041C2C2C2C2C2C2C2C2C2C20CCB25D1680B - AA4125C2C2C2C2C2C2C22541AA0B68D125CB0CC2C2C2C2C2C2C2C2C2AA000000 - 4154C2C2C2C2C2C2C2C2682020B841AA0B0B0CC2C2C2C2C2C2C20C0B0BAA41B8 - 2020D1C2C2C2C2C2C2C2DE1700000000426A0CC2C2C2C2C2C2C2C25454C2C2C2 - C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C25454C2C2C2C2C2C2C2A3510000000000 - 00AFB825CB6A0CC2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2 - C2C2C2C20CDECBCBAA17C80000000000000000009951A1AA682525CBCBCB6A6A - DEDE0C0CC2C2C2C20C0CDE6A6ACBCBCB2525D1AA2017AFAE0000000000000000 - 000000000000000000C842E3AF2D51178A34A120B8CBCBB820348A17512DAFE3 - 42AE000000000000000000000000000000000000000000000000000000000000 - 0000000000343400000000000000000000000000000000000000000000000000 - 0000000000000000000000000000000000000000002D17000000000000000000 - 0000000000000000000000000000000000000000000000000000000000000000 - 0000000000C8AF00000000000000000000000000000000000000000000000000 - 00AE19D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9EED9D9D9D9D9D9D9D9D9 - D9D9D9D9D9D9D9D9D919AE00000000000063F4F4F4F4F4F4F4F4F4F4F4F4F4F4 - F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F43BB00000000000 - 00003E15CF3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E - 3E3E3E3E3E3E3ECF1508000000000000000000BC531414141414141414141414 - 1414141414141414141414141414141414141414141414110F00000000000000 - 00000000A444AD44ADAD44ADADADAD44AD44ADAD44ADAD44AD44ADAD44AD44AD - AD44AD4444AD449600000000000000000000000000002F4C7E63D321CE080F1E - 77E308668D770899664C7F081E9DF563E1D3217F455A00000000000000000000 - 00000000D4D7821F3D7D6B0E1FFC05C9B3643A6CA0DA5E5DCA1F723ADFB14784 - E90783BD067100B30000000000000000000000007A37A787CD3A70BB870210B7 - 16227A71FEF731C5612A8C3AB9A7FA7529E21CF1E55688160000000000000000 - 000000007AD86174263AC4D61673C54D32EC35374D90F058B68378B256A7795F - 81DD4BB402D088740400000000000000000000B27A92B6F3FB3A71556524C5A9 - 6FB4358BCAA8609ACAE87829D8E432268170BB040250B7320400000000000000 - 000000007A56E4745F3A702E87E6D0B7742235B94D90982961F2183A37A779B5 - 29C11C6E951088160000000000000000000000007A96BFFA75B2891CD5953788 - 65527A0DACF71A85E4E7C7124AD67B7C5088BA469A62B7650000000000000000 - 0000000029001D000049005B43B22800B300004D0087B2004DD500B2001DB400 - 8B008300002800FA000000000000000000000000000000000000000000000000 - 000000000000000000000000000000000000000000000000000000000000FFFF - FFFFFFFF0000F3FFFFFFFFCF0000E3FFFFFFFFC70000C1FFFFFFFF870000C1FF - FFFFFF83000081FFFFFFFF03000080FFFFFFFF01000080FFFFFFFF01000080FF - FFFFFF01000000FFF83FFE010000807F0001FE01000080FC00003E01000080F0 - 00000E01000080400000070100008000000002030000C000000000030000C000 - 000000070000E000000000070000E0000000000F0000C000000000070000C000 - 0000000300008000000000010000000000000001000000000000000000000000 - 0000000000008000000000010000C00000000003000080000000000500008000 - 0000000300008000000000030000C000000000030000C000000000030000C000 - 000000070000E000000000070000E000000000070000E000000000070000F000 - 0000000F0000F8000000001F0000FC000000003F0000FF00000000FF0000FC00 - 000000BF0000FC000000003F0000FC000000001F0000F8000000001F0000FC00 - 0000003F0000FC000000003F0000FD685A4A56BF0000FFFFFFFFFFFF0000} - OldCreateOrder = False - Position = poScreenCenter - OnClose = FormClose - OnCreate = FormCreate - PixelsPerInch = 96 - TextHeight = 13 - object Lb_End_Serv_Aplicacao: TLabel - Left = 7 - Top = 7 - Width = 171 - Height = 13 - Caption = 'Endere'#231'o do Servidor da Aplica'#231#227'o:' - end - object Bv1_Configuracoes: TBevel - Left = 8 - Top = 84 - Width = 283 - Height = 18 - Shape = bsBottomLine - end - object Lb_End_Serv_Updates: TLabel - Left = 6 - Top = 49 - Width = 149 - Height = 13 - Caption = 'Endere'#231'o Servidor de Updates:' - end - object EditEnderecoServidorAplicacao: TEdit - Left = 7 - Top = 22 - Width = 170 - Height = 21 - TabOrder = 0 - end - object BtN_Confirmar: TButton - Left = 200 - Top = 21 - Width = 75 - Height = 25 - Caption = 'Confirmar' - TabOrder = 2 - OnClick = pro_Btn_Confirmar - end - object Btn_Desinstalar: TButton - Left = 200 - Top = 56 - Width = 75 - Height = 25 - Caption = 'Desinstalar' - TabOrder = 3 - OnClick = pro_Btn_Desinstalar - end - object Btn_Cancelar: TButton - Left = 133 - Top = 107 - Width = 75 - Height = 25 - Caption = 'Cancelar' - TabOrder = 4 - OnClick = pro_Btn_Cancelar - end - object Btn_OK: TButton - Left = 216 - Top = 107 - Width = 75 - Height = 25 - Caption = 'OK' - TabOrder = 5 - OnClick = pro_Btn_OK - end - object EditEnderecoServidorUpdates: TEdit - Left = 6 - Top = 64 - Width = 170 - Height = 21 - TabOrder = 1 - end -end diff --git a/frmLog.dfm b/frmLog.dfm deleted file mode 100755 index eb55121..0000000 --- a/frmLog.dfm +++ /dev/null @@ -1,163 +0,0 @@ -object FormLog: TFormLog - Left = 44 - Top = 17 - BorderIcons = [] - BorderStyle = bsSingle - Caption = 'CACIC - Log de Atividades' - ClientHeight = 355 - ClientWidth = 675 - Color = clBtnFace - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [] - FormStyle = fsStayOnTop - Icon.Data = { - 0000010001003030000000000000A80E00001600000028000000300000006000 - 00000100080000000000800A0000000000000000000000000000000000000000 - 0000FFFFFF001F59FD0070E1360077C7CB0027636C000017B900376F0B000012 - 5B00A3FFFF0030C8F9004B71BB006494F800499C4A006DC183001B382D001954 - A6003B938700002BF30036A2D9004DBCB100092D87008EF2D20025375E007ED7 - F70000092E001C50D3004E9E1F0080E4910063B55900112608005F9DA0003955 - 8E003055450061ABD000244D04003778F4005781D90063B5FE005FBC32003B85 - 5B000534CA0074C7A9005D8F7E004282260017223B0073D463002D58260045B3 - F9003875D50081DFB500416F73002F477700083CFF00338FC3002667870092F3 - F3002EB8E7000021D500001DA000132127002757BC00021C780083DADC00447E - 45004262A400080E15005899B5003D9B9A00020245006EBEE00069ACB7005398 - ED000C3CA2002E6C57007ADA79002842470053A830001F3D15004F8486000F48 - BC001D2C49004C8BC10047AEA0006DA2FF006ECE4F00226197004390D400012E - DD0016388600264C320075CD910030515900113562000B31B60058A5F900549C - D80069CD300030797F0002114500325B7F0094FADE00274F190056AE24005078 - C9006DA99C005E8DE900326B1C0047963900559095007ACDE1007BD6A2003F8E - 5700357D6C003C6C96002D6BFB0089E9C3004082ED0071BDC0003B66660089E9 - FF007FD4BD000032FD0087E0EA00326EE7000024B00010244C001E333A002E5C - 14000026C10065BD490072C29A001941AD0016499800001B8E0084DCCB004893 - 27003C8539002A3F6900205C8E0076CBF1000C1B0B00172E16004F8FDF0098FD - FC00478054001854B8003D791D0032596F00164DFD002C6E6E0064A7AB004181 - D6000C151F000333EE004188CA0042746500294D28002FADDC001C3B05003466 - 2900354F85003EAEEE006699F40035878500365C630030C0F00072D741008FEE - EB0053B13B004669B00034628A00519C3F003C96960002061000131D3000000B - 3A0060B150000129CE0087E3CF0073C1D4004D94F80063C32C004E9F2A003D5C - 99002C6D7B0085E6AA0076D86F001E4B3E005693AB002C64990074D850001D3D - 6300408E3F00679AFE00345951003A8964000B3AB700172B21005EA7D8000407 - 0600316310005AB32B005A88E200B1FFFF00539DF700233C3A0005237D00144C - AF00537ED00053898D0018320600002FE7007ED2D80071D45A00296355001C59 - A4000007240088E3E100102F810068ACA60042934B005F91F000265630004B7F - 7E000E2A4400418D35000E1724006BD335001246F6002662FE0076C4C1006FC6 - 8D001247A1002C57860032611C006CBAD50036B1E700050F33005690E6004894 - DA0075C5DF0073C89F0087E9B8000021B5002B494C003F9ADA009DFFFE005A97 - 9800112111007DCFC6006ABDFE000630D5004260AD004F9D34003AA5E0000000 - 0000000000000000000000000000000000000000000000000000000000000000 - 0000000000000000000000000000000000003E08000000000000000000000000 - 0000000000000000000000000000000000000000000000008608000000000000 - 00087A5800000000000000000000000000000000000000000000000000000000 - 0000000000000000D47A630000000000B0D47A7A7D0000000000000000000000 - 0000000000000000000000000000000000000000000000B27A7A810000000000 - 867A7A7AB2000000000000000000000000000000000000000000000000000000 - 00000000000000587A7A7A08000000B07A7A7A7AD40000000000000000000000 - 00000000000000000000000000000000000000000000867A7A7A7AD400000063 - 587A7A7A12860000000000000000000000000000000000000000000000000000 - 000000000000F47A7A7A7A581900005CEA817AFCC55900000000000000000000 - 00000000000000000000000000000000000000000000595ED47AF4AB7F00003F - A8943BC069DC0000000000000000000000000000000000000000000000000000 - 000000000000DC2BDB8633F76D003CDAF7387797CC3F00000000000000000000 - 000000173434348A00000000000000000000000000A538CC4F3390F79700003F - F790F790F73F4C0000000000000017A1AA68CBDEC25454C26A250BB834000000 - 0000000000E038F7A8F790F71F0000F80990F790F73F000000000000200B0C54 - 5454C2C2C2C2C2C2C2545454C2D1B83400000000003338F7F790F709A500000F - 1FF7F790097600000000B8CB5454C2C2C2C2C25454C25454C2C2C2C2C25454C2 - 0B170000003CD50990F790F8C600001E2CD29009E721C800A1D15454C2C2C2C2 - C2C2546820202041CB54C2C2C2C2C2C254DEAA000000C33F09A8E093F900008D - B72C334F402399AAC254C2C2C2C2C2C2C2C220B8AA0BAAAA204154C2C2C2C2C2 - C2C2542500C8C991D29C882C00000000660388881B5AFD4857DEC2C2C2C2C2C2 - 54A141CBC2C254C22520B854C2C2C2C2C2C2EFF08F2D80B788B7034E00000000 - F94D03E41B510CF639FF6AC2C2C2C2C2CB8A6AC2C2C2C2C2C2CB3468C2C2C2C2 - C2EFED398F257F67E4032C0000000000004E27B69DBEA29BF6A6FFEFC2C2C2C2 - DECBC2C2C2C2C2C2C2C2CBCBC2C2C20C8FEDA6575730C0EBE4B78E0000000000 - 00429F9351489EA657F6A6ED8FC2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C20C8F - A6A69B570A9EEF7F93D3000000000000992541F96AC28F9EA65757A6398F0CC2 - C2C2C2C2C2C2C2C2C2C2C2C2C2DEF00A399BF60A9E8F540B8D0BA10000000000 - 68C20CCBC2C2C28F9E0AF69B36EFC2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2EF36 - 9BF60A138FC2C2C2CBC2A38A00000041C2C2C2C2C2C2C2C28F9EA6F0DEC2C2C2 - C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2CBF60A13EFC2C2C2C2C2C2C2A35100AFC2 - C2C2C2C2C2C2C2C2C2EF9BDEC2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2 - EF9BDEC2C2C2C2C2C2C2C2C2CB002DC2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2 - C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C22DAFC2 - C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2 - C2C2C2C2C2C2C2C2C2C2C2C2C2AF0041C2C2C2C2C2C2C2C2C2C20CCB25D1680B - AA4125C2C2C2C2C2C2C22541AA0B68D125CB0CC2C2C2C2C2C2C2C2C2AA000000 - 4154C2C2C2C2C2C2C2C2682020B841AA0B0B0CC2C2C2C2C2C2C20C0B0BAA41B8 - 2020D1C2C2C2C2C2C2C2DE1700000000426A0CC2C2C2C2C2C2C2C25454C2C2C2 - C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C25454C2C2C2C2C2C2C2A3510000000000 - 00AFB825CB6A0CC2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2 - C2C2C2C20CDECBCBAA17C80000000000000000009951A1AA682525CBCBCB6A6A - DEDE0C0CC2C2C2C20C0CDE6A6ACBCBCB2525D1AA2017AFAE0000000000000000 - 000000000000000000C842E3AF2D51178A34A120B8CBCBB820348A17512DAFE3 - 42AE000000000000000000000000000000000000000000000000000000000000 - 0000000000343400000000000000000000000000000000000000000000000000 - 0000000000000000000000000000000000000000002D17000000000000000000 - 0000000000000000000000000000000000000000000000000000000000000000 - 0000000000C8AF00000000000000000000000000000000000000000000000000 - 00AE19D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9EED9D9D9D9D9D9D9D9D9 - D9D9D9D9D9D9D9D9D919AE00000000000063F4F4F4F4F4F4F4F4F4F4F4F4F4F4 - F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F43BB00000000000 - 00003E15CF3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E - 3E3E3E3E3E3E3ECF1508000000000000000000BC531414141414141414141414 - 1414141414141414141414141414141414141414141414110F00000000000000 - 00000000A444AD44ADAD44ADADADAD44AD44ADAD44ADAD44AD44ADAD44AD44AD - AD44AD4444AD449600000000000000000000000000002F4C7E63D321CE080F1E - 77E308668D770899664C7F081E9DF563E1D3217F455A00000000000000000000 - 00000000D4D7821F3D7D6B0E1FFC05C9B3643A6CA0DA5E5DCA1F723ADFB14784 - E90783BD067100B30000000000000000000000007A37A787CD3A70BB870210B7 - 16227A71FEF731C5612A8C3AB9A7FA7529E21CF1E55688160000000000000000 - 000000007AD86174263AC4D61673C54D32EC35374D90F058B68378B256A7795F - 81DD4BB402D088740400000000000000000000B27A92B6F3FB3A71556524C5A9 - 6FB4358BCAA8609ACAE87829D8E432268170BB040250B7320400000000000000 - 000000007A56E4745F3A702E87E6D0B7742235B94D90982961F2183A37A779B5 - 29C11C6E951088160000000000000000000000007A96BFFA75B2891CD5953788 - 65527A0DACF71A85E4E7C7124AD67B7C5088BA469A62B7650000000000000000 - 0000000029001D000049005B43B22800B300004D0087B2004DD500B2001DB400 - 8B008300002800FA000000000000000000000000000000000000000000000000 - 000000000000000000000000000000000000000000000000000000000000FFFF - FFFFFFFF0000F3FFFFFFFFCF0000E3FFFFFFFFC70000C1FFFFFFFF870000C1FF - FFFFFF83000081FFFFFFFF03000080FFFFFFFF01000080FFFFFFFF01000080FF - FFFFFF01000000FFF83FFE010000807F0001FE01000080FC00003E01000080F0 - 00000E01000080400000070100008000000002030000C000000000030000C000 - 000000070000E000000000070000E0000000000F0000C000000000070000C000 - 0000000300008000000000010000000000000001000000000000000000000000 - 0000000000008000000000010000C00000000003000080000000000500008000 - 0000000300008000000000030000C000000000030000C000000000030000C000 - 000000070000E000000000070000E000000000070000E000000000070000F000 - 0000000F0000F8000000001F0000FC000000003F0000FF00000000FF0000FC00 - 000000BF0000FC000000003F0000FC000000001F0000F8000000001F0000FC00 - 0000003F0000FC000000003F0000FD685A4A56BF0000FFFFFFFFFFFF0000} - KeyPreview = True - OldCreateOrder = False - Position = poScreenCenter - OnClose = FormClose - OnCreate = FormCreate - PixelsPerInch = 96 - TextHeight = 13 - object MemoLog: TMemo - Left = 4 - Top = 4 - Width = 668 - Height = 306 - Lines.Strings = ( - 'MemoLog') - ScrollBars = ssVertical - TabOrder = 0 - end - object Bt_Fechar_Log: TButton - Left = 297 - Top = 321 - Width = 95 - Height = 25 - Cancel = True - Caption = 'Fechar' - Default = True - TabOrder = 1 - OnClick = Bt_Fechar_LogClick - end -end diff --git a/frmsenha.pas b/frmsenha.pas deleted file mode 100755 index 739ed63..0000000 --- a/frmsenha.pas +++ /dev/null @@ -1,89 +0,0 @@ -(** ---------------------------------------------------------------------------------------------------------------------------------------------------------------- -Copyright 2000, 2001, 2002, 2003, 2004, 2005 Dataprev - Empresa de Tecnologia e Informações da Previdência Social, Brasil - -Este arquivo é parte do programa CACIC - Configurador Automático e Coletor de Informações Computacionais - -O CACIC é um software livre; você pode redistribui-lo e/ou modifica-lo dentro dos termos da Licença Pública Geral GNU como -publicada pela Fundação do Software Livre (FSF); na versão 2 da Licença, ou (na sua opinião) qualquer versão. - -Este programa é distribuido na esperança que possa ser util, mas SEM NENHUMA GARANTIA; sem uma garantia implicita de ADEQUAÇÂO a qualquer -MERCADO ou APLICAÇÃO EM PARTICULAR. Veja a Licença Pública Geral GNU para maiores detalhes. - -Você deve ter recebido uma cópia da Licença Pública Geral GNU, sob o título "LICENCA.txt", junto com este programa, se não, escreva para a Fundação do Software -Livre(FSF) Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA ---------------------------------------------------------------------------------------------------------------------------------------------------------------- -*) - -unit frmSenha; - -interface - -uses - Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, - StdCtrls, Main, ExtCtrls; - - -type - TformSenha = class(TForm) - Lb_Texto_Senha: TLabel; - Lb_Senha: TLabel; - EditSenha: TEdit; - Bt_OK_Senha: TButton; - Bt_Cancelar_Senha: TButton; - Lb_Msg_Erro_Senha: TLabel; - Tm_Senha: TTimer; - procedure Bt_Cancelar_SenhaClick(Sender: TObject); - procedure Bt_OK_SenhaClick(Sender: TObject); - procedure FormClose(Sender: TObject; var Action: TCloseAction); - procedure Tm_SenhaTimer(Sender: TObject); - private - { Private declarations } - public - { Public declarations } - end; - -var - formSenha: TformSenha; - -implementation - -{$R *.dfm} - -procedure TformSenha.Bt_Cancelar_SenhaClick(Sender: TObject); -begin - formSenha.Close; - formSenha.Release; -end; - -procedure TformSenha.Bt_OK_SenhaClick(Sender: TObject); -begin -if boolDebugs then FormularioGeral.log_DEBUG('Informação de Senha: "'+Trim(editSenha.Text)+'" contra "'+Trim(FormularioGeral.GetValorDatMemoria('Configs.TE_SENHA_ADM_AGENTE',v_tstrCipherOpened))+'"'); - if (Trim(editSenha.Text) = Trim(FormularioGeral.GetValorDatMemoria('Configs.TE_SENHA_ADM_AGENTE',v_tstrCipherOpened))) Then - Begin - FormularioGeral.SetValorDatMemoria('Configs.SJI','S',v_tstrCipherOpened); - formSenha.Close; - formSenha.Release; - End - else - Begin - Lb_Msg_Erro_Senha.Caption := 'Senha Inválida!'; - Tm_Senha.Enabled := false; - Tm_Senha.Interval := 3000; //3 segundos - Tm_Senha.Enabled := true; - End; -end; - -procedure TformSenha.FormClose(Sender: TObject; var Action: TCloseAction); -begin - formSenha.Close; - formSenha.Release; -end; - -procedure TformSenha.Tm_SenhaTimer(Sender: TObject); -begin - Tm_Senha.Enabled:= false; - Lb_Msg_Erro_Senha.Caption := ''; -end; - -end. -- libgit2 0.21.2