From 35845992414ee3d1f0bd80f83fadead5bb860232 Mon Sep 17 00:00:00 2001 From: harpiain@gmail.com Date: Sun, 23 Jun 2013 22:00:30 +0000 Subject: [PATCH] Atualização dos agentes para compilar com as novas bibliotecas ("vendors"). --- CACIC_Comm.pas | 6 +----- CACIC_WMI.cfg | 42 ------------------------------------------ CacicVersionsAndHashes/CacicVersionsAndHashes.cfg | 40 ---------------------------------------- CacicVersionsAndHashes/CacicVersionsAndHashes.res | Bin 4836 -> 0 bytes CacicVersionsAndHashes/uCacicVersionsAndHashes.dcu | Bin 14218 -> 0 bytes Grupo_CACIC.groupproj | 85 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ cacic26Beta2.cfg | 36 ------------------------------------ cacic280.cfg | 41 ----------------------------------------- cacic280.dpr | 6 ++---- cacic280.dproj | 65 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ cacic280.drc | 664 ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- cacic280.res | Bin 3356 -> 0 bytes cacicservice/CACICserviceMain.dcu | Bin 22219 -> 0 bytes cacicservice/cacicservice.cfg | 41 ----------------------------------------- cacicservice/cacicservice.dproj | 52 ++++++++++++++++++++++++++++++++++++++++++++++++++++ cacicservice/cacicservice.drc | 566 -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- cacicservice/cacicservice.res | Bin 5312 -> 0 bytes chkcacic/CacicChecaPreparaAmbiente.vbs | 117 --------------------------------------------------------------------------------------------------------------------- chkcacic/FormConfig.dcu | Bin 10706 -> 0 bytes chkcacic/FormConfig.ddp | Bin 51 -> 0 bytes chkcacic/FormConfig.dfm | 378 ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ chkcacic/FormConfig.pas | 240 ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ chkcacic/Thumbs.db | Bin 8704 -> 0 bytes chkcacic/cacic_logo.png | Bin 4238 -> 0 bytes chkcacic/chkcacic.cfg | 43 ------------------------------------------- chkcacic/chkcacic.dof | 153 --------------------------------------------------------------------------------------------------------------------------------------------------------- chkcacic/chkcacic.dpr | 45 --------------------------------------------- chkcacic/chkcacic.dproj | 87 --------------------------------------------------------------------------------------- chkcacic/chkcacic.dsk | 371 ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- chkcacic/chkcacic.ico | Bin 3774 -> 0 bytes chkcacic/chkcacic.identcache | Bin 202 -> 0 bytes chkcacic/chkcacic.res | Bin 5120 -> 0 bytes chkcacic/chkcacic_icon.ico | Bin 4086 -> 0 bytes chkcacic/chkcacic_icon.ico.svg | 53 ----------------------------------------------------- chkcacic/main.dcu | Bin 66557 -> 0 bytes chkcacic/main.ddp | Bin 51 -> 0 bytes chkcacic/main.dfm | 24 ------------------------ chkcacic/main.pas | 1479 --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- chksis/chksis.cfg | 44 -------------------------------------------- chksis/chksis.dproj | 58 +++++++++------------------------------------------------- chksis/chksis.drc | 756 ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ chksis/chksis.dsk | 328 ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- chksis/chksis.identcache | Bin 98 -> 0 bytes chksis/chksis.res | Bin 5104 -> 0 bytes gercols/gercols.cfg | 41 ----------------------------------------- gercols/gercols.dproj | 53 +++++++++++++++++++++++++++++++++++++++++++++++++++++ gercols/gercols.drc | 992 -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gercols/gercols.res | Bin 4776 -> 0 bytes installcacic/installcacic.cfg | 44 -------------------------------------------- installcacic/installcacic.dproj | 51 +++++++++++++++++++++++++++++++++++++++++++++++++++ installcacic/installcacic.drc | 788 -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- installcacic/installcacic.res | Bin 3324 -> 0 bytes installcacic/uInstallCACIC.dcu | Bin 46071 -> 0 bytes mapacacic/MapaCACIC.cfg | 43 ------------------------------------------- mapacacic/MapaCACIC.dpr | 2 +- mapacacic/MapaCACIC.dproj | 53 +++++++++++++++++++++++++++++++++++++++++++++++++++++ mapacacic/MapaCACIC.drc | 10 ---------- mapacacic/MapaCACIC.res | Bin 5148 -> 0 bytes mapacacic/uAcessoMapa.dcu | Bin 11241 -> 0 bytes mapacacic/uMainMapa.dcu | Bin 38631 -> 0 bytes 60 files changed, 372 insertions(+), 7525 deletions(-) delete mode 100644 CACIC_WMI.cfg delete mode 100644 CacicVersionsAndHashes/CacicVersionsAndHashes.cfg create mode 100644 Grupo_CACIC.groupproj delete mode 100755 cacic26Beta2.cfg delete mode 100644 cacic280.cfg create mode 100644 cacic280.dproj delete mode 100644 cacic280.drc delete mode 100755 cacicservice/CACICserviceMain.dcu delete mode 100755 cacicservice/cacicservice.cfg create mode 100644 cacicservice/cacicservice.dproj delete mode 100644 cacicservice/cacicservice.drc delete mode 100755 chkcacic/CacicChecaPreparaAmbiente.vbs delete mode 100755 chkcacic/FormConfig.dcu delete mode 100755 chkcacic/FormConfig.ddp delete mode 100755 chkcacic/FormConfig.dfm delete mode 100755 chkcacic/FormConfig.pas delete mode 100755 chkcacic/Thumbs.db delete mode 100755 chkcacic/cacic_logo.png delete mode 100755 chkcacic/chkcacic.cfg delete mode 100755 chkcacic/chkcacic.dof delete mode 100755 chkcacic/chkcacic.dpr delete mode 100755 chkcacic/chkcacic.dproj delete mode 100755 chkcacic/chkcacic.dsk delete mode 100755 chkcacic/chkcacic.ico delete mode 100755 chkcacic/chkcacic.identcache delete mode 100755 chkcacic/chkcacic.res delete mode 100755 chkcacic/chkcacic_icon.ico delete mode 100755 chkcacic/chkcacic_icon.ico.svg delete mode 100755 chkcacic/main.dcu delete mode 100755 chkcacic/main.ddp delete mode 100755 chkcacic/main.dfm delete mode 100755 chkcacic/main.pas delete mode 100755 chksis/chksis.cfg delete mode 100644 chksis/chksis.drc delete mode 100755 chksis/chksis.dsk delete mode 100755 chksis/chksis.identcache delete mode 100644 gercols/gercols.cfg create mode 100644 gercols/gercols.dproj delete mode 100644 gercols/gercols.drc delete mode 100644 installcacic/installcacic.cfg create mode 100644 installcacic/installcacic.dproj delete mode 100644 installcacic/installcacic.drc delete mode 100644 installcacic/uInstallCACIC.dcu delete mode 100644 mapacacic/MapaCACIC.cfg create mode 100644 mapacacic/MapaCACIC.dproj delete mode 100644 mapacacic/MapaCACIC.drc delete mode 100644 mapacacic/uAcessoMapa.dcu delete mode 100644 mapacacic/uMainMapa.dcu diff --git a/CACIC_Comm.pas b/CACIC_Comm.pas index 25333d2..2e182a9 100644 --- a/CACIC_Comm.pas +++ b/CACIC_Comm.pas @@ -96,9 +96,7 @@ Begin objCacicCOMM.writeDebugLog('Comm: Requisitando Endereço: ' + pStrFullURL); Try idHTTP1.AllowCookies := true; - idHTTP1.ASCIIFilter := false; // ATENÇÃO: Esta propriedade deixa de existir na próxima versão do Indy (10.x) - idHTTP1.AuthRetries := 1; // ATENÇÃO: Esta propriedade deixa de existir na próxima versão do Indy (10.x) - idHTTP1.BoundPort := 0; + idHTTP1.AuthRetries := 1; idHTTP1.HandleRedirects := false; idHTTP1.ProxyParams.BasicAuthentication := false; idHTTP1.ProxyParams.ProxyPort := 0; @@ -110,8 +108,6 @@ Begin idHTTP1.Request.ContentRangeStart := 0; idHTTP1.Request.ContentRangeEnd := 0; idHTTP1.Request.ContentType := 'text/html'; - idHTTP1.RecvBufferSize := 32768; // ATENÇÃO: Esta propriedade deixa de existir na próxima versão do Indy (10.x) - idHTTP1.SendBufferSize := 32768; // ATENÇÃO: Esta propriedade deixa de existir na próxima versão do Indy (10.x) idHTTP1.Tag := 0; // ATENÇÃO: Substituo os sinais de "+" acima por [[MAIS]] devido a problemas encontrados no envio POST (vide HTMLentities) diff --git a/CACIC_WMI.cfg b/CACIC_WMI.cfg deleted file mode 100644 index 1ee31fc..0000000 --- a/CACIC_WMI.cfg +++ /dev/null @@ -1,42 +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:\program files (x86)\borland\delphi7\Projects\Bpl" --LN"c:\program files (x86)\borland\delphi7\Projects\Bpl" --U"C:\vendors_lib;C:\agentes_Windows" --O"C:\vendors_lib;C:\agentes_Windows" --I"C:\vendors_lib;C:\agentes_Windows" --R"C:\vendors_lib;C:\agentes_Windows" --w-UNSAFE_TYPE --w-UNSAFE_CODE --w-UNSAFE_CAST diff --git a/CacicVersionsAndHashes/CacicVersionsAndHashes.cfg b/CacicVersionsAndHashes/CacicVersionsAndHashes.cfg deleted file mode 100644 index 49e3e5d..0000000 --- a/CacicVersionsAndHashes/CacicVersionsAndHashes.cfg +++ /dev/null @@ -1,40 +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 --E"C:\Agentes_Windows_BINARIOS" --LE"c:\program files (x86)\borland\delphi7\Projects\Bpl" --LN"c:\program files (x86)\borland\delphi7\Projects\Bpl" --U"c:\vendors_lib\PJVersion;c:\vendors_lib\CriptografiaDCP;c:\vendors_lib" --O"c:\vendors_lib\PJVersion;c:\vendors_lib\CriptografiaDCP;c:\vendors_lib" --I"c:\vendors_lib\PJVersion;c:\vendors_lib\CriptografiaDCP;c:\vendors_lib" --R"c:\vendors_lib\PJVersion;c:\vendors_lib\CriptografiaDCP;c:\vendors_lib" diff --git a/CacicVersionsAndHashes/CacicVersionsAndHashes.res b/CacicVersionsAndHashes/CacicVersionsAndHashes.res index 6c1a775..025dd5a 100644 Binary files a/CacicVersionsAndHashes/CacicVersionsAndHashes.res and b/CacicVersionsAndHashes/CacicVersionsAndHashes.res differ diff --git a/CacicVersionsAndHashes/uCacicVersionsAndHashes.dcu b/CacicVersionsAndHashes/uCacicVersionsAndHashes.dcu index e38ffd0..32ba2da 100644 Binary files a/CacicVersionsAndHashes/uCacicVersionsAndHashes.dcu and b/CacicVersionsAndHashes/uCacicVersionsAndHashes.dcu differ diff --git a/Grupo_CACIC.groupproj b/Grupo_CACIC.groupproj new file mode 100644 index 0000000..2c7a38b --- /dev/null +++ b/Grupo_CACIC.groupproj @@ -0,0 +1,85 @@ + + + {62af6f7b-a3d4-4b49-9513-50c9f3900ea0} + + + + + Default.Personality + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/cacic26Beta2.cfg b/cacic26Beta2.cfg deleted file mode 100755 index f2501f4..0000000 --- a/cacic26Beta2.cfg +++ /dev/null @@ -1,36 +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 --E"C:\arariboia_mod_BINARIOS" --LE"c:\program files\borland\delphi7\Projects\Bpl" --LN"c:\program files\borland\delphi7\Projects\Bpl" diff --git a/cacic280.cfg b/cacic280.cfg deleted file mode 100644 index 3ab9923..0000000 --- a/cacic280.cfg +++ /dev/null @@ -1,41 +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+ --$Y- --$Z1 --GD --cg --AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; --H+ --W+ --M --$M16384,1048576 --K$00400000 --E"C:\Agentes_Windows_BINARIOS" --LE"c:\program files (x86)\borland\delphi7\Projects\Bpl" --LN"c:\program files (x86)\borland\delphi7\Projects\Bpl" --U"C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\vendors_lib\trayIcon;C:\vendors_lib\MagWMI" --O"C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\vendors_lib\trayIcon;C:\vendors_lib\MagWMI" --I"C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\vendors_lib\trayIcon;C:\vendors_lib\MagWMI" --R"C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\vendors_lib\trayIcon;C:\vendors_lib\MagWMI" diff --git a/cacic280.dpr b/cacic280.dpr index a89f19b..093345b 100644 --- a/cacic280.dpr +++ b/cacic280.dpr @@ -20,16 +20,14 @@ program cacic280; uses Forms, Windows, + UsbDetectClass, main in 'main.pas' {FormularioGeral}, - frmSenha in 'frmsenha.pas' {formSenha}, + frmsenha in 'frmsenha.pas' {formSenha}, frmConfiguracoes in 'frmConfiguracoes.pas' {FormConfiguracoes}, frmLog in 'frmLog.pas' {FormLog}, CACIC_Library in 'CACIC_Library.pas', - USBdetectClass in 'USBdetectClass.pas', CACIC_WMI in 'CACIC_WMI.pas'; -// WinVNC in 'winvnc.pas', - {$R *.res} const APP_NAME = 'cacic280.exe'; diff --git a/cacic280.dproj b/cacic280.dproj new file mode 100644 index 0000000..7ae54c7 --- /dev/null +++ b/cacic280.dproj @@ -0,0 +1,65 @@ + + + + {704de977-a25c-4ab7-bd4f-8d122af0a3eb} + cacic280.dpr + Release + AnyCPU + DCC32 + ..\Agentes_Windows_BINARIOS\cacic280.exe + + + 7.0 + False + False + False + 0 + C:\devel\cacic\Agentes_Windows_BINARIOS + DEBUG + True + True + True + + + 7.0 + False + False + False + 0 + C:\devel\cacic\Agentes_Windows_BINARIOS + C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\vendors_lib\trayIcon;C:\vendors_lib\MagWMI;C:\devel\cacic\vendors + C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\vendors_lib\trayIcon;C:\vendors_lib\MagWMI;C:\devel\cacic\vendors + C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\vendors_lib\trayIcon;C:\vendors_lib\MagWMI;C:\devel\cacic\vendors + C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\vendors_lib\trayIcon;C:\vendors_lib\MagWMI;C:\devel\cacic\vendors + DEBUG + True + True + True + + + Delphi.Personality + VCLApplication + +FalseTrueFalseTrueFalse2801212FalseFalseFalseFalseFalse10461252Dataprev - Emp. de TI da Prev.Social - URES/SESSSistema CACIC - Módulo Agente Principal2.8.0.1212Baseado na licença GNU/LGPLCacic - Configurador Automático e Coletor de Informações Computacionais3.0cacic280.dpr + + + + + MainSource + + + + +
FormConfiguracoes
+
+ +
FormLog
+
+ +
formSenha
+
+ +
FormularioGeral
+
+
+
\ No newline at end of file diff --git a/cacic280.drc b/cacic280.drc deleted file mode 100644 index aef348f..0000000 --- a/cacic280.drc +++ /dev/null @@ -1,664 +0,0 @@ -/* VER150 - Generated by the Borland Delphi Pascal Compiler - because -GD or --drc was supplied to the compiler. - - This file contains compiler-generated resources that - were bound to the executable. - If this file is empty, then no compiler-generated - resources were bound to the produced executable. -*/ - -#define ComConst_SNoMethod 65200 -#define ComConst_SVarNotObject 65201 -#define ComConst_STooManyParams 65202 -#define ComConst_SDCOMNotInstalled 65203 -#define OleConst_sNoRunningObject 65204 -#define IdResourceStrings_RSStackECONNABORTED 65216 -#define IdResourceStrings_RSStackECONNRESET 65217 -#define IdResourceStrings_RSStackENOBUFS 65218 -#define IdResourceStrings_RSStackEISCONN 65219 -#define IdResourceStrings_RSStackENOTCONN 65220 -#define IdResourceStrings_RSStackESHUTDOWN 65221 -#define IdResourceStrings_RSStackETOOMANYREFS 65222 -#define IdResourceStrings_RSStackETIMEDOUT 65223 -#define IdResourceStrings_RSStackECONNREFUSED 65224 -#define IdResourceStrings_RSStackELOOP 65225 -#define IdResourceStrings_RSStackENAMETOOLONG 65226 -#define IdResourceStrings_RSStackEHOSTDOWN 65227 -#define IdResourceStrings_RSStackEHOSTUNREACH 65228 -#define IdResourceStrings_RSStackENOTEMPTY 65229 -#define IdResourceStrings_RSStackHOST_NOT_FOUND 65230 -#define ComConst_SOleError 65231 -#define IdResourceStrings_RSStackEALREADY 65232 -#define IdResourceStrings_RSStackENOTSOCK 65233 -#define IdResourceStrings_RSStackEDESTADDRREQ 65234 -#define IdResourceStrings_RSStackEMSGSIZE 65235 -#define IdResourceStrings_RSStackEPROTOTYPE 65236 -#define IdResourceStrings_RSStackENOPROTOOPT 65237 -#define IdResourceStrings_RSStackEPROTONOSUPPORT 65238 -#define IdResourceStrings_RSStackESOCKTNOSUPPORT 65239 -#define IdResourceStrings_RSStackEOPNOTSUPP 65240 -#define IdResourceStrings_RSStackEPFNOSUPPORT 65241 -#define IdResourceStrings_RSStackEAFNOSUPPORT 65242 -#define IdResourceStrings_RSStackEADDRINUSE 65243 -#define IdResourceStrings_RSStackEADDRNOTAVAIL 65244 -#define IdResourceStrings_RSStackENETDOWN 65245 -#define IdResourceStrings_RSStackENETUNREACH 65246 -#define IdResourceStrings_RSStackENETRESET 65247 -#define IdResourceStrings_RSStatusResolving 65248 -#define IdResourceStrings_RSStatusConnecting 65249 -#define IdResourceStrings_RSStatusConnected 65250 -#define IdResourceStrings_RSStatusDisconnecting 65251 -#define IdResourceStrings_RSStatusDisconnected 65252 -#define IdResourceStrings_RSStatusText 65253 -#define IdResourceStrings_RSInvalidServiceName 65254 -#define IdResourceStrings_RSStackError 65255 -#define IdResourceStrings_RSStackEINTR 65256 -#define IdResourceStrings_RSStackEBADF 65257 -#define IdResourceStrings_RSStackEACCES 65258 -#define IdResourceStrings_RSStackEFAULT 65259 -#define IdResourceStrings_RSStackEINVAL 65260 -#define IdResourceStrings_RSStackEMFILE 65261 -#define IdResourceStrings_RSStackEWOULDBLOCK 65262 -#define IdResourceStrings_RSStackEINPROGRESS 65263 -#define ExtCtrls_clNameMenu 65264 -#define ExtCtrls_clNameMenuText 65265 -#define ExtCtrls_clNameNone 65266 -#define ExtCtrls_clNameScrollBar 65267 -#define ExtCtrls_clName3DDkShadow 65268 -#define ExtCtrls_clName3DLight 65269 -#define ExtCtrls_clNameWindow 65270 -#define ExtCtrls_clNameWindowFrame 65271 -#define ExtCtrls_clNameWindowText 65272 -#define ComStrs_sInvalidOwner 65273 -#define ComStrs_sInvalidComCtl32 65274 -#define WinHelpViewer_hNoKeyword 65275 -#define IdResourceStrings_RSWinsockInitializationError 65276 -#define IdResourceStrings_RSSetSizeExceeded 65277 -#define IdResourceStrings_RSWS2CallError 65278 -#define IdResourceStrings_RSWS2LoadError 65279 -#define ExtCtrls_clNameAppWorkSpace 65280 -#define ExtCtrls_clNameBackground 65281 -#define ExtCtrls_clNameBtnFace 65282 -#define ExtCtrls_clNameBtnHighlight 65283 -#define ExtCtrls_clNameBtnShadow 65284 -#define ExtCtrls_clNameBtnText 65285 -#define ExtCtrls_clNameCaptionText 65286 -#define ExtCtrls_clNameDefault 65287 -#define ExtCtrls_clNameGrayText 65288 -#define ExtCtrls_clNameHighlight 65289 -#define ExtCtrls_clNameHighlightText 65290 -#define ExtCtrls_clNameInactiveBorder 65291 -#define ExtCtrls_clNameInactiveCaption 65292 -#define ExtCtrls_clNameInactiveCaptionText 65293 -#define ExtCtrls_clNameInfoBk 65294 -#define ExtCtrls_clNameInfoText 65295 -#define ExtCtrls_clNameTeal 65296 -#define ExtCtrls_clNameGray 65297 -#define ExtCtrls_clNameSilver 65298 -#define ExtCtrls_clNameRed 65299 -#define ExtCtrls_clNameLime 65300 -#define ExtCtrls_clNameYellow 65301 -#define ExtCtrls_clNameBlue 65302 -#define ExtCtrls_clNameFuchsia 65303 -#define ExtCtrls_clNameAqua 65304 -#define ExtCtrls_clNameWhite 65305 -#define ExtCtrls_clNameMoneyGreen 65306 -#define ExtCtrls_clNameSkyBlue 65307 -#define ExtCtrls_clNameCream 65308 -#define ExtCtrls_clNameMedGray 65309 -#define ExtCtrls_clNameActiveBorder 65310 -#define ExtCtrls_clNameActiveCaption 65311 -#define Consts_SDuplicateMenus 65312 -#define Consts_SDockedCtlNeedsName 65313 -#define Consts_SDockTreeRemoveError 65314 -#define Consts_SDockZoneNotFound 65315 -#define Consts_SDockZoneHasNoCtl 65316 -#define Consts_SNoGetItemEventHandler 65317 -#define HelpIntfs_hNoTableOfContents 65318 -#define HelpIntfs_hNothingFound 65319 -#define HelpIntfs_hNoContext 65320 -#define HelpIntfs_hNoTopics 65321 -#define ExtCtrls_clNameBlack 65322 -#define ExtCtrls_clNameMaroon 65323 -#define ExtCtrls_clNameGreen 65324 -#define ExtCtrls_clNameOlive 65325 -#define ExtCtrls_clNameNavy 65326 -#define ExtCtrls_clNamePurple 65327 -#define Consts_SmkcPgUp 65328 -#define Consts_SmkcPgDn 65329 -#define Consts_SmkcEnd 65330 -#define Consts_SmkcHome 65331 -#define Consts_SmkcLeft 65332 -#define Consts_SmkcUp 65333 -#define Consts_SmkcRight 65334 -#define Consts_SmkcDown 65335 -#define Consts_SmkcIns 65336 -#define Consts_SmkcDel 65337 -#define Consts_SmkcShift 65338 -#define Consts_SmkcCtrl 65339 -#define Consts_SmkcAlt 65340 -#define Consts_SIconToClipboard 65341 -#define Consts_SCannotOpenClipboard 65342 -#define Consts_SInvalidMemoSize 65343 -#define Consts_SMsgDlgYes 65344 -#define Consts_SMsgDlgNo 65345 -#define Consts_SMsgDlgOK 65346 -#define Consts_SMsgDlgCancel 65347 -#define Consts_SMsgDlgHelp 65348 -#define Consts_SMsgDlgAbort 65349 -#define Consts_SMsgDlgRetry 65350 -#define Consts_SMsgDlgIgnore 65351 -#define Consts_SMsgDlgAll 65352 -#define Consts_SMsgDlgNoToAll 65353 -#define Consts_SMsgDlgYesToAll 65354 -#define Consts_SmkcBkSp 65355 -#define Consts_SmkcTab 65356 -#define Consts_SmkcEsc 65357 -#define Consts_SmkcEnter 65358 -#define Consts_SmkcSpace 65359 -#define Consts_SNoButton 65360 -#define Consts_SHelpButton 65361 -#define Consts_SCloseButton 65362 -#define Consts_SIgnoreButton 65363 -#define Consts_SRetryButton 65364 -#define Consts_SAbortButton 65365 -#define Consts_SAllButton 65366 -#define Consts_SCannotDragForm 65367 -#define Consts_SVMetafiles 65368 -#define Consts_SVEnhMetafiles 65369 -#define Consts_SVIcons 65370 -#define Consts_SVBitmaps 65371 -#define Consts_SMsgDlgWarning 65372 -#define Consts_SMsgDlgError 65373 -#define Consts_SMsgDlgInformation 65374 -#define Consts_SMsgDlgConfirm 65375 -#define Consts_SWindowClass 65376 -#define Consts_SCannotFocus 65377 -#define Consts_SParentRequired 65378 -#define Consts_SMDIChildNotVisible 65379 -#define Consts_SVisibleChanged 65380 -#define Consts_SCannotShowModal 65381 -#define Consts_SMenuIndexError 65382 -#define Consts_SMenuReinserted 65383 -#define Consts_SMenuNotFound 65384 -#define Consts_SNoTimers 65385 -#define Consts_SGroupIndexTooLow 65386 -#define Consts_SNoMDIForm 65387 -#define Consts_SControlParentSetToSelf 65388 -#define Consts_SOKButton 65389 -#define Consts_SCancelButton 65390 -#define Consts_SYesButton 65391 -#define RTLConsts_SUnknownProperty 65392 -#define RTLConsts_SWriteError 65393 -#define Consts_SInvalidBitmap 65394 -#define Consts_SInvalidIcon 65395 -#define Consts_SInvalidMetafile 65396 -#define Consts_SChangeIconSize 65397 -#define Consts_SUnknownClipboardFormat 65398 -#define Consts_SOutOfResources 65399 -#define Consts_SNoCanvasHandle 65400 -#define Consts_SInvalidImageSize 65401 -#define Consts_SInvalidImageList 65402 -#define Consts_SReplaceImage 65403 -#define Consts_SImageIndexError 65404 -#define Consts_SImageReadFail 65405 -#define Consts_SImageWriteFail 65406 -#define Consts_SWindowDCError 65407 -#define RTLConsts_SInvalidImage 65408 -#define RTLConsts_SInvalidName 65409 -#define RTLConsts_SInvalidProperty 65410 -#define RTLConsts_SInvalidPropertyPath 65411 -#define RTLConsts_SInvalidPropertyValue 65412 -#define RTLConsts_SListCapacityError 65413 -#define RTLConsts_SListCountError 65414 -#define RTLConsts_SListIndexError 65415 -#define RTLConsts_SMemoryStreamError 65416 -#define RTLConsts_SPropertyException 65417 -#define RTLConsts_SReadError 65418 -#define RTLConsts_SReadOnlyProperty 65419 -#define RTLConsts_SResNotFound 65420 -#define RTLConsts_SSeekNotImplemented 65421 -#define RTLConsts_SSortedListError 65422 -#define RTLConsts_SUnknownGroup 65423 -#define SysConst_SLongDayNameFri 65424 -#define SysConst_SLongDayNameSat 65425 -#define SysConst_SCannotCreateDir 65426 -#define RTLConsts_SAncestorNotFound 65427 -#define RTLConsts_SAssignError 65428 -#define RTLConsts_SBitsIndexError 65429 -#define RTLConsts_SCantWriteResourceStreamError 65430 -#define RTLConsts_SCheckSynchronizeError 65431 -#define RTLConsts_SClassNotFound 65432 -#define RTLConsts_SDuplicateClass 65433 -#define RTLConsts_SDuplicateItem 65434 -#define RTLConsts_SDuplicateName 65435 -#define RTLConsts_SDuplicateString 65436 -#define RTLConsts_SFCreateErrorEx 65437 -#define RTLConsts_SFOpenErrorEx 65438 -#define RTLConsts_SIniFileWriteError 65439 -#define SysConst_SLongMonthNameSep 65440 -#define SysConst_SLongMonthNameOct 65441 -#define SysConst_SLongMonthNameNov 65442 -#define SysConst_SLongMonthNameDec 65443 -#define SysConst_SShortDayNameSun 65444 -#define SysConst_SShortDayNameMon 65445 -#define SysConst_SShortDayNameTue 65446 -#define SysConst_SShortDayNameWed 65447 -#define SysConst_SShortDayNameThu 65448 -#define SysConst_SShortDayNameFri 65449 -#define SysConst_SShortDayNameSat 65450 -#define SysConst_SLongDayNameSun 65451 -#define SysConst_SLongDayNameMon 65452 -#define SysConst_SLongDayNameTue 65453 -#define SysConst_SLongDayNameWed 65454 -#define SysConst_SLongDayNameThu 65455 -#define SysConst_SShortMonthNameMay 65456 -#define SysConst_SShortMonthNameJun 65457 -#define SysConst_SShortMonthNameJul 65458 -#define SysConst_SShortMonthNameAug 65459 -#define SysConst_SShortMonthNameSep 65460 -#define SysConst_SShortMonthNameOct 65461 -#define SysConst_SShortMonthNameNov 65462 -#define SysConst_SShortMonthNameDec 65463 -#define SysConst_SLongMonthNameJan 65464 -#define SysConst_SLongMonthNameFeb 65465 -#define SysConst_SLongMonthNameMar 65466 -#define SysConst_SLongMonthNameApr 65467 -#define SysConst_SLongMonthNameMay 65468 -#define SysConst_SLongMonthNameJun 65469 -#define SysConst_SLongMonthNameJul 65470 -#define SysConst_SLongMonthNameAug 65471 -#define SysConst_SVarBadType 65472 -#define SysConst_SVarNotImplemented 65473 -#define SysConst_SVarUnexpected 65474 -#define SysConst_SExternalException 65475 -#define SysConst_SAssertionFailed 65476 -#define SysConst_SIntfCastError 65477 -#define SysConst_SSafecallException 65478 -#define SysConst_SAssertError 65479 -#define SysConst_SAbstractError 65480 -#define SysConst_SModuleAccessViolation 65481 -#define SysConst_SOSError 65482 -#define SysConst_SUnkOSError 65483 -#define SysConst_SShortMonthNameJan 65484 -#define SysConst_SShortMonthNameFeb 65485 -#define SysConst_SShortMonthNameMar 65486 -#define SysConst_SShortMonthNameApr 65487 -#define SysConst_SInvalidFormat 65488 -#define SysConst_SArgumentMissing 65489 -#define SysConst_SDispatchError 65490 -#define SysConst_SReadAccess 65491 -#define SysConst_SWriteAccess 65492 -#define SysConst_SVarArrayCreate 65493 -#define SysConst_SVarArrayBounds 65494 -#define SysConst_SVarArrayLocked 65495 -#define SysConst_SInvalidVarCast 65496 -#define SysConst_SInvalidVarOp 65497 -#define SysConst_SInvalidVarNullOp 65498 -#define SysConst_SInvalidVarOpWithHResultWithPrefix 65499 -#define SysConst_SVarTypeCouldNotConvert 65500 -#define SysConst_SVarTypeConvertOverflow 65501 -#define SysConst_SVarOverflow 65502 -#define SysConst_SVarInvalid 65503 -#define SysConst_SDivByZero 65504 -#define SysConst_SRangeError 65505 -#define SysConst_SIntOverflow 65506 -#define SysConst_SInvalidOp 65507 -#define SysConst_SZeroDivide 65508 -#define SysConst_SOverflow 65509 -#define SysConst_SUnderflow 65510 -#define SysConst_SInvalidPointer 65511 -#define SysConst_SInvalidCast 65512 -#define SysConst_SAccessViolationArg3 65513 -#define SysConst_SAccessViolationNoArg 65514 -#define SysConst_SStackOverflow 65515 -#define SysConst_SControlC 65516 -#define SysConst_SPrivilege 65517 -#define SysConst_SException 65518 -#define SysConst_SExceptTitle 65519 -#define SysConst_SInvalidInteger 65520 -#define SysConst_SInvalidFloat 65521 -#define SysConst_SInvalidDate 65522 -#define SysConst_SInvalidTime 65523 -#define SysConst_SInvalidDateTime 65524 -#define SysConst_STimeEncodeError 65525 -#define SysConst_SDateEncodeError 65526 -#define SysConst_SOutOfMemory 65527 -#define SysConst_SInOutError 65528 -#define SysConst_SFileNotFound 65529 -#define SysConst_SInvalidFilename 65530 -#define SysConst_STooManyOpenFiles 65531 -#define SysConst_SAccessDenied 65532 -#define SysConst_SEndOfFile 65533 -#define SysConst_SDiskFull 65534 -#define SysConst_SInvalidInput 65535 -STRINGTABLE -BEGIN - ComConst_SNoMethod, "Method '%s' not supported by automation object" - ComConst_SVarNotObject, "Variant does not reference an automation object" - ComConst_STooManyParams, "Dispatch methods do not support more than 64 parameters" - ComConst_SDCOMNotInstalled, "DCOM not installed" - OleConst_sNoRunningObject, "Unable to retrieve a pointer to a running object registered with OLE for %s/%s" - IdResourceStrings_RSStackECONNABORTED, "Software caused connection abort." - IdResourceStrings_RSStackECONNRESET, "Connection reset by peer." - IdResourceStrings_RSStackENOBUFS, "No buffer space available." - IdResourceStrings_RSStackEISCONN, "Socket is already connected." - IdResourceStrings_RSStackENOTCONN, "Socket is not connected." - IdResourceStrings_RSStackESHUTDOWN, "Cannot send or receive after socket is closed." - IdResourceStrings_RSStackETOOMANYREFS, "Too many references, cannot splice." - IdResourceStrings_RSStackETIMEDOUT, "Connection timed out." - IdResourceStrings_RSStackECONNREFUSED, "Connection refused." - IdResourceStrings_RSStackELOOP, "Too many levels of symbolic links." - IdResourceStrings_RSStackENAMETOOLONG, "File name too long." - IdResourceStrings_RSStackEHOSTDOWN, "Host is down." - IdResourceStrings_RSStackEHOSTUNREACH, "No route to host." - IdResourceStrings_RSStackENOTEMPTY, "Directory not empty" - IdResourceStrings_RSStackHOST_NOT_FOUND, "Host not found." - ComConst_SOleError, "OLE error %.8x" - IdResourceStrings_RSStackEALREADY, "Operation already in progress." - IdResourceStrings_RSStackENOTSOCK, "Socket operation on non-socket." - IdResourceStrings_RSStackEDESTADDRREQ, "Destination address required." - IdResourceStrings_RSStackEMSGSIZE, "Message too long." - IdResourceStrings_RSStackEPROTOTYPE, "Protocol wrong type for socket." - IdResourceStrings_RSStackENOPROTOOPT, "Bad protocol option." - IdResourceStrings_RSStackEPROTONOSUPPORT, "Protocol not supported." - IdResourceStrings_RSStackESOCKTNOSUPPORT, "Socket type not supported." - IdResourceStrings_RSStackEOPNOTSUPP, "Operation not supported on socket." - IdResourceStrings_RSStackEPFNOSUPPORT, "Protocol family not supported." - IdResourceStrings_RSStackEAFNOSUPPORT, "Address family not supported by protocol family." - IdResourceStrings_RSStackEADDRINUSE, "Address already in use." - IdResourceStrings_RSStackEADDRNOTAVAIL, "Cannot assign requested address." - IdResourceStrings_RSStackENETDOWN, "Network is down." - IdResourceStrings_RSStackENETUNREACH, "Network is unreachable." - IdResourceStrings_RSStackENETRESET, "Net dropped connection or reset." - IdResourceStrings_RSStatusResolving, "Resolving hostname %s." - IdResourceStrings_RSStatusConnecting, "Connecting to %s." - IdResourceStrings_RSStatusConnected, "Connected." - IdResourceStrings_RSStatusDisconnecting, "Disconnecting." - IdResourceStrings_RSStatusDisconnected, "Disconnected." - IdResourceStrings_RSStatusText, "%s" - IdResourceStrings_RSInvalidServiceName, "%s is not a valid service." - IdResourceStrings_RSStackError, "Socket Error # %d\r\n%s" - IdResourceStrings_RSStackEINTR, "Interrupted system call." - IdResourceStrings_RSStackEBADF, "Bad file number." - IdResourceStrings_RSStackEACCES, "Access denied." - IdResourceStrings_RSStackEFAULT, "Bad address." - IdResourceStrings_RSStackEINVAL, "Invalid argument." - IdResourceStrings_RSStackEMFILE, "Too many open files." - IdResourceStrings_RSStackEWOULDBLOCK, "Operation would block. " - IdResourceStrings_RSStackEINPROGRESS, "Operation now in progress." - ExtCtrls_clNameMenu, "Menu Background" - ExtCtrls_clNameMenuText, "Menu Text" - ExtCtrls_clNameNone, "None" - ExtCtrls_clNameScrollBar, "Scroll Bar" - ExtCtrls_clName3DDkShadow, "3D Dark Shadow" - ExtCtrls_clName3DLight, "3D Light" - ExtCtrls_clNameWindow, "Window Background" - ExtCtrls_clNameWindowFrame, "Window Frame" - ExtCtrls_clNameWindowText, "Window Text" - ComStrs_sInvalidOwner, "Invalid owner" - ComStrs_sInvalidComCtl32, "This control requires version 4.70 or greater of COMCTL32.DLL" - WinHelpViewer_hNoKeyword, "No help keyword specified." - IdResourceStrings_RSWinsockInitializationError, "Winsock Initialization Error." - IdResourceStrings_RSSetSizeExceeded, "Set Size Exceeded." - IdResourceStrings_RSWS2CallError, "Error on call Winsock2 library function %s" - IdResourceStrings_RSWS2LoadError, "Error on loading Winsock2 library (%s)" - ExtCtrls_clNameAppWorkSpace, "Application Workspace" - ExtCtrls_clNameBackground, "Background" - ExtCtrls_clNameBtnFace, "Button Face" - ExtCtrls_clNameBtnHighlight, "Button Highlight" - ExtCtrls_clNameBtnShadow, "Button Shadow" - ExtCtrls_clNameBtnText, "Button Text" - ExtCtrls_clNameCaptionText, "Caption Text" - ExtCtrls_clNameDefault, "Default" - ExtCtrls_clNameGrayText, "Gray Text" - ExtCtrls_clNameHighlight, "Highlight Background" - ExtCtrls_clNameHighlightText, "Highlight Text" - ExtCtrls_clNameInactiveBorder, "Inactive Border" - ExtCtrls_clNameInactiveCaption, "Inactive Caption" - ExtCtrls_clNameInactiveCaptionText, "Inactive Caption Text" - ExtCtrls_clNameInfoBk, "Info Background" - ExtCtrls_clNameInfoText, "Info Text" - ExtCtrls_clNameTeal, "Teal" - ExtCtrls_clNameGray, "Gray" - ExtCtrls_clNameSilver, "Silver" - ExtCtrls_clNameRed, "Red" - ExtCtrls_clNameLime, "Lime" - ExtCtrls_clNameYellow, "Yellow" - ExtCtrls_clNameBlue, "Blue" - ExtCtrls_clNameFuchsia, "Fuchsia" - ExtCtrls_clNameAqua, "Aqua" - ExtCtrls_clNameWhite, "White" - ExtCtrls_clNameMoneyGreen, "Money Green" - ExtCtrls_clNameSkyBlue, "Sky Blue" - ExtCtrls_clNameCream, "Cream" - ExtCtrls_clNameMedGray, "Medium Gray" - ExtCtrls_clNameActiveBorder, "Active Border" - ExtCtrls_clNameActiveCaption, "Active Caption" - Consts_SDuplicateMenus, "Menu '%s' is already being used by another form" - Consts_SDockedCtlNeedsName, "Docked control must have a name" - Consts_SDockTreeRemoveError, "Error removing control from dock tree" - Consts_SDockZoneNotFound, " - Dock zone not found" - Consts_SDockZoneHasNoCtl, " - Dock zone has no control" - Consts_SNoGetItemEventHandler, "No OnGetItem event handler assigned" - HelpIntfs_hNoTableOfContents, "Unable to find a Table of Contents" - HelpIntfs_hNothingFound, "No help found for %s" - HelpIntfs_hNoContext, "No context-sensitive help installed" - HelpIntfs_hNoTopics, "No topic-based help system installed" - ExtCtrls_clNameBlack, "Black" - ExtCtrls_clNameMaroon, "Maroon" - ExtCtrls_clNameGreen, "Green" - ExtCtrls_clNameOlive, "Olive" - ExtCtrls_clNameNavy, "Navy" - ExtCtrls_clNamePurple, "Purple" - Consts_SmkcPgUp, "PgUp" - Consts_SmkcPgDn, "PgDn" - Consts_SmkcEnd, "End" - Consts_SmkcHome, "Home" - Consts_SmkcLeft, "Left" - Consts_SmkcUp, "Up" - Consts_SmkcRight, "Right" - Consts_SmkcDown, "Down" - Consts_SmkcIns, "Ins" - Consts_SmkcDel, "Del" - Consts_SmkcShift, "Shift+" - Consts_SmkcCtrl, "Ctrl+" - Consts_SmkcAlt, "Alt+" - Consts_SIconToClipboard, "Clipboard does not support Icons" - Consts_SCannotOpenClipboard, "Cannot open clipboard" - Consts_SInvalidMemoSize, "Text exceeds memo capacity" - Consts_SMsgDlgYes, "&Yes" - Consts_SMsgDlgNo, "&No" - Consts_SMsgDlgOK, "OK" - Consts_SMsgDlgCancel, "Cancel" - Consts_SMsgDlgHelp, "&Help" - Consts_SMsgDlgAbort, "&Abort" - Consts_SMsgDlgRetry, "&Retry" - Consts_SMsgDlgIgnore, "&Ignore" - Consts_SMsgDlgAll, "&All" - Consts_SMsgDlgNoToAll, "N&o to All" - Consts_SMsgDlgYesToAll, "Yes to &All" - Consts_SmkcBkSp, "BkSp" - Consts_SmkcTab, "Tab" - Consts_SmkcEsc, "Esc" - Consts_SmkcEnter, "Enter" - Consts_SmkcSpace, "Space" - Consts_SNoButton, "&No" - Consts_SHelpButton, "&Help" - Consts_SCloseButton, "&Close" - Consts_SIgnoreButton, "&Ignore" - Consts_SRetryButton, "&Retry" - Consts_SAbortButton, "Abort" - Consts_SAllButton, "&All" - Consts_SCannotDragForm, "Cannot drag a form" - Consts_SVMetafiles, "Metafiles" - Consts_SVEnhMetafiles, "Enhanced Metafiles" - Consts_SVIcons, "Icons" - Consts_SVBitmaps, "Bitmaps" - Consts_SMsgDlgWarning, "Warning" - Consts_SMsgDlgError, "Error" - Consts_SMsgDlgInformation, "Information" - Consts_SMsgDlgConfirm, "Confirm" - Consts_SWindowClass, "Error creating window class" - Consts_SCannotFocus, "Cannot focus a disabled or invisible window" - Consts_SParentRequired, "Control '%s' has no parent window" - Consts_SMDIChildNotVisible, "Cannot hide an MDI Child Form" - Consts_SVisibleChanged, "Cannot change Visible in OnShow or OnHide" - Consts_SCannotShowModal, "Cannot make a visible window modal" - Consts_SMenuIndexError, "Menu index out of range" - Consts_SMenuReinserted, "Menu inserted twice" - Consts_SMenuNotFound, "Sub-menu is not in menu" - Consts_SNoTimers, "Not enough timers available" - Consts_SGroupIndexTooLow, "GroupIndex cannot be less than a previous menu item's GroupIndex" - Consts_SNoMDIForm, "Cannot create form. No MDI forms are currently active" - Consts_SControlParentSetToSelf, "A control cannot have itself as its parent" - Consts_SOKButton, "OK" - Consts_SCancelButton, "Cancel" - Consts_SYesButton, "&Yes" - RTLConsts_SUnknownProperty, "Property %s does not exist" - RTLConsts_SWriteError, "Stream write error" - Consts_SInvalidBitmap, "Bitmap image is not valid" - Consts_SInvalidIcon, "Icon image is not valid" - Consts_SInvalidMetafile, "Metafile is not valid" - Consts_SChangeIconSize, "Cannot change the size of an icon" - Consts_SUnknownClipboardFormat, "Unsupported clipboard format" - Consts_SOutOfResources, "Out of system resources" - Consts_SNoCanvasHandle, "Canvas does not allow drawing" - Consts_SInvalidImageSize, "Invalid image size" - Consts_SInvalidImageList, "Invalid ImageList" - Consts_SReplaceImage, "Unable to Replace Image" - Consts_SImageIndexError, "Invalid ImageList Index" - Consts_SImageReadFail, "Failed to read ImageList data from stream" - Consts_SImageWriteFail, "Failed to write ImageList data to stream" - Consts_SWindowDCError, "Error creating window device context" - RTLConsts_SInvalidImage, "Invalid stream format" - RTLConsts_SInvalidName, "''%s'' is not a valid component name" - RTLConsts_SInvalidProperty, "Invalid property value" - RTLConsts_SInvalidPropertyPath, "Invalid property path" - RTLConsts_SInvalidPropertyValue, "Invalid property value" - RTLConsts_SListCapacityError, "List capacity out of bounds (%d)" - RTLConsts_SListCountError, "List count out of bounds (%d)" - RTLConsts_SListIndexError, "List index out of bounds (%d)" - RTLConsts_SMemoryStreamError, "Out of memory while expanding memory stream" - RTLConsts_SPropertyException, "Error reading %s%s%s: %s" - RTLConsts_SReadError, "Stream read error" - RTLConsts_SReadOnlyProperty, "Property is read-only" - RTLConsts_SResNotFound, "Resource %s not found" - RTLConsts_SSeekNotImplemented, "%s.Seek not implemented" - RTLConsts_SSortedListError, "Operation not allowed on sorted list" - RTLConsts_SUnknownGroup, "%s not in a class registration group" - SysConst_SLongDayNameFri, "Friday" - SysConst_SLongDayNameSat, "Saturday" - SysConst_SCannotCreateDir, "Unable to create directory" - RTLConsts_SAncestorNotFound, "Ancestor for '%s' not found" - RTLConsts_SAssignError, "Cannot assign a %s to a %s" - RTLConsts_SBitsIndexError, "Bits index out of range" - RTLConsts_SCantWriteResourceStreamError, "Can't write to a read-only resource stream" - RTLConsts_SCheckSynchronizeError, "CheckSynchronize called from thread $%x, which is NOT the main thread" - RTLConsts_SClassNotFound, "Class %s not found" - RTLConsts_SDuplicateClass, "A class named %s already exists" - RTLConsts_SDuplicateItem, "List does not allow duplicates ($0%x)" - RTLConsts_SDuplicateName, "A component named %s already exists" - RTLConsts_SDuplicateString, "String list does not allow duplicates" - RTLConsts_SFCreateErrorEx, "Cannot create file \"%s\". %s" - RTLConsts_SFOpenErrorEx, "Cannot open file \"%s\". %s" - RTLConsts_SIniFileWriteError, "Unable to write to %s" - SysConst_SLongMonthNameSep, "September" - SysConst_SLongMonthNameOct, "October" - SysConst_SLongMonthNameNov, "November" - SysConst_SLongMonthNameDec, "December" - SysConst_SShortDayNameSun, "Sun" - SysConst_SShortDayNameMon, "Mon" - SysConst_SShortDayNameTue, "Tue" - SysConst_SShortDayNameWed, "Wed" - SysConst_SShortDayNameThu, "Thu" - SysConst_SShortDayNameFri, "Fri" - SysConst_SShortDayNameSat, "Sat" - SysConst_SLongDayNameSun, "Sunday" - SysConst_SLongDayNameMon, "Monday" - SysConst_SLongDayNameTue, "Tuesday" - SysConst_SLongDayNameWed, "Wednesday" - SysConst_SLongDayNameThu, "Thursday" - SysConst_SShortMonthNameMay, "May" - SysConst_SShortMonthNameJun, "Jun" - SysConst_SShortMonthNameJul, "Jul" - SysConst_SShortMonthNameAug, "Aug" - SysConst_SShortMonthNameSep, "Sep" - SysConst_SShortMonthNameOct, "Oct" - SysConst_SShortMonthNameNov, "Nov" - SysConst_SShortMonthNameDec, "Dec" - SysConst_SLongMonthNameJan, "January" - SysConst_SLongMonthNameFeb, "February" - SysConst_SLongMonthNameMar, "March" - SysConst_SLongMonthNameApr, "April" - SysConst_SLongMonthNameMay, "May" - SysConst_SLongMonthNameJun, "June" - SysConst_SLongMonthNameJul, "July" - SysConst_SLongMonthNameAug, "August" - SysConst_SVarBadType, "Invalid variant type" - SysConst_SVarNotImplemented, "Operation not supported" - SysConst_SVarUnexpected, "Unexpected variant error" - SysConst_SExternalException, "External exception %x" - SysConst_SAssertionFailed, "Assertion failed" - SysConst_SIntfCastError, "Interface not supported" - SysConst_SSafecallException, "Exception in safecall method" - SysConst_SAssertError, "%s (%s, line %d)" - SysConst_SAbstractError, "Abstract Error" - SysConst_SModuleAccessViolation, "Access violation at address %p in module '%s'. %s of address %p" - SysConst_SOSError, "System Error. Code: %d.\r\n%s" - SysConst_SUnkOSError, "A call to an OS function failed" - SysConst_SShortMonthNameJan, "Jan" - SysConst_SShortMonthNameFeb, "Feb" - SysConst_SShortMonthNameMar, "Mar" - SysConst_SShortMonthNameApr, "Apr" - SysConst_SInvalidFormat, "Format '%s' invalid or incompatible with argument" - SysConst_SArgumentMissing, "No argument for format '%s'" - SysConst_SDispatchError, "Variant method calls not supported" - SysConst_SReadAccess, "Read" - SysConst_SWriteAccess, "Write" - SysConst_SVarArrayCreate, "Error creating variant or safe array" - SysConst_SVarArrayBounds, "Variant or safe array index out of bounds" - SysConst_SVarArrayLocked, "Variant or safe array is locked" - SysConst_SInvalidVarCast, "Invalid variant type conversion" - SysConst_SInvalidVarOp, "Invalid variant operation" - SysConst_SInvalidVarNullOp, "Invalid NULL variant operation" - SysConst_SInvalidVarOpWithHResultWithPrefix, "Invalid variant operation (%s%.8x)\n%s" - SysConst_SVarTypeCouldNotConvert, "Could not convert variant of type (%s) into type (%s)" - SysConst_SVarTypeConvertOverflow, "Overflow while converting variant of type (%s) into type (%s)" - SysConst_SVarOverflow, "Variant overflow" - SysConst_SVarInvalid, "Invalid argument" - SysConst_SDivByZero, "Division by zero" - SysConst_SRangeError, "Range check error" - SysConst_SIntOverflow, "Integer overflow" - SysConst_SInvalidOp, "Invalid floating point operation" - SysConst_SZeroDivide, "Floating point division by zero" - SysConst_SOverflow, "Floating point overflow" - SysConst_SUnderflow, "Floating point underflow" - SysConst_SInvalidPointer, "Invalid pointer operation" - SysConst_SInvalidCast, "Invalid class typecast" - SysConst_SAccessViolationArg3, "Access violation at address %p. %s of address %p" - SysConst_SAccessViolationNoArg, "Access violation" - SysConst_SStackOverflow, "Stack overflow" - SysConst_SControlC, "Control-C hit" - SysConst_SPrivilege, "Privileged instruction" - SysConst_SException, "Exception %s in module %s at %p.\r\n%s%s\r\n" - SysConst_SExceptTitle, "Application Error" - SysConst_SInvalidInteger, "'%s' is not a valid integer value" - SysConst_SInvalidFloat, "'%s' is not a valid floating point value" - SysConst_SInvalidDate, "'%s' is not a valid date" - SysConst_SInvalidTime, "'%s' is not a valid time" - SysConst_SInvalidDateTime, "'%s' is not a valid date and time" - SysConst_STimeEncodeError, "Invalid argument to time encode" - SysConst_SDateEncodeError, "Invalid argument to date encode" - SysConst_SOutOfMemory, "Out of memory" - SysConst_SInOutError, "I/O error %d" - SysConst_SFileNotFound, "File not found" - SysConst_SInvalidFilename, "Invalid filename" - SysConst_STooManyOpenFiles, "Too many open files" - SysConst_SAccessDenied, "File access denied" - SysConst_SEndOfFile, "Read beyond end of file" - SysConst_SDiskFull, "Disk full" - SysConst_SInvalidInput, "Invalid numeric input" -END - diff --git a/cacic280.res b/cacic280.res index e3c8b07..6522b63 100644 Binary files a/cacic280.res and b/cacic280.res differ diff --git a/cacicservice/CACICserviceMain.dcu b/cacicservice/CACICserviceMain.dcu deleted file mode 100755 index 3dadb8b..0000000 Binary files a/cacicservice/CACICserviceMain.dcu and /dev/null differ diff --git a/cacicservice/cacicservice.cfg b/cacicservice/cacicservice.cfg deleted file mode 100755 index 22750b8..0000000 --- a/cacicservice/cacicservice.cfg +++ /dev/null @@ -1,41 +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 --GD --cg --AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; --H+ --W+ --M --$M16384,1048576 --K$00400000 --E"C:\Agentes_Windows_BINARIOS" --LE"c:\program files (x86)\borland\delphi7\Projects\Bpl" --LN"c:\program files (x86)\borland\delphi7\Projects\Bpl" --U"C:\vendors_lib\MD5;C:\vendors_lib;C:\vendors_lib\jwapi2.2a\Win32API;C:\vendors_lib\jwapi2.2a\Common;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion" --O"C:\vendors_lib\MD5;C:\vendors_lib;C:\vendors_lib\jwapi2.2a\Win32API;C:\vendors_lib\jwapi2.2a\Common;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion" --I"C:\vendors_lib\MD5;C:\vendors_lib;C:\vendors_lib\jwapi2.2a\Win32API;C:\vendors_lib\jwapi2.2a\Common;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion" --R"C:\vendors_lib\MD5;C:\vendors_lib;C:\vendors_lib\jwapi2.2a\Win32API;C:\vendors_lib\jwapi2.2a\Common;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion" diff --git a/cacicservice/cacicservice.dproj b/cacicservice/cacicservice.dproj new file mode 100644 index 0000000..3a6ee0a --- /dev/null +++ b/cacicservice/cacicservice.dproj @@ -0,0 +1,52 @@ + + + + {0af06c7d-56dc-47c1-905b-2c36d1d354da} + cacicservice.dpr + Release + AnyCPU + DCC32 + ..\..\Agentes_Windows_BINARIOS\cacicservice.exe + + + 7.0 + False + True + False + 0 + C:\devel\cacic\Agentes_Windows_BINARIOS + DEBUG + True + True + True + + + 7.0 + True + C:\devel\cacic\Agentes_Windows_BINARIOS + C:\vendors_lib\MD5;C:\vendors_lib;C:\vendors_lib\jwapi2.2a\Win32API;C:\vendors_lib\jwapi2.2a\Common;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion + C:\vendors_lib\MD5;C:\vendors_lib;C:\vendors_lib\jwapi2.2a\Win32API;C:\vendors_lib\jwapi2.2a\Common;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion + C:\vendors_lib\MD5;C:\vendors_lib;C:\vendors_lib\jwapi2.2a\Win32API;C:\vendors_lib\jwapi2.2a\Common;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion + C:\vendors_lib\MD5;C:\vendors_lib;C:\vendors_lib\jwapi2.2a\Win32API;C:\vendors_lib\jwapi2.2a\Common;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion + DEBUG + True + True + True + + + Delphi.Personality + VCLApplication + +FalseTrueFalseE:\NTService\TrueFalse2801212FalseFalseFalseFalseFalse10461252Dataprev - Emp. de TI da Prev Social - URES/SESSSistema CACIC - Módulo para Sustentação do Agente Principal2.8.0.12123.0Licença: GNU/LGPLcacicservice.dpr + + + + + MainSource + + + +
CacicSustainService
+
+
+
\ No newline at end of file diff --git a/cacicservice/cacicservice.drc b/cacicservice/cacicservice.drc deleted file mode 100644 index 6a912b6..0000000 --- a/cacicservice/cacicservice.drc +++ /dev/null @@ -1,566 +0,0 @@ -/* VER150 - Generated by the Borland Delphi Pascal Compiler - because -GD or --drc was supplied to the compiler. - - This file contains compiler-generated resources that - were bound to the executable. - If this file is empty, then no compiler-generated - resources were bound to the produced executable. -*/ - -#define ComConst_SOleError 65248 -#define ComConst_SNoMethod 65249 -#define ComConst_SVarNotObject 65250 -#define ComConst_STooManyParams 65251 -#define ExtCtrls_clNameHighlightText 65264 -#define ExtCtrls_clNameInactiveBorder 65265 -#define ExtCtrls_clNameInactiveCaption 65266 -#define ExtCtrls_clNameInactiveCaptionText 65267 -#define ExtCtrls_clNameInfoBk 65268 -#define ExtCtrls_clNameInfoText 65269 -#define ExtCtrls_clNameMenu 65270 -#define ExtCtrls_clNameMenuText 65271 -#define ExtCtrls_clNameNone 65272 -#define ExtCtrls_clNameScrollBar 65273 -#define ExtCtrls_clName3DDkShadow 65274 -#define ExtCtrls_clName3DLight 65275 -#define ExtCtrls_clNameWindow 65276 -#define ExtCtrls_clNameWindowFrame 65277 -#define ExtCtrls_clNameWindowText 65278 -#define WinHelpViewer_hNoKeyword 65279 -#define ExtCtrls_clNameMoneyGreen 65280 -#define ExtCtrls_clNameSkyBlue 65281 -#define ExtCtrls_clNameCream 65282 -#define ExtCtrls_clNameMedGray 65283 -#define ExtCtrls_clNameActiveBorder 65284 -#define ExtCtrls_clNameActiveCaption 65285 -#define ExtCtrls_clNameAppWorkSpace 65286 -#define ExtCtrls_clNameBackground 65287 -#define ExtCtrls_clNameBtnFace 65288 -#define ExtCtrls_clNameBtnHighlight 65289 -#define ExtCtrls_clNameBtnShadow 65290 -#define ExtCtrls_clNameBtnText 65291 -#define ExtCtrls_clNameCaptionText 65292 -#define ExtCtrls_clNameDefault 65293 -#define ExtCtrls_clNameGrayText 65294 -#define ExtCtrls_clNameHighlight 65295 -#define ExtCtrls_clNameBlack 65296 -#define ExtCtrls_clNameMaroon 65297 -#define ExtCtrls_clNameGreen 65298 -#define ExtCtrls_clNameOlive 65299 -#define ExtCtrls_clNameNavy 65300 -#define ExtCtrls_clNamePurple 65301 -#define ExtCtrls_clNameTeal 65302 -#define ExtCtrls_clNameGray 65303 -#define ExtCtrls_clNameSilver 65304 -#define ExtCtrls_clNameRed 65305 -#define ExtCtrls_clNameLime 65306 -#define ExtCtrls_clNameYellow 65307 -#define ExtCtrls_clNameBlue 65308 -#define ExtCtrls_clNameFuchsia 65309 -#define ExtCtrls_clNameAqua 65310 -#define ExtCtrls_clNameWhite 65311 -#define Consts_SContinue 65312 -#define Consts_SInterrogate 65313 -#define Consts_SShutdown 65314 -#define Consts_SCustomError 65315 -#define Consts_SServiceInstallOK 65316 -#define Consts_SServiceInstallFailed 65317 -#define Consts_SServiceUninstallOK 65318 -#define Consts_SServiceUninstallFailed 65319 -#define Consts_SDockedCtlNeedsName 65320 -#define Consts_SDockTreeRemoveError 65321 -#define Consts_SDockZoneNotFound 65322 -#define Consts_SDockZoneHasNoCtl 65323 -#define HelpIntfs_hNoTableOfContents 65324 -#define HelpIntfs_hNothingFound 65325 -#define HelpIntfs_hNoContext 65326 -#define HelpIntfs_hNoTopics 65327 -#define Consts_SmkcUp 65328 -#define Consts_SmkcRight 65329 -#define Consts_SmkcDown 65330 -#define Consts_SmkcIns 65331 -#define Consts_SmkcDel 65332 -#define Consts_SmkcShift 65333 -#define Consts_SmkcCtrl 65334 -#define Consts_SmkcAlt 65335 -#define Consts_SIconToClipboard 65336 -#define Consts_SCannotOpenClipboard 65337 -#define Consts_SDuplicateMenus 65338 -#define Consts_SServiceFailed 65339 -#define Consts_SExecute 65340 -#define Consts_SStart 65341 -#define Consts_SStop 65342 -#define Consts_SPause 65343 -#define Consts_SMsgDlgAbort 65344 -#define Consts_SMsgDlgRetry 65345 -#define Consts_SMsgDlgIgnore 65346 -#define Consts_SMsgDlgAll 65347 -#define Consts_SMsgDlgNoToAll 65348 -#define Consts_SMsgDlgYesToAll 65349 -#define Consts_SmkcBkSp 65350 -#define Consts_SmkcTab 65351 -#define Consts_SmkcEsc 65352 -#define Consts_SmkcEnter 65353 -#define Consts_SmkcSpace 65354 -#define Consts_SmkcPgUp 65355 -#define Consts_SmkcPgDn 65356 -#define Consts_SmkcEnd 65357 -#define Consts_SmkcHome 65358 -#define Consts_SmkcLeft 65359 -#define Consts_SAbortButton 65360 -#define Consts_SAllButton 65361 -#define Consts_SCannotDragForm 65362 -#define Consts_SVMetafiles 65363 -#define Consts_SVEnhMetafiles 65364 -#define Consts_SVIcons 65365 -#define Consts_SVBitmaps 65366 -#define Consts_SMsgDlgWarning 65367 -#define Consts_SMsgDlgError 65368 -#define Consts_SMsgDlgInformation 65369 -#define Consts_SMsgDlgConfirm 65370 -#define Consts_SMsgDlgYes 65371 -#define Consts_SMsgDlgNo 65372 -#define Consts_SMsgDlgOK 65373 -#define Consts_SMsgDlgCancel 65374 -#define Consts_SMsgDlgHelp 65375 -#define Consts_SCannotShowModal 65376 -#define Consts_SMenuIndexError 65377 -#define Consts_SMenuReinserted 65378 -#define Consts_SMenuNotFound 65379 -#define Consts_SNoTimers 65380 -#define Consts_SGroupIndexTooLow 65381 -#define Consts_SNoMDIForm 65382 -#define Consts_SControlParentSetToSelf 65383 -#define Consts_SOKButton 65384 -#define Consts_SCancelButton 65385 -#define Consts_SYesButton 65386 -#define Consts_SNoButton 65387 -#define Consts_SHelpButton 65388 -#define Consts_SCloseButton 65389 -#define Consts_SIgnoreButton 65390 -#define Consts_SRetryButton 65391 -#define Consts_SInvalidMetafile 65392 -#define Consts_SChangeIconSize 65393 -#define Consts_SUnknownClipboardFormat 65394 -#define Consts_SOutOfResources 65395 -#define Consts_SNoCanvasHandle 65396 -#define Consts_SInvalidImageSize 65397 -#define Consts_SInvalidImageList 65398 -#define Consts_SImageIndexError 65399 -#define Consts_SImageReadFail 65400 -#define Consts_SImageWriteFail 65401 -#define Consts_SWindowDCError 65402 -#define Consts_SWindowClass 65403 -#define Consts_SCannotFocus 65404 -#define Consts_SParentRequired 65405 -#define Consts_SMDIChildNotVisible 65406 -#define Consts_SVisibleChanged 65407 -#define RTLConsts_SListCountError 65408 -#define RTLConsts_SListIndexError 65409 -#define RTLConsts_SMemoryStreamError 65410 -#define RTLConsts_SPropertyException 65411 -#define RTLConsts_SReadError 65412 -#define RTLConsts_SReadOnlyProperty 65413 -#define RTLConsts_SResNotFound 65414 -#define RTLConsts_SSeekNotImplemented 65415 -#define RTLConsts_SSortedListError 65416 -#define RTLConsts_SUnknownGroup 65417 -#define RTLConsts_SUnknownProperty 65418 -#define RTLConsts_SWriteError 65419 -#define RTLConsts_SThreadCreateError 65420 -#define RTLConsts_SThreadError 65421 -#define Consts_SInvalidBitmap 65422 -#define Consts_SInvalidIcon 65423 -#define RTLConsts_SBitsIndexError 65424 -#define RTLConsts_SCantWriteResourceStreamError 65425 -#define RTLConsts_SCheckSynchronizeError 65426 -#define RTLConsts_SClassNotFound 65427 -#define RTLConsts_SDuplicateClass 65428 -#define RTLConsts_SDuplicateItem 65429 -#define RTLConsts_SDuplicateName 65430 -#define RTLConsts_SDuplicateString 65431 -#define RTLConsts_SFCreateErrorEx 65432 -#define RTLConsts_SFOpenErrorEx 65433 -#define RTLConsts_SInvalidImage 65434 -#define RTLConsts_SInvalidName 65435 -#define RTLConsts_SInvalidProperty 65436 -#define RTLConsts_SInvalidPropertyPath 65437 -#define RTLConsts_SInvalidPropertyValue 65438 -#define RTLConsts_SListCapacityError 65439 -#define SysConst_SShortDayNameMon 65440 -#define SysConst_SShortDayNameTue 65441 -#define SysConst_SShortDayNameWed 65442 -#define SysConst_SShortDayNameThu 65443 -#define SysConst_SShortDayNameFri 65444 -#define SysConst_SShortDayNameSat 65445 -#define SysConst_SLongDayNameSun 65446 -#define SysConst_SLongDayNameMon 65447 -#define SysConst_SLongDayNameTue 65448 -#define SysConst_SLongDayNameWed 65449 -#define SysConst_SLongDayNameThu 65450 -#define SysConst_SLongDayNameFri 65451 -#define SysConst_SLongDayNameSat 65452 -#define SysConst_SCannotCreateDir 65453 -#define RTLConsts_SAncestorNotFound 65454 -#define RTLConsts_SAssignError 65455 -#define SysConst_SShortMonthNameOct 65456 -#define SysConst_SShortMonthNameNov 65457 -#define SysConst_SShortMonthNameDec 65458 -#define SysConst_SLongMonthNameJan 65459 -#define SysConst_SLongMonthNameFeb 65460 -#define SysConst_SLongMonthNameMar 65461 -#define SysConst_SLongMonthNameApr 65462 -#define SysConst_SLongMonthNameMay 65463 -#define SysConst_SLongMonthNameJun 65464 -#define SysConst_SLongMonthNameJul 65465 -#define SysConst_SLongMonthNameAug 65466 -#define SysConst_SLongMonthNameSep 65467 -#define SysConst_SLongMonthNameOct 65468 -#define SysConst_SLongMonthNameNov 65469 -#define SysConst_SLongMonthNameDec 65470 -#define SysConst_SShortDayNameSun 65471 -#define SysConst_SIntfCastError 65472 -#define SysConst_SSafecallException 65473 -#define SysConst_SAssertError 65474 -#define SysConst_SAbstractError 65475 -#define SysConst_SModuleAccessViolation 65476 -#define SysConst_SOSError 65477 -#define SysConst_SUnkOSError 65478 -#define SysConst_SShortMonthNameJan 65479 -#define SysConst_SShortMonthNameFeb 65480 -#define SysConst_SShortMonthNameMar 65481 -#define SysConst_SShortMonthNameApr 65482 -#define SysConst_SShortMonthNameMay 65483 -#define SysConst_SShortMonthNameJun 65484 -#define SysConst_SShortMonthNameJul 65485 -#define SysConst_SShortMonthNameAug 65486 -#define SysConst_SShortMonthNameSep 65487 -#define SysConst_SWriteAccess 65488 -#define SysConst_SVarArrayCreate 65489 -#define SysConst_SVarArrayBounds 65490 -#define SysConst_SVarArrayLocked 65491 -#define SysConst_SInvalidVarCast 65492 -#define SysConst_SInvalidVarOp 65493 -#define SysConst_SInvalidVarOpWithHResultWithPrefix 65494 -#define SysConst_SVarTypeCouldNotConvert 65495 -#define SysConst_SVarTypeConvertOverflow 65496 -#define SysConst_SVarOverflow 65497 -#define SysConst_SVarInvalid 65498 -#define SysConst_SVarBadType 65499 -#define SysConst_SVarNotImplemented 65500 -#define SysConst_SVarUnexpected 65501 -#define SysConst_SExternalException 65502 -#define SysConst_SAssertionFailed 65503 -#define SysConst_SZeroDivide 65504 -#define SysConst_SOverflow 65505 -#define SysConst_SUnderflow 65506 -#define SysConst_SInvalidPointer 65507 -#define SysConst_SInvalidCast 65508 -#define SysConst_SAccessViolationArg3 65509 -#define SysConst_SAccessViolationNoArg 65510 -#define SysConst_SStackOverflow 65511 -#define SysConst_SControlC 65512 -#define SysConst_SPrivilege 65513 -#define SysConst_SException 65514 -#define SysConst_SExceptTitle 65515 -#define SysConst_SInvalidFormat 65516 -#define SysConst_SArgumentMissing 65517 -#define SysConst_SDispatchError 65518 -#define SysConst_SReadAccess 65519 -#define SysConst_SInvalidInteger 65520 -#define SysConst_STimeEncodeError 65521 -#define SysConst_SDateEncodeError 65522 -#define SysConst_SOutOfMemory 65523 -#define SysConst_SInOutError 65524 -#define SysConst_SFileNotFound 65525 -#define SysConst_SInvalidFilename 65526 -#define SysConst_STooManyOpenFiles 65527 -#define SysConst_SAccessDenied 65528 -#define SysConst_SEndOfFile 65529 -#define SysConst_SDiskFull 65530 -#define SysConst_SInvalidInput 65531 -#define SysConst_SDivByZero 65532 -#define SysConst_SRangeError 65533 -#define SysConst_SIntOverflow 65534 -#define SysConst_SInvalidOp 65535 -STRINGTABLE -BEGIN - ComConst_SOleError, "OLE error %.8x" - ComConst_SNoMethod, "Method '%s' not supported by automation object" - ComConst_SVarNotObject, "Variant does not reference an automation object" - ComConst_STooManyParams, "Dispatch methods do not support more than 64 parameters" - ExtCtrls_clNameHighlightText, "Highlight Text" - ExtCtrls_clNameInactiveBorder, "Inactive Border" - ExtCtrls_clNameInactiveCaption, "Inactive Caption" - ExtCtrls_clNameInactiveCaptionText, "Inactive Caption Text" - ExtCtrls_clNameInfoBk, "Info Background" - ExtCtrls_clNameInfoText, "Info Text" - ExtCtrls_clNameMenu, "Menu Background" - ExtCtrls_clNameMenuText, "Menu Text" - ExtCtrls_clNameNone, "None" - ExtCtrls_clNameScrollBar, "Scroll Bar" - ExtCtrls_clName3DDkShadow, "3D Dark Shadow" - ExtCtrls_clName3DLight, "3D Light" - ExtCtrls_clNameWindow, "Window Background" - ExtCtrls_clNameWindowFrame, "Window Frame" - ExtCtrls_clNameWindowText, "Window Text" - WinHelpViewer_hNoKeyword, "No help keyword specified." - ExtCtrls_clNameMoneyGreen, "Money Green" - ExtCtrls_clNameSkyBlue, "Sky Blue" - ExtCtrls_clNameCream, "Cream" - ExtCtrls_clNameMedGray, "Medium Gray" - ExtCtrls_clNameActiveBorder, "Active Border" - ExtCtrls_clNameActiveCaption, "Active Caption" - ExtCtrls_clNameAppWorkSpace, "Application Workspace" - ExtCtrls_clNameBackground, "Background" - ExtCtrls_clNameBtnFace, "Button Face" - ExtCtrls_clNameBtnHighlight, "Button Highlight" - ExtCtrls_clNameBtnShadow, "Button Shadow" - ExtCtrls_clNameBtnText, "Button Text" - ExtCtrls_clNameCaptionText, "Caption Text" - ExtCtrls_clNameDefault, "Default" - ExtCtrls_clNameGrayText, "Gray Text" - ExtCtrls_clNameHighlight, "Highlight Background" - ExtCtrls_clNameBlack, "Black" - ExtCtrls_clNameMaroon, "Maroon" - ExtCtrls_clNameGreen, "Green" - ExtCtrls_clNameOlive, "Olive" - ExtCtrls_clNameNavy, "Navy" - ExtCtrls_clNamePurple, "Purple" - ExtCtrls_clNameTeal, "Teal" - ExtCtrls_clNameGray, "Gray" - ExtCtrls_clNameSilver, "Silver" - ExtCtrls_clNameRed, "Red" - ExtCtrls_clNameLime, "Lime" - ExtCtrls_clNameYellow, "Yellow" - ExtCtrls_clNameBlue, "Blue" - ExtCtrls_clNameFuchsia, "Fuchsia" - ExtCtrls_clNameAqua, "Aqua" - ExtCtrls_clNameWhite, "White" - Consts_SContinue, "continue" - Consts_SInterrogate, "interrogate" - Consts_SShutdown, "shutdown" - Consts_SCustomError, "Service failed in custom message(%d): %s" - Consts_SServiceInstallOK, "Service installed successfully" - Consts_SServiceInstallFailed, "Service \"%s\" failed to install with error: \"%s\"" - Consts_SServiceUninstallOK, "Service uninstalled successfully" - Consts_SServiceUninstallFailed, "Service \"%s\" failed to uninstall with error: \"%s\"" - Consts_SDockedCtlNeedsName, "Docked control must have a name" - Consts_SDockTreeRemoveError, "Error removing control from dock tree" - Consts_SDockZoneNotFound, " - Dock zone not found" - Consts_SDockZoneHasNoCtl, " - Dock zone has no control" - HelpIntfs_hNoTableOfContents, "Unable to find a Table of Contents" - HelpIntfs_hNothingFound, "No help found for %s" - HelpIntfs_hNoContext, "No context-sensitive help installed" - HelpIntfs_hNoTopics, "No topic-based help system installed" - Consts_SmkcUp, "Up" - Consts_SmkcRight, "Right" - Consts_SmkcDown, "Down" - Consts_SmkcIns, "Ins" - Consts_SmkcDel, "Del" - Consts_SmkcShift, "Shift+" - Consts_SmkcCtrl, "Ctrl+" - Consts_SmkcAlt, "Alt+" - Consts_SIconToClipboard, "Clipboard does not support Icons" - Consts_SCannotOpenClipboard, "Cannot open clipboard" - Consts_SDuplicateMenus, "Menu '%s' is already being used by another form" - Consts_SServiceFailed, "Service failed on %s: %s" - Consts_SExecute, "execute" - Consts_SStart, "start" - Consts_SStop, "stop" - Consts_SPause, "pause" - Consts_SMsgDlgAbort, "&Abort" - Consts_SMsgDlgRetry, "&Retry" - Consts_SMsgDlgIgnore, "&Ignore" - Consts_SMsgDlgAll, "&All" - Consts_SMsgDlgNoToAll, "N&o to All" - Consts_SMsgDlgYesToAll, "Yes to &All" - Consts_SmkcBkSp, "BkSp" - Consts_SmkcTab, "Tab" - Consts_SmkcEsc, "Esc" - Consts_SmkcEnter, "Enter" - Consts_SmkcSpace, "Space" - Consts_SmkcPgUp, "PgUp" - Consts_SmkcPgDn, "PgDn" - Consts_SmkcEnd, "End" - Consts_SmkcHome, "Home" - Consts_SmkcLeft, "Left" - Consts_SAbortButton, "Abort" - Consts_SAllButton, "&All" - Consts_SCannotDragForm, "Cannot drag a form" - Consts_SVMetafiles, "Metafiles" - Consts_SVEnhMetafiles, "Enhanced Metafiles" - Consts_SVIcons, "Icons" - Consts_SVBitmaps, "Bitmaps" - Consts_SMsgDlgWarning, "Warning" - Consts_SMsgDlgError, "Error" - Consts_SMsgDlgInformation, "Information" - Consts_SMsgDlgConfirm, "Confirm" - Consts_SMsgDlgYes, "&Yes" - Consts_SMsgDlgNo, "&No" - Consts_SMsgDlgOK, "OK" - Consts_SMsgDlgCancel, "Cancel" - Consts_SMsgDlgHelp, "&Help" - Consts_SCannotShowModal, "Cannot make a visible window modal" - Consts_SMenuIndexError, "Menu index out of range" - Consts_SMenuReinserted, "Menu inserted twice" - Consts_SMenuNotFound, "Sub-menu is not in menu" - Consts_SNoTimers, "Not enough timers available" - Consts_SGroupIndexTooLow, "GroupIndex cannot be less than a previous menu item's GroupIndex" - Consts_SNoMDIForm, "Cannot create form. No MDI forms are currently active" - Consts_SControlParentSetToSelf, "A control cannot have itself as its parent" - Consts_SOKButton, "OK" - Consts_SCancelButton, "Cancel" - Consts_SYesButton, "&Yes" - Consts_SNoButton, "&No" - Consts_SHelpButton, "&Help" - Consts_SCloseButton, "&Close" - Consts_SIgnoreButton, "&Ignore" - Consts_SRetryButton, "&Retry" - Consts_SInvalidMetafile, "Metafile is not valid" - Consts_SChangeIconSize, "Cannot change the size of an icon" - Consts_SUnknownClipboardFormat, "Unsupported clipboard format" - Consts_SOutOfResources, "Out of system resources" - Consts_SNoCanvasHandle, "Canvas does not allow drawing" - Consts_SInvalidImageSize, "Invalid image size" - Consts_SInvalidImageList, "Invalid ImageList" - Consts_SImageIndexError, "Invalid ImageList Index" - Consts_SImageReadFail, "Failed to read ImageList data from stream" - Consts_SImageWriteFail, "Failed to write ImageList data to stream" - Consts_SWindowDCError, "Error creating window device context" - Consts_SWindowClass, "Error creating window class" - Consts_SCannotFocus, "Cannot focus a disabled or invisible window" - Consts_SParentRequired, "Control '%s' has no parent window" - Consts_SMDIChildNotVisible, "Cannot hide an MDI Child Form" - Consts_SVisibleChanged, "Cannot change Visible in OnShow or OnHide" - RTLConsts_SListCountError, "List count out of bounds (%d)" - RTLConsts_SListIndexError, "List index out of bounds (%d)" - RTLConsts_SMemoryStreamError, "Out of memory while expanding memory stream" - RTLConsts_SPropertyException, "Error reading %s%s%s: %s" - RTLConsts_SReadError, "Stream read error" - RTLConsts_SReadOnlyProperty, "Property is read-only" - RTLConsts_SResNotFound, "Resource %s not found" - RTLConsts_SSeekNotImplemented, "%s.Seek not implemented" - RTLConsts_SSortedListError, "Operation not allowed on sorted list" - RTLConsts_SUnknownGroup, "%s not in a class registration group" - RTLConsts_SUnknownProperty, "Property %s does not exist" - RTLConsts_SWriteError, "Stream write error" - RTLConsts_SThreadCreateError, "Thread creation error: %s" - RTLConsts_SThreadError, "Thread Error: %s (%d)" - Consts_SInvalidBitmap, "Bitmap image is not valid" - Consts_SInvalidIcon, "Icon image is not valid" - RTLConsts_SBitsIndexError, "Bits index out of range" - RTLConsts_SCantWriteResourceStreamError, "Can't write to a read-only resource stream" - RTLConsts_SCheckSynchronizeError, "CheckSynchronize called from thread $%x, which is NOT the main thread" - RTLConsts_SClassNotFound, "Class %s not found" - RTLConsts_SDuplicateClass, "A class named %s already exists" - RTLConsts_SDuplicateItem, "List does not allow duplicates ($0%x)" - RTLConsts_SDuplicateName, "A component named %s already exists" - RTLConsts_SDuplicateString, "String list does not allow duplicates" - RTLConsts_SFCreateErrorEx, "Cannot create file \"%s\". %s" - RTLConsts_SFOpenErrorEx, "Cannot open file \"%s\". %s" - RTLConsts_SInvalidImage, "Invalid stream format" - RTLConsts_SInvalidName, "''%s'' is not a valid component name" - RTLConsts_SInvalidProperty, "Invalid property value" - RTLConsts_SInvalidPropertyPath, "Invalid property path" - RTLConsts_SInvalidPropertyValue, "Invalid property value" - RTLConsts_SListCapacityError, "List capacity out of bounds (%d)" - SysConst_SShortDayNameMon, "Mon" - SysConst_SShortDayNameTue, "Tue" - SysConst_SShortDayNameWed, "Wed" - SysConst_SShortDayNameThu, "Thu" - SysConst_SShortDayNameFri, "Fri" - SysConst_SShortDayNameSat, "Sat" - SysConst_SLongDayNameSun, "Sunday" - SysConst_SLongDayNameMon, "Monday" - SysConst_SLongDayNameTue, "Tuesday" - SysConst_SLongDayNameWed, "Wednesday" - SysConst_SLongDayNameThu, "Thursday" - SysConst_SLongDayNameFri, "Friday" - SysConst_SLongDayNameSat, "Saturday" - SysConst_SCannotCreateDir, "Unable to create directory" - RTLConsts_SAncestorNotFound, "Ancestor for '%s' not found" - RTLConsts_SAssignError, "Cannot assign a %s to a %s" - SysConst_SShortMonthNameOct, "Oct" - SysConst_SShortMonthNameNov, "Nov" - SysConst_SShortMonthNameDec, "Dec" - SysConst_SLongMonthNameJan, "January" - SysConst_SLongMonthNameFeb, "February" - SysConst_SLongMonthNameMar, "March" - SysConst_SLongMonthNameApr, "April" - SysConst_SLongMonthNameMay, "May" - SysConst_SLongMonthNameJun, "June" - SysConst_SLongMonthNameJul, "July" - SysConst_SLongMonthNameAug, "August" - SysConst_SLongMonthNameSep, "September" - SysConst_SLongMonthNameOct, "October" - SysConst_SLongMonthNameNov, "November" - SysConst_SLongMonthNameDec, "December" - SysConst_SShortDayNameSun, "Sun" - SysConst_SIntfCastError, "Interface not supported" - SysConst_SSafecallException, "Exception in safecall method" - SysConst_SAssertError, "%s (%s, line %d)" - SysConst_SAbstractError, "Abstract Error" - SysConst_SModuleAccessViolation, "Access violation at address %p in module '%s'. %s of address %p" - SysConst_SOSError, "System Error. Code: %d.\r\n%s" - SysConst_SUnkOSError, "A call to an OS function failed" - SysConst_SShortMonthNameJan, "Jan" - SysConst_SShortMonthNameFeb, "Feb" - SysConst_SShortMonthNameMar, "Mar" - SysConst_SShortMonthNameApr, "Apr" - SysConst_SShortMonthNameMay, "May" - SysConst_SShortMonthNameJun, "Jun" - SysConst_SShortMonthNameJul, "Jul" - SysConst_SShortMonthNameAug, "Aug" - SysConst_SShortMonthNameSep, "Sep" - SysConst_SWriteAccess, "Write" - SysConst_SVarArrayCreate, "Error creating variant or safe array" - SysConst_SVarArrayBounds, "Variant or safe array index out of bounds" - SysConst_SVarArrayLocked, "Variant or safe array is locked" - SysConst_SInvalidVarCast, "Invalid variant type conversion" - SysConst_SInvalidVarOp, "Invalid variant operation" - SysConst_SInvalidVarOpWithHResultWithPrefix, "Invalid variant operation (%s%.8x)\n%s" - SysConst_SVarTypeCouldNotConvert, "Could not convert variant of type (%s) into type (%s)" - SysConst_SVarTypeConvertOverflow, "Overflow while converting variant of type (%s) into type (%s)" - SysConst_SVarOverflow, "Variant overflow" - SysConst_SVarInvalid, "Invalid argument" - SysConst_SVarBadType, "Invalid variant type" - SysConst_SVarNotImplemented, "Operation not supported" - SysConst_SVarUnexpected, "Unexpected variant error" - SysConst_SExternalException, "External exception %x" - SysConst_SAssertionFailed, "Assertion failed" - SysConst_SZeroDivide, "Floating point division by zero" - SysConst_SOverflow, "Floating point overflow" - SysConst_SUnderflow, "Floating point underflow" - SysConst_SInvalidPointer, "Invalid pointer operation" - SysConst_SInvalidCast, "Invalid class typecast" - SysConst_SAccessViolationArg3, "Access violation at address %p. %s of address %p" - SysConst_SAccessViolationNoArg, "Access violation" - SysConst_SStackOverflow, "Stack overflow" - SysConst_SControlC, "Control-C hit" - SysConst_SPrivilege, "Privileged instruction" - SysConst_SException, "Exception %s in module %s at %p.\r\n%s%s\r\n" - SysConst_SExceptTitle, "Application Error" - SysConst_SInvalidFormat, "Format '%s' invalid or incompatible with argument" - SysConst_SArgumentMissing, "No argument for format '%s'" - SysConst_SDispatchError, "Variant method calls not supported" - SysConst_SReadAccess, "Read" - SysConst_SInvalidInteger, "'%s' is not a valid integer value" - SysConst_STimeEncodeError, "Invalid argument to time encode" - SysConst_SDateEncodeError, "Invalid argument to date encode" - SysConst_SOutOfMemory, "Out of memory" - SysConst_SInOutError, "I/O error %d" - SysConst_SFileNotFound, "File not found" - SysConst_SInvalidFilename, "Invalid filename" - SysConst_STooManyOpenFiles, "Too many open files" - SysConst_SAccessDenied, "File access denied" - SysConst_SEndOfFile, "Read beyond end of file" - SysConst_SDiskFull, "Disk full" - SysConst_SInvalidInput, "Invalid numeric input" - SysConst_SDivByZero, "Division by zero" - SysConst_SRangeError, "Range check error" - SysConst_SIntOverflow, "Integer overflow" - SysConst_SInvalidOp, "Invalid floating point operation" -END - diff --git a/cacicservice/cacicservice.res b/cacicservice/cacicservice.res index 1c468cc..f961e77 100755 Binary files a/cacicservice/cacicservice.res and b/cacicservice/cacicservice.res differ diff --git a/chkcacic/CacicChecaPreparaAmbiente.vbs b/chkcacic/CacicChecaPreparaAmbiente.vbs deleted file mode 100755 index 011f151..0000000 --- a/chkcacic/CacicChecaPreparaAmbiente.vbs +++ /dev/null @@ -1,117 +0,0 @@ -'========================================================================================================================================================== -' Código VBScript para Checagem e Preparação do Ambiente Computacional Baseado no Sistema Operacional MS-Windows para Instalação do Sistema -' CACIC - Configurador Automático e Coletor de Informações Computacionais -' -' NOME: CacicChecaPreparaAmbiente.vbs -' -' AUTOR: Anderson Peterle - anderson.peterle@previdencia.gov.br -' DATA : 21/09/2009 01:36AM -' -' OBJETIVOS: -' 1) Verificar a existência do programa executável referente ao processo Mantenedor de Integridade do Sistema CACIC nas estações de trabalho com MS-Windows -' 2) Caso o objetivo 1 seja positivo, exclusão de todos os arquivos e chaves de execução automática (Registry) referentes às versões antigas do CACIC -' -' EXECUÇÃO: cscript CacicChecaPreparaAmbiente.vbs //B -'========================================================================================================================================================== - -' Crio o objeto para os trabalhos com arquivos e diretórios -Set fileSys = CreateObject("Scripting.FileSystemObject") - -' Verifico a existência do executável do Serviço para Manutenção de Integridade do Agente Principal -' Caso não exista o executável do serviço, entendo que a estação contém alguma versão antiga do CACIC -If not fileSys.FileExists(fileSys.GetSpecialFolder(0) & "\cacicsvc.exe") Then - ' Crio um objeto para acesso ao Registry - Set WSHShell = CreateObject("WScript.Shell") - - ' Exclusão da chave para execução automática do Agente Principal (cacic2.exe) - If RegExist("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\cacic2") Then - WSHShell.RegDelete( "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\cacic2" ) - End If - - ' Exclusão da chave para execução automática do Agente Verificador de Integridade (chksis.exe) - If RegExist("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\CheckSystemRoutine") Then - WSHShell.RegDelete( "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\CheckSystemRoutine" ) - End If - - ' Exclusão dos arquivos que compõem o Verificador de Integridade do Sistema (ChkSis) - ' O "TRUE" é para confirmar a exclusão de arquivos ReadOnly - If fileSys.FileExists(fileSys.GetSpecialFolder(0) & "\chksis.exe") Then fileSys.DeleteFile(fileSys.GetSpecialFolder(0) & "\chksis.exe"),TRUE - If fileSys.FileExists(fileSys.GetSpecialFolder(0) & "\chksis.ini") Then fileSys.DeleteFile(fileSys.GetSpecialFolder(0) & "\chksis.ini"),TRUE - If fileSys.FileExists(fileSys.GetSpecialFolder(0) & "\chksis.dat") Then fileSys.DeleteFile(fileSys.GetSpecialFolder(0) & "\chksis.dat"),TRUE - If fileSys.FileExists(fileSys.GetSpecialFolder(0) & "\chksis.log") Then fileSys.DeleteFile(fileSys.GetSpecialFolder(0) & "\chksis.log"),TRUE - - - ' Exclusão da pasta de instalação do CACIC - Set objArgs = WScript.Arguments - if objArgs.Count > 0 Then - strCacicFolder = GetINIString("Cacic2", "cacic_dir", "Cacic", objArgs(0)) - if fileSys.FolderExists(Left(fileSys.GetSpecialFolder(0), 3) & strCacicFolder) Then - fileSys.DeleteFolder(Left(fileSys.GetSpecialFolder(0), 3) & strCacicFolder) - End If - End If -End If - -' Função para verificação de existência de chave do Registry -Function RegExist(Key) - On Error Resume Next - Set WshShellChecaReg=Wscript.CreateObject("Wscript.Shell") - Kexist=WshShellChecaReg.RegRead(Key) - If Err.number=0 then - RegExist=True - Else - RegExist=False - End If -End Function - -' Função para leitura de chave em arquivo INI -Function GetINIString(Section, KeyName, Default, FileName) - Dim INIContents, PosSection, PosEndSection, sContents, Value, Found - - ' Carrega o conteúdo do arquivo INI em uma string - INIContents = GetFile(FileName) - - ' Procura pela seção - PosSection = InStr(1, INIContents, "[" & Section & "]", vbTextCompare) - If PosSection>0 Then - ' Caso a seção exista, encontra o seu fim - PosEndSection = InStr(PosSection, INIContents, vbCrLf & "[") - ' Se for a última seção... - If PosEndSection = 0 Then PosEndSection = Len(INIContents)+1 - - ' Separa os conteúdos da seção - sContents = Mid(INIContents, PosSection, PosEndSection - PosSection) - - If InStr(1, sContents, vbCrLf & KeyName & "=", vbTextCompare)>0 Then - Found = True - ' Separa valor de chave - Value = SeparateField(sContents, vbCrLf & KeyName & "=", vbCrLf) - End If - End If - If isempty(Found) Then Value = Default - GetINIString = Value -End Function - -' Separa um campo entre Inicio e Fim -Function SeparateField(ByVal sFrom, ByVal sStart, ByVal sEnd) - Dim PosB: PosB = InStr(1, sFrom, sStart, 1) - If PosB > 0 Then - PosB = PosB + Len(sStart) - Dim PosE: PosE = InStr(PosB, sFrom, sEnd, 1) - If PosE = 0 Then PosE = InStr(PosB, sFrom, vbCrLf, 1) - If PosE = 0 Then PosE = Len(sFrom) + 1 - SeparateField = Mid(sFrom, PosB, PosE - PosB) - End If -End Function - - -' Função para leitura de um arquivo -Function GetFile(ByVal FileName) - Dim FS: Set FS = CreateObject("Scripting.FileSystemObject") - ' Caso não seja informada a pasta, usa a do MS-Windows - If InStr(FileName, ":\") = 0 And Left (FileName,2)<>"\\" Then - FileName = FS.GetSpecialFolder(0) & "\" & FileName - End If - On Error Resume Next - - GetFile = FS.OpenTextFile(FileName).ReadAll -End Function \ No newline at end of file diff --git a/chkcacic/FormConfig.dcu b/chkcacic/FormConfig.dcu deleted file mode 100755 index 6a242b0..0000000 Binary files a/chkcacic/FormConfig.dcu and /dev/null differ diff --git a/chkcacic/FormConfig.ddp b/chkcacic/FormConfig.ddp deleted file mode 100755 index 4370276..0000000 Binary files a/chkcacic/FormConfig.ddp and /dev/null differ diff --git a/chkcacic/FormConfig.dfm b/chkcacic/FormConfig.dfm deleted file mode 100755 index d83c2f9..0000000 --- a/chkcacic/FormConfig.dfm +++ /dev/null @@ -1,378 +0,0 @@ -object Configs: TConfigs - Left = 217 - Top = 20 - AutoSize = True - BorderIcons = [] - BorderStyle = bsSingle - Caption = 'Configura'#231#245'es do chkCACIC' - ClientHeight = 374 - ClientWidth = 575 - Color = clBtnFace - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [] - OldCreateOrder = False - OnActivate = FormActivate - PixelsPerInch = 96 - TextHeight = 13 - object gbOptional: TGroupBox - Left = 0 - Top = 370 - Width = 575 - Height = 0 - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [fsBold] - ParentFont = False - TabOrder = 3 - object lbMensagemNaoAplicavel: TLabel - Left = 265 - Top = 25 - Width = 192 - Height = 13 - Caption = '(N'#227'o aplicar ao chkCACIC do NetLogon)' - Font.Charset = DEFAULT_CHARSET - Font.Color = clRed - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [] - ParentFont = False - end - object Label_TeProcessInformations: TLabel - Left = 9 - Top = 50 - Width = 89 - Height = 13 - Caption = 'Informa'#231#245'es extras' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [] - ParentFont = False - end - object Memo_TeExtrasProcessInformations: TMemo - Left = 9 - Top = 66 - Width = 556 - Height = 126 - Color = clInactiveBorder - Enabled = False - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [] - Lines.Strings = ( - 'Empresa-UF / Suporte T'#233'cnico' - '' - 'Emails: email1_do_suporte@xxxxxx.yyy.zz, ' - ' email2_do_suporte@xxxxxx.yyy.zz' - '' - 'Fones: (xx) yyyy-zzzz / (xx) yyyy-zzzz' - '' - 'Endere'#231'o: Rua Nome_da_Rua, N'#186' 99999' - ' Cidade/UF') - ParentFont = False - TabOrder = 1 - end - object checkboxInShowProcessInformations: TCheckBox - Left = 9 - Top = 23 - Width = 256 - Height = 17 - Caption = 'Exibe informa'#231#245'es sobre o processo de instala'#231#227'o' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [] - ParentFont = False - TabOrder = 0 - OnClick = checkboxInShowProcessInformationsClick - end - end - object gbMandatory: TGroupBox - Left = 0 - Top = 16 - Width = 575 - Height = 112 - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [fsBold] - ParentFont = False - TabOrder = 2 - object Label_TeWebManagerAddress: TLabel - Left = 7 - Top = 10 - Width = 232 - Height = 13 - Caption = '1 - Endere'#231'o de Acesso ao Gerente WEB CACIC' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [] - ParentFont = False - end - object Label_TeLocalFolder: TLabel - Left = 305 - Top = 10 - Width = 147 - Height = 13 - Caption = '2 - Pasta para Instala'#231#227'o Local' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [] - ParentFont = False - end - object Label1: TLabel - Left = 8 - Top = 48 - Width = 213 - Height = 12 - Caption = 'Informe o mesmo endere'#231'o de acesso via browser' - Font.Charset = DEFAULT_CHARSET - Font.Color = clBlue - Font.Height = -9 - Font.Name = 'Arial' - Font.Style = [] - ParentFont = False - end - object Label2: TLabel - Left = 305 - Top = 48 - Width = 253 - Height = 12 - Caption = 'Pasta a ser criada na unidade padr'#227'o do computador destino' - Font.Charset = DEFAULT_CHARSET - Font.Color = clBlue - Font.Height = -9 - Font.Name = 'Arial' - Font.Style = [] - ParentFont = False - end - object Label3: TLabel - Left = 358 - Top = 117 - Width = 211 - Height = 12 - AutoSize = False - Font.Charset = DEFAULT_CHARSET - Font.Color = clMaroon - Font.Height = -9 - Font.Name = 'Arial' - Font.Style = [] - ParentFont = False - end - object pnStatus: TPanel - Left = 1 - Top = 83 - Width = 571 - Height = 26 - BevelInner = bvLowered - TabOrder = 0 - object staticStatus: TStaticText - Left = 2 - Top = 2 - Width = 567 - Height = 22 - Align = alClient - Alignment = taCenter - AutoSize = False - Caption = 'staticStatus' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -16 - Font.Name = 'MS Sans Serif' - Font.Style = [fsBold] - ParentFont = False - TabOrder = 0 - end - end - end - object Edit_TeWebManagerAddress: TEdit - Left = 8 - Top = 41 - Width = 260 - Height = 24 - BevelInner = bvLowered - BevelKind = bkSoft - CharCase = ecLowerCase - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -13 - Font.Name = 'Arial' - Font.Style = [fsBold] - MaxLength = 100 - ParentFont = False - TabOrder = 0 - Text = 'pwebcgi01/cacic3/' - OnExit = Edit_TeWebManagerAddressExit - end - object Edit_TeLocalFolder: TEdit - Left = 306 - Top = 41 - Width = 260 - Height = 24 - BevelInner = bvLowered - BevelKind = bkSoft - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -13 - Font.Name = 'Arial' - Font.Style = [fsBold] - MaxLength = 100 - ParentFont = False - TabOrder = 1 - Text = 'Cacic' - end - object Button_ConfirmProcess: TButton - Left = 12 - Top = 141 - Width = 250 - Height = 35 - Caption = 'Concluir Instala'#231#227'o/Atualiza'#231#227'o' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -13 - Font.Name = 'MS Sans Serif' - Font.Style = [fsBold] - ParentFont = False - TabOrder = 4 - OnClick = Button_ConfirmProcessClick - end - object Button_ExitProcess: TButton - Left = 311 - Top = 141 - Width = 250 - Height = 35 - Caption = 'Sair' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -13 - Font.Name = 'MS Sans Serif' - Font.Style = [fsBold] - ParentFont = False - TabOrder = 5 - OnClick = Button_ExitProcessClick - end - object pnVersao: TPanel - Left = 492 - Top = 0 - Width = 82 - Height = 20 - BevelInner = bvLowered - Caption = 'Vers'#227'o' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [fsBold] - ParentFont = False - TabOrder = 6 - end - object gbProgress: TGroupBox - Left = 0 - Top = 200 - Width = 575 - Height = 147 - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [fsBold] - ParentFont = False - TabOrder = 7 - object memoProgress: TMemo - Left = 9 - Top = 17 - Width = 556 - Height = 120 - Color = clWhite - Enabled = False - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [] - ParentFont = False - TabOrder = 0 - end - end - object labelOptionalsInformations: TStaticText - Left = 1 - Top = 356 - Width = 58 - Height = 14 - AutoSize = False - Caption = 'Opcionais' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'Arial' - Font.Style = [fsBold] - ParentFont = False - TabOrder = 10 - OnClick = labelOptionalsInformationsClick - end - object staticClickToExpand: TStaticText - Left = 58 - Top = 356 - Width = 159 - Height = 18 - Cursor = crHandPoint - Caption = '(Clique para EXPANDIR o Painel)' - Font.Charset = DEFAULT_CHARSET - Font.Color = clNavy - Font.Height = -11 - Font.Name = 'Arial' - Font.Style = [] - ParentFont = False - TabOrder = 11 - OnClick = staticClickToExpandClick - end - object labelMandatoryField: TStaticText - Left = 1 - Top = 3 - Width = 162 - Height = 14 - AutoSize = False - Caption = 'Preenchimento Obrigat'#243'rio' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'Arial' - Font.Style = [fsBold] - ParentFont = False - TabOrder = 8 - end - object labelActionsLog: TStaticText - Left = 1 - Top = 188 - Width = 162 - Height = 14 - AutoSize = False - Caption = 'Log de A'#231#245'es' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'Arial' - Font.Style = [fsBold] - ParentFont = False - TabOrder = 9 - end - object timerGeneral: TTimer - OnTimer = timerGeneralTimer - Left = 272 - Top = 168 - end -end diff --git a/chkcacic/FormConfig.pas b/chkcacic/FormConfig.pas deleted file mode 100755 index f824e0a..0000000 --- a/chkcacic/FormConfig.pas +++ /dev/null @@ -1,240 +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 FormConfig; - -interface - -uses - Windows, - Messages, - SysUtils, - Variants, - Classes, - Graphics, - Controls, - Forms, - Dialogs, - StdCtrls, - main, - NTFileSecurity, - Buttons, - ExtCtrls, ComCtrls; - -type - TConfigs = class(TForm) - Edit_TeWebManagerAddress: TEdit; - Edit_TeLocalFolder: TEdit; - gbMandatory: TGroupBox; - Label_TeWebManagerAddress: TLabel; - Label_TeLocalFolder: TLabel; - gbOptional: TGroupBox; - lbMensagemNaoAplicavel: TLabel; - Label_TeProcessInformations: TLabel; - Button_ConfirmProcess: TButton; - Memo_TeExtrasProcessInformations: TMemo; - checkboxInShowProcessInformations: TCheckBox; - Button_ExitProcess: TButton; - Label1: TLabel; - Label2: TLabel; - Label3: TLabel; - pnVersao: TPanel; - gbProgress: TGroupBox; - memoProgress: TMemo; - pnStatus: TPanel; - staticStatus: TStaticText; - timerGeneral: TTimer; - labelMandatoryField: TStaticText; - labelActionsLog: TStaticText; - labelOptionalsInformations: TStaticText; - staticClickToExpand: TStaticText; - procedure Button_ConfirmProcessClick(Sender: TObject); - procedure checkboxInShowProcessInformationsClick(Sender: TObject); - procedure Button_ExitProcessClick(Sender: TObject); - procedure Edit_TeWebManagerAddressExit(Sender: TObject); - procedure StatusBar_TestAndVersionDrawPanel(StatusBar: TStatusBar; - Panel: TStatusPanel; const Rect: TRect); - - procedure FormActivate(Sender: TObject); - procedure ResizeGbOptional; - procedure timerGeneralTimer(Sender: TObject); - procedure staticClickToExpandClick(Sender: TObject); - procedure labelOptionalsInformationsClick(Sender: TObject); - private - { Private declarations } - public - { Public declarations } - end; - -var - Configs: TConfigs; - strAction : String; - - -implementation - -{$R *.dfm} - -procedure TConfigs.Button_ConfirmProcessClick(Sender: TObject); -begin - if trim(Edit_TeLocalFolder.Text) = '' then - Edit_TeLocalFolder.Text := 'Cacic'; - - if trim(Edit_TeWebManagerAddress.Text) = '' then - Edit_TeWebManagerAddress.SetFocus - else - Begin - main.GravaConfiguracoes; - Close; -// Application.terminate; - End; -end; - -procedure TConfigs.checkboxInShowProcessInformationsClick(Sender: TObject); -begin - if checkboxInShowProcessInformations.Checked then - Begin - Memo_TeExtrasProcessInformations.Enabled := true; - Memo_TeExtrasProcessInformations.Color := clWindow; - v_InShowProcessInformations := 'S'; - End - else - Begin - Memo_TeExtrasProcessInformations.Enabled := false; - Memo_TeExtrasProcessInformations.Color := clInactiveBorder; - v_InShowProcessInformations := 'N'; - End; -end; - -procedure TConfigs.Button_ExitProcessClick(Sender: TObject); -begin - Close; - Halt(0); -end; - -procedure TConfigs.Edit_TeWebManagerAddressExit(Sender: TObject); -begin - if (trim(Edit_TeWebManagerAddress.Text)<> '') then - Begin - v_TeWebManagerAddress := Configs.Edit_TeWebManagerAddress.text; - - staticStatus.Caption := 'Efetuando comunicação com o endereço informado...'; - - tstringlistRequest_Config.Clear; - tstringlistRequest_Config.Values['in_chkcacic'] := 'chkcacic_GetTest'; - - Edit_TeWebManagerAddress.Text := StringReplace(Edit_TeWebManagerAddress.Text,'http://','',[rfReplaceAll]); - Button_ConfirmProcess.Enabled := frmChkCACIC.CommunicateTo(Edit_TeWebManagerAddress.Text + '/ws/get_test.php',tstringlistRequest_Config); - - if Button_ConfirmProcess.Enabled then - Begin - staticStatus.Caption := 'Teste de Comunicação Efetuado Com Sucesso!'; - staticStatus.Font.Color := clGreen; - End - else - Begin - staticStatus.Caption := 'Insucesso no Teste de Comunicação com o Endereço Informado!'; - staticStatus.Font.Color := clRed; - End; - End - else - staticStatus.Caption := ''; -end; - -procedure TConfigs.StatusBar_TestAndVersionDrawPanel(StatusBar: TStatusBar; - Panel: TStatusPanel; const Rect: TRect); -begin - -with StatusBar.Canvas do - begin - case Panel.Index of - 0: //fist panel - begin - if Button_ConfirmProcess.Enabled or (trim(Panel.Text)='') then - Brush.Color := clCream - else - Brush.Color := clYellow; - - Panel.Alignment := taCenter; - Font.Color := clNavy; - Font.Style := [fsBold]; - end; - 1: //second panel - begin - Brush.Color := clCream; - Font.Color := clBlack; - Font.Style := []; - Panel.Alignment := taCenter; - end; - end; - //Panel background color - FillRect(Rect) ; - - //Panel Text - TextRect(Rect,Rect.Left,Rect.Top,Panel.Text) ; - end; -end; - -procedure TConfigs.FormActivate(Sender: TObject); -begin - Edit_TeWebManagerAddressExit(nil); -end; - -procedure TConfigs.timerGeneralTimer(Sender: TObject); -begin -if (Copy(strAction,1,17) = 'Resize_gbOptional') then - Begin - if (Trim(Copy(strAction,19,4)) = 'DOWN') then - gbOptional.Height := gbOptional.Height + 1 - else - gbOptional.Height := gbOptional.Height - 1; - - if (gbOptional.Height = 0) or (gbOptional.Height = 200) then - Begin - timerGeneral.Enabled := false; - if (gbOptional.Height = 200) then - staticClickToExpand.Caption := '(Clique para ENCOLHER o Painel)' - else - staticClickToExpand.Caption := '(Clique para EXPANDIR o Painel)'; - End; - End; -end; - -procedure TConfigs.staticClickToExpandClick(Sender: TObject); -begin - ResizeGbOptional; -end; - -procedure TConfigs.labelOptionalsInformationsClick(Sender: TObject); -begin - ResizeGbOptional; -end; - -procedure TConfigs.ResizeGbOptional; -Begin - strAction := 'Resize_gbOptional_'; - if (gbOptional.Height = 0) then - strAction := strAction + 'DOWN' - else - strAction := strAction + 'UP'; - - staticClickToExpand.Caption := ''; - timerGeneral.Enabled := false; - timerGeneral.Interval := 10; - timerGeneral.Enabled := true; -End; -end. diff --git a/chkcacic/Thumbs.db b/chkcacic/Thumbs.db deleted file mode 100755 index 7ed8044..0000000 Binary files a/chkcacic/Thumbs.db and /dev/null differ diff --git a/chkcacic/cacic_logo.png b/chkcacic/cacic_logo.png deleted file mode 100755 index 3c17e3d..0000000 Binary files a/chkcacic/cacic_logo.png and /dev/null differ diff --git a/chkcacic/chkcacic.cfg b/chkcacic/chkcacic.cfg deleted file mode 100755 index ce58bf8..0000000 --- a/chkcacic/chkcacic.cfg +++ /dev/null @@ -1,43 +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 --E"C:\arariboia_mod_BINARIOS" --LE"c:\program files\borland\delphi7\Projects\Bpl" --LN"c:\program files\borland\delphi7\Projects\Bpl" --U"C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion" --O"C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion" --I"C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion" --R"C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion" --w-UNSAFE_TYPE --w-UNSAFE_CODE --w-UNSAFE_CAST diff --git a/chkcacic/chkcacic.dof b/chkcacic/chkcacic.dof deleted file mode 100755 index b3f4941..0000000 --- a/chkcacic/chkcacic.dof +++ /dev/null @@ -1,153 +0,0 @@ -[FileVersion] -Version=7.0 -[Compiler] -A=8 -B=0 -C=1 -D=1 -E=0 -F=0 -G=1 -H=1 -I=1 -J=0 -K=0 -L=1 -M=0 -N=1 -O=1 -P=1 -Q=0 -R=0 -S=0 -T=0 -U=0 -V=1 -W=0 -X=1 -Y=1 -Z=1 -ShowHints=1 -ShowWarnings=1 -UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -NamespacePrefix= -SymbolDeprecated=1 -SymbolLibrary=1 -SymbolPlatform=1 -UnitLibrary=1 -UnitPlatform=1 -UnitDeprecated=1 -HResultCompat=1 -HidingMember=1 -HiddenVirtual=1 -Garbage=1 -BoundsError=1 -ZeroNilCompat=1 -StringConstTruncated=1 -ForLoopVarVarPar=1 -TypedConstVarPar=1 -AsgToTypedConst=1 -CaseLabelRange=1 -ForVariable=1 -ConstructingAbstract=1 -ComparisonFalse=1 -ComparisonTrue=1 -ComparingSignedUnsigned=1 -CombiningSignedUnsigned=1 -UnsupportedConstruct=1 -FileOpen=1 -FileOpenUnitSrc=1 -BadGlobalSymbol=1 -DuplicateConstructorDestructor=1 -InvalidDirective=1 -PackageNoLink=1 -PackageThreadVar=1 -ImplicitImport=1 -HPPEMITIgnored=1 -NoRetVal=1 -UseBeforeDef=1 -ForLoopVarUndef=1 -UnitNameMismatch=1 -NoCFGFileFound=1 -MessageDirective=1 -ImplicitVariants=1 -UnicodeToLocale=1 -LocaleToUnicode=1 -ImagebaseMultiple=1 -SuspiciousTypecast=1 -PrivatePropAccessor=1 -UnsafeType=0 -UnsafeCode=0 -UnsafeCast=0 -[Linker] -MapFile=0 -OutputObjs=0 -ConsoleApp=1 -DebugInfo=0 -RemoteSymbols=0 -MinStackSize=16384 -MaxStackSize=1048576 -ImageBase=4194304 -ExeDescription= -[Directories] -OutputDir=C:\arariboia_mod_BINARIOS -UnitOutputDir= -PackageDLLOutputDir= -PackageDCPOutputDir= -SearchPath=C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion -Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;IntrawebDB_50_70;Intraweb_50_70;Rave50CLX;Rave50VCL;dclOffice2k -Conditionals= -DebugSourceDirs= -UsePackages=0 -[Parameters] -RunParams= -HostApplication= -Launcher= -UseLauncher=0 -DebugCWD= -[Language] -ActiveLang= -ProjectLang= -RootDir=C:\ARQUIVOS DE PROGRAMAS\BORLAND\DELPHI7\BIN\ -[Version Info] -IncludeVerInfo=1 -AutoIncBuild=0 -MajorVer=2 -MinorVer=6 -Release=0 -Build=2 -Debug=0 -PreRelease=0 -Special=0 -Private=0 -DLL=0 -Locale=2070 -CodePage=1252 -[Version Info Keys] -CompanyName=Dataprev - Emp. de TI da Prev.Social - UDSL/SSLC -FileDescription=Sistema CACIC - Módulo Verificador/Instalador/Atualizador -FileVersion=2.6.0.2 -InternalName= -LegalCopyright= -LegalTrademarks= -OriginalFilename= -ProductName=ChkCACIC -ProductVersion=2.6-Beta-2 -Comments=Licença: GNU/LGPL -[HistoryLists\hlDebugSourcePath] -Count=1 -Item0=C:\Arquivos de programas\Borland\Delphi7\Mitec\D7 -[HistoryLists\hlUnitAliases] -Count=1 -Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; -[HistoryLists\hlSearchPath] -Count=4 -Item0=C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion -Item1=C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP -Item2=C:\Arquivos de programas\Borland\Delphi7\Mitec\D7;C:\Arquivos de programas\Borland\Delphi7\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\CriptografiaDCP\Ciphers;C:\Arquivos de programas\Borland\Delphi7\CriptografiaDCP\Hashes -Item3=C:\Arquivos de programas\Borland\Delphi7\Mitec\D7 -[HistoryLists\hlOutputDirectorry] -Count=3 -Item0=C:\arariboia_mod_BINARIOS -Item1=Z:\cacic2\repositorio -Item2=..\ diff --git a/chkcacic/chkcacic.dpr b/chkcacic/chkcacic.dpr deleted file mode 100755 index 7994bc2..0000000 --- a/chkcacic/chkcacic.dpr +++ /dev/null @@ -1,45 +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 ---------------------------------------------------------------------------------------------------------------------------------------------------------------- -*) -program chkcacic; -uses - Forms, - windows, - main in 'main.pas' {frmChkCACIC}, - FormConfig in 'FormConfig.pas' {Configs}, - CACIC_Library in '..\CACIC_Library.pas'; - -{$R *.res} - -const - CACIC_APP_NAME = 'chkcacic'; - -var - oCacic : TCACIC; - -begin - oCacic := TCACIC.Create(); - - if( not oCacic.isAppRunning( CACIC_APP_NAME ) ) then - Begin - Application.Initialize; - Application.CreateForm(TfrmChkCACIC, frmChkCACIC); - Application.Run; - End; - - oCacic.Free(); - -end. diff --git a/chkcacic/chkcacic.dproj b/chkcacic/chkcacic.dproj deleted file mode 100755 index 2071d42..0000000 --- a/chkcacic/chkcacic.dproj +++ /dev/null @@ -1,87 +0,0 @@ - - - {05cd78c2-4e82-47ab-8fce-a74fa1f9b93b} - chkcacic.dpr - Debug - AnyCPU - DCC32 - ..\chkcacic.exe - - - 7.0 - False - False - 0 - ..\ - C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion - C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion - C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion - C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion - RELEASE - - - 7.0 - ..\ - C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion - C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion - C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion - C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\NTFileSecurity;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\PJVersion - DEBUG - - - Delphi.Personality - VCLApplication - - - False - True - False - - - C:\ARQUIVOS DE PROGRAMAS\BORLAND\DELPHI7\BIN\ - - - True - False - 2 - 6 - 0 - 0 - False - False - False - False - False - 2070 - 1252 - - - Dataprev - Emp. de TI da Prev.Social - UDSL/SSLC - Sistema CACIC - Módulo Verificador/Instalador/Atualizador - 2.5.9.0 - - - - - ChkCACIC - 2.6.0.0 - Licença: GNU/LGPL - - - chkcacic.dpr - - - - - - - MainSource - - - -
Configs
-
- -
- -
\ No newline at end of file diff --git a/chkcacic/chkcacic.dsk b/chkcacic/chkcacic.dsk deleted file mode 100755 index b57d2dc..0000000 --- a/chkcacic/chkcacic.dsk +++ /dev/null @@ -1,371 +0,0 @@ -[Closed Files] -File_0=SourceModule,'\\10.71.0.212\arariboia_mod\chkcacic\main.pas',0,1,741,1,762,0,0 -File_1=SourceModule,'K:\chkcacic\main.iip',0,1,1,1,1,0,0 -File_2=SourceModule,'C:\arariboia_mod\chkCACIC_mod\xml.pas',0,1,1,1,1,0,0 -File_3=SourceModule,'C:\arariboia_mod\chkCACIC_mod\LibXmlParser.pas',0,1,1,1,1,0,0 -File_4=SourceModule,'C:\DOCUME~1\D306851\CONFIG~1\TEMP\IdNetworkCalculator.pas',0,1,55,1,1,0,0 -File_5=SourceModule,'C:\arariboia\chkCACIC\main.pas',0,1,344,5,371,1,0 -File_6=SourceModule,'C:\arariboia\chkCACIC\main.dfm',0,1,1,1,1,0,0 -File_7=SourceModule,'C:\arariboia\main.pas',0,1,497,44,507,1,0 -File_8=SourceModule,'D:\COFRE\Pas\GenLib.pas',0,1,413,1,424,0,0 -File_9=SourceModule,'D:\COFRE\Pas\dtmOrca.pas',0,1,382,1,391,1,0 - -[Modules] -Module0=K:\chkcacic\main.pas -Module1=K:\chkcacic\FormConfig.pas -Module2=c:\arquivos de programas\borland\delphi7\Source\Indy\IdHTTP.pas -Module3=K:\chkcacic\chkcacic.dpr -Count=4 -EditWindowCount=1 - -[K:\chkcacic\main.pas] -ModuleType=SourceModule -FormState=1 -FormOnTop=0 - -[K:\chkcacic\FormConfig.pas] -ModuleType=SourceModule -FormState=1 -FormOnTop=0 - -[c:\arquivos de programas\borland\delphi7\Source\Indy\IdHTTP.pas] -ModuleType=SourceModule -FormState=0 -FormOnTop=0 - -[K:\chkcacic\chkcacic.dpr] -ModuleType=SourceModule -FormState=0 -FormOnTop=0 - -[C:\Arquivos de programas\Borland\Delphi7\Projects\ProjectGroup1.bpg] -FormState=0 -FormOnTop=0 - -[EditWindow0] -ViewCount=4 -CurrentView=2 -View0=0 -View1=1 -View2=2 -View3=3 -CodeExplorer=CodeExplorer@EditWindow0 -MessageView=MessageView@EditWindow0 -Create=1 -Visible=1 -State=2 -Left=12 -Top=124 -Width=1012 -Height=475 -MaxLeft=-4 -MaxTop=100 -MaxWidth=1032 -MaxHeight=644 -ClientWidth=1024 -ClientHeight=617 -LeftPanelSize=140 -LeftPanelClients=CodeExplorer@EditWindow0 -LeftPanelData=00000400000000008C000000000000000211020000000000000100000000000000000000000001000000008C0000000C000000436F64654578706C6F726572FFFFFFFF -RightPanelSize=0 -BottomPanelSize=85 -BottomPanelClients=MessageView@EditWindow0 -BottomPanelData=000004000000000000000000000000000000000000000000000100000000000000000B0000004D65737361676556696577FFFFFFFF - -[View0] -Module=K:\chkcacic\chkcacic.dpr -CursorX=28 -CursorY=10 -TopLine=1 -LeftCol=1 - -[View1] -Module=K:\chkcacic\FormConfig.pas -CursorX=83 -CursorY=19 -TopLine=1 -LeftCol=1 - -[View2] -Module=K:\chkcacic\main.pas -CursorX=37 -CursorY=1170 -TopLine=1165 -LeftCol=1 - -[View3] -Module=c:\arquivos de programas\borland\delphi7\Source\Indy\IdHTTP.pas -CursorX=20 -CursorY=1260 -TopLine=1245 -LeftCol=1 - -[Watches] -Count=0 - -[WatchWindow] -WatchColumnWidth=100 -WatchShowColumnHeaders=1 -Create=1 -Visible=0 -State=0 -Left=299 -Top=305 -Width=426 -Height=157 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=418 -ClientHeight=133 -TBDockHeight=157 -LRDockWidth=426 -Dockable=1 - -[Breakpoints] -Count=0 - -[AddressBreakpoints] -Count=0 - -[Main Window] -Create=1 -Visible=1 -State=2 -Left=0 -Top=0 -Width=1024 -Height=105 -MaxLeft=-1 -MaxTop=-1 -MaxWidth=1032 -MaxHeight=105 -ClientWidth=1024 -ClientHeight=78 - -[ProjectManager] -Create=1 -Visible=0 -State=0 -Left=369 -Top=372 -Width=438 -Height=303 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=430 -ClientHeight=279 -TBDockHeight=303 -LRDockWidth=438 -Dockable=1 - -[Components] -Left=240 -Top=237 -Width=183 -Height=233 -Create=1 -Visible=0 -State=0 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=175 -ClientHeight=209 -TBDockHeight=233 -LRDockWidth=183 -Dockable=1 - -[CPUWindow] -Create=1 -Visible=0 -State=0 -Left=109 -Top=9 -Width=715 -Height=565 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=707 -ClientHeight=538 -DumpPane=79 -DisassemblyPane=187 -RegisterPane=231 -FlagPane=64 - -[AlignmentPalette] -Create=1 -Visible=0 -State=0 -Left=200 -Top=107 -Width=156 -Height=82 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=150 -ClientHeight=60 - -[PropertyInspector] -Create=1 -Visible=1 -State=0 -Left=278 -Top=3 -Width=264 -Height=557 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=256 -ClientHeight=533 -TBDockHeight=285 -LRDockWidth=190 -Dockable=1 -SplitPos=148 -ArrangeBy=Name -SelectedItem=Caption -ExpandedItems=DisplayOptions,Font,Font.Style,KeyOptions,MenuAnimation,Options,SSLOptions,SSLOptions.VerifyMode -HiddenCategories= - -[CallStackWindow] -Create=1 -Visible=0 -State=0 -Left=253 -Top=219 -Width=294 -Height=161 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=286 -ClientHeight=137 -TBDockHeight=161 -LRDockWidth=294 -Dockable=1 - -[ObjectTree] -Create=1 -Visible=0 -State=0 -Left=0 -Top=105 -Width=190 -Height=186 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=182 -ClientHeight=162 -TBDockHeight=186 -LRDockWidth=190 -Dockable=1 - -[LocalVarsWindow] -Create=1 -Visible=0 -State=0 -Left=273 -Top=197 -Width=421 -Height=189 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=413 -ClientHeight=165 -TBDockHeight=189 -LRDockWidth=421 -Dockable=1 - -[ToDo List] -Create=1 -Visible=0 -State=0 -Left=202 -Top=155 -Width=470 -Height=250 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=462 -ClientHeight=226 -TBDockHeight=250 -LRDockWidth=470 -Dockable=1 -Column0Width=200 -Column1Width=30 -Column2Width=100 -Column3Width=70 -Column4Width=70 -SortOrder=4 -ShowHints=1 -ShowChecked=1 - -[ModuleWindow] -Create=1 -Visible=0 -State=0 -Left=-12 -Top=227 -Width=638 -Height=355 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=630 -ClientHeight=331 -TBDockHeight=355 -LRDockWidth=638 -Dockable=1 -Column0Width=125 -Column1Width=100 -Column2Width=155 -EntryPointPane=225 -CompUnitPane=104 - -[MessageHintFrm] -Create=1 -Visible=0 -State=0 -Left=305 -Top=184 -Width=383 -Height=195 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=375 -ClientHeight=171 -TBDockHeight=195 -LRDockWidth=383 -Dockable=1 - -[CodeExplorer@EditWindow0] -Create=1 -Visible=1 -State=0 -Left=0 -Top=12 -Width=140 -Height=517 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=140 -ClientHeight=517 -TBDockHeight=517 -LRDockWidth=140 -Dockable=1 - -[MessageView@EditWindow0] -Create=1 -Visible=1 -State=0 -Left=12 -Top=0 -Width=1012 -Height=85 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=1012 -ClientHeight=85 -TBDockHeight=85 -LRDockWidth=443 -Dockable=1 - -[DockHosts] -DockHostCount=0 - diff --git a/chkcacic/chkcacic.ico b/chkcacic/chkcacic.ico deleted file mode 100755 index 7a5f13b..0000000 Binary files a/chkcacic/chkcacic.ico and /dev/null differ diff --git a/chkcacic/chkcacic.identcache b/chkcacic/chkcacic.identcache deleted file mode 100755 index 98b75a7..0000000 Binary files a/chkcacic/chkcacic.identcache and /dev/null differ diff --git a/chkcacic/chkcacic.res b/chkcacic/chkcacic.res deleted file mode 100755 index 725cd28..0000000 Binary files a/chkcacic/chkcacic.res and /dev/null differ diff --git a/chkcacic/chkcacic_icon.ico b/chkcacic/chkcacic_icon.ico deleted file mode 100755 index 9421fff..0000000 Binary files a/chkcacic/chkcacic_icon.ico and /dev/null differ diff --git a/chkcacic/chkcacic_icon.ico.svg b/chkcacic/chkcacic_icon.ico.svg deleted file mode 100755 index bb0f69c..0000000 --- a/chkcacic/chkcacic_icon.ico.svg +++ /dev/null @@ -1,53 +0,0 @@ - - - - - - - image/svg+xml - - - - - - - - diff --git a/chkcacic/main.dcu b/chkcacic/main.dcu deleted file mode 100755 index 6c3da47..0000000 Binary files a/chkcacic/main.dcu and /dev/null differ diff --git a/chkcacic/main.ddp b/chkcacic/main.ddp deleted file mode 100755 index 4370276..0000000 Binary files a/chkcacic/main.ddp and /dev/null differ diff --git a/chkcacic/main.dfm b/chkcacic/main.dfm deleted file mode 100755 index 9dd99d8..0000000 --- a/chkcacic/main.dfm +++ /dev/null @@ -1,24 +0,0 @@ -object frmChkCACIC: TfrmChkCACIC - Left = 453 - Top = 340 - Width = 132 - Height = 157 - Caption = 'chkcacic' - Color = clBtnFace - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [] - OldCreateOrder = False - OnCreate = FormCreate - PixelsPerInch = 96 - TextHeight = 13 - object IdFTP1: TIdFTP - MaxLineAction = maException - ReadTimeout = 0 - ProxySettings.ProxyType = fpcmNone - ProxySettings.Port = 0 - Left = 32 - end -end diff --git a/chkcacic/main.pas b/chkcacic/main.pas deleted file mode 100755 index b1c558e..0000000 --- a/chkcacic/main.pas +++ /dev/null @@ -1,1479 +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 - ---------------------------------------------------------------------------------------------------------------------------------------------------------------- -====================================================================================================== -ChkCacic.exe : Verificador/Instalador dos agentes primários do CACIC -====================================================================================================== - -v 2.2.0.38 -+ Acrescentado a obtenção de versão interna do S.O. -+ Acrescentado a inserção dos agentes principais nas exceções do FireWall interno do MS-Windows VISTA... -. -Diversas rebuilds... -. -v 2.2.0.17 -+ Acrescentado o tratamento da passagem de opções em linha de comando - * chkcacic /serv= /dir=c:\%windir%\cacic - Exemplo de uso: chkcacic /serv=UXbra001 /dir=Cacic - -v 2.2.0.16 -* Corrigido o fechamento do arquivo de configurações de ChkSis - -v 2.2.0.15 -* Substituída a mensagem "File System diferente de "NTFS" por 'File System: "" - Ok!' - -v 2.2.0.14 -+ Críticas/mensagens: - "ATENÇÃO! Não foi possível estabelecer comunicação com o módulo Gerente WEB em ." e - "ATENÇÃO: Não foi possível efetuar FTP para . Verifique o Servidor de Updates." -+ Opção checkbox "Exibe informações sobre o processo de instalação" ao formulário de configuração; -+ Botão "Sair" ao formulário de configuração; -+ Execução automática do Agente Principal ao fim da instalação quando a unidade origem do ChkCacic não - for mapeamento de rede ou unidade inválida. - -- Retirados os campos "Frase para Sucesso na Instalação" e "Frase para Insucesso na Instalação" - do formulário de configuração, passando essas frases a serem fixas na aplicação. -- Retirada a opção radiobutton "Remove Versão Anterior?"; - -===================================================================================================== -*) - - -unit main; - -interface - -uses - Windows, - strUtils, - SysUtils, - Classes, - Forms, - idFTPCommon, - idHTTP, - Controls, - StdCtrls, - IdBaseComponent, - IdComponent, - IdTCPConnection, - IdTCPClient, - variants, - NTFileSecurity, - IdFTP, - Tlhelp32, - ExtCtrls, - CACIC_Library, - WinSvc, - ShellAPI, - Dialogs; - -var - v_TeWebManagerAddress, - v_TeLocalFolder, - v_TeProcessInformations, - v_InShowProcessInformations, - v_TeSuccessPhrase, - v_TeInsuccessPhrase, - v_strLocalVersion, - v_strRemoteVersion, - v_strCipherClosed, - v_strVersao_REM1, - v_strVersao_LOC1, - v_strCommResponse : String; - -var - boolCommandLine : boolean; - -var - tstringlistRequest_Config : TStringList; - tstringstreamResponse_Config : TStringStream; - -var - g_oCacic: TCACIC; /// Biblioteca CACIC_Library - -procedure chkcacic; -procedure ComunicaInsucesso(strIndicador : String); //2.2.0.32 -Procedure CriaFormConfigura; -Procedure GravaConfiguracoes; -Procedure MostraFormConfigura; - -Function CheckAgentVersion(p_strAgentName : String) : integer; // 2.2.0.16 -Function DelTree(DirName : string): Boolean; // 2.6.0.2 -function FindWindowByTitle(WindowTitle: string): Hwnd; -function FTP(p_Host : String; p_Port : String; p_Username : String; p_Password : String; p_PathServer : String; p_File : String; p_Dest : String) : Boolean; -function GetNetworkUserName : String; // 2.2.0.32 -function ListFileDir(Path: string):string; -function Posso_Rodar_CACIC : boolean; -function ServiceStart(sService : string ) : boolean; -function ServiceRunning(sMachine, sService: PChar): Boolean; -function ServiceStopped(sMachine, sService: PChar): Boolean; - -type - TfrmChkCACIC = class(TForm) - IdFTP1: TIdFTP; - procedure FormCreate(Sender: TObject); - procedure FS_SetSecurity(p_Target : String); - function CommunicateTo(p_strAddress : String; p_tstringlistPostValues : TStringList) : boolean; - end; - -var - frmChkCACIC: TfrmChkCACIC; -implementation - -uses FormConfig; - -{$R *.dfm} - - -function ServiceGetStatus(sMachine, sService: PChar): DWORD; - {*******************************************} - {*** Parameters: ***} - {*** sService: specifies the name of the service to open - {*** sMachine: specifies the name of the target computer - {*** ***} - {*** Return Values: ***} - {*** -1 = Error opening service ***} - {*** 1 = SERVICE_STOPPED ***} - {*** 2 = SERVICE_START_PENDING ***} - {*** 3 = SERVICE_STOP_PENDING ***} - {*** 4 = SERVICE_RUNNING ***} - {*** 5 = SERVICE_CONTINUE_PENDING ***} - {*** 6 = SERVICE_PAUSE_PENDING ***} - {*** 7 = SERVICE_PAUSED ***} - {******************************************} -var - SCManHandle, SvcHandle: SC_Handle; - SS: TServiceStatus; - dwStat: DWORD; -begin - dwStat := 0; - // Open service manager handle. - g_oCacic.writeDebugLog('Executando OpenSCManager.SC_MANAGER_CONNECT'); - SCManHandle := OpenSCManager(sMachine, nil, SC_MANAGER_CONNECT); - if (SCManHandle > 0) then - begin - g_oCacic.writeDebugLog('Executando OpenService.SERVICE_QUERY_STATUS'); - SvcHandle := OpenService(SCManHandle, sService, SERVICE_QUERY_STATUS); - // if Service installed - if (SvcHandle > 0) then - begin - g_oCacic.writeDebugLog('O serviço "'+ sService +'" já está instalado.'); - // SS structure holds the service status (TServiceStatus); - if (QueryServiceStatus(SvcHandle, SS)) then - dwStat := ss.dwCurrentState; - CloseServiceHandle(SvcHandle); - end; - CloseServiceHandle(SCManHandle); - end; - Result := dwStat; -end; - -// start service -// -// return TRUE if successful -// -// sService -// service name, ie: Alerter -// -function ServiceStart(sService : string ) : boolean; -var schm, - schs : SC_Handle; - - ss : TServiceStatus; - psTemp : PChar; - dwChkP : DWord; -begin - ss.dwCurrentState := 0; - - g_oCacic.writeDebugLog('Executando Service Start'); - - // connect to the service control manager - schm := OpenSCManager(Nil,Nil,SC_MANAGER_CONNECT); - - // if successful... - if(schm > 0)then - begin - // open a handle to the specified service - schs := OpenService(schm,PChar(sService),SERVICE_START or SERVICE_QUERY_STATUS); - - // if successful... - if(schs > 0)then - begin - g_oCacic.writeDebugLog('Open Service OK'); - psTemp := Nil; - if(StartService(schs,0,psTemp)) then - begin - g_oCacic.writeDebugLog('Entrando em Start Service'); - // check status - if(QueryServiceStatus(schs,ss))then - begin - while(SERVICE_RUNNING <> ss.dwCurrentState)do - begin - // dwCheckPoint contains a value that the service increments periodically - // to report its progress during a lengthy operation. - dwChkP := ss.dwCheckPoint; - - // wait a bit before checking status again - // dwWaitHint is the estimated amount of time the calling program should wait before calling - // QueryServiceStatus() again idle events should be handled here... - - Sleep(ss.dwWaitHint); - - if(not QueryServiceStatus(schs,ss))then - begin - break; - end; - - if(ss.dwCheckPoint < dwChkP)then - begin - // QueryServiceStatus didn't increment dwCheckPoint as it should have. - // avoid an infinite loop by breaking - break; - end; - end; - end - else - g_oCacic.writeDebugLog('Oops! Problema com StartService!'); - end; - - // close service handle - CloseServiceHandle(schs); - end; - - // close service control manager handle - CloseServiceHandle(schm); - end - else - Configs.memoProgress.Lines.Add('Oops! Problema com o Service Control Manager!'); - // return TRUE if the service status is running - Result := SERVICE_RUNNING = ss.dwCurrentState; -end; - -function GetNetworkUserName : String; - // Gets the name of the user currently logged into the network on - // the local PC -var - temp: PChar; - Ptr: DWord; -const - buff = 255; -begin - ptr := buff; - temp := StrAlloc(buff); - GetUserName(temp, ptr); - Result := string(temp); - StrDispose(temp); -end; - -procedure ComunicaInsucesso(strIndicador : String); -begin - - // Envio notificação de insucesso para o Módulo Gerente Centralizado - tstringlistRequest_Config.Clear; - tstringlistRequest_Config.Values['cs_indicador'] := strIndicador; - tstringlistRequest_Config.Values['id_usuario'] := GetNetworkUserName(); - tstringlistRequest_Config.Values['te_so'] := g_oCacic.getWindowsStrId(); - Try - Try - frmChkCACIC.CommunicateTo(v_TeWebManagerAddress + '/ws/instalacacic.php', tstringlistRequest_Config); - Except - End; - finally - End; -end; - -Procedure CriaFormConfigura; -begin - g_oCacic.writeDebugLog('Chamando Criação do Formulário de Configurações - 1'); - Application.CreateForm(TConfigs, FormConfig.Configs); - FormConfig.Configs.pnVersao.Caption := 'v: ' + g_oCacic.getVersionInfo(ParamStr(0)); -end; - -Procedure MostraFormConfigura; -begin - g_oCacic.writeDebugLog('Exibindo formulário de configurações'); - FormConfig.Configs.ShowModal; -end; - -Function FTP(p_Host : String; p_Port : String; p_Username : String; p_Password : String; p_PathServer : String; p_File : String; p_Dest : String) : Boolean; -var IdFTP : TIdFTP; -begin - Try - g_oCacic.writeDebugLog('FTP: Criando instance'); - - IdFTP := TIdFTP.Create(nil); - - g_oCacic.writeDebugLog('FTP: Host => "'+p_Host+'"'); - IdFTP.Host := p_Host; - - g_oCacic.writeDebugLog('FTP: UserName => "'+p_Username+'"'); - IdFTP.Username := p_Username; - - g_oCacic.writeDebugLog('FTP: PassWord => "**********"'); - IdFTP.Password := p_Password; - - g_oCacic.writeDebugLog('FTP: PathServer => "'+p_PathServer+'"'); - IdFTP.Port := strtoint(p_Port); - - g_oCacic.writeDebugLog('FTP: Setando TransferType para "ftBinary"'); - IdFTP.TransferType := ftBinary; - - g_oCacic.writeDebugLog('FTP: Setando Passive para "true"'); - IdFTP.Passive := true; - - g_oCacic.writeDebugLog('FTP: Change to "'+p_PathServer+'"'); - Try - if IdFTP.Connected = true then - begin - g_oCacic.writeDebugLog('FTP: Connected => Desconectando...'); - IdFTP.Disconnect; - end; - g_oCacic.writeDebugLog('FTP: Efetuando Conexão...'); - IdFTP.Connect(true); - g_oCacic.writeDebugLog('FTP: Change to "'+p_PathServer+'"'); - IdFTP.ChangeDir(p_PathServer); - Try - g_oCacic.writeDebugLog('Iniciando FTP de "'+p_Dest + p_File+'"'); - g_oCacic.writeDebugLog('HashCode de "'+p_File+'" Antes do FTP => '+g_oCacic.GetFileHash(p_Dest + p_File)); - IdFTP.Get(p_File, p_Dest + p_File, True, True); - g_oCacic.writeDebugLog('HashCode de "'+p_Dest + p_File +'" Após o FTP => '+g_oCacic.GetFileHash(p_Dest + p_File)); - Finally - Configs.memoProgress.Lines.Add('FTP Concluído de "'+p_File+'" para "'+p_Dest+'"'); - g_oCacic.writeDebugLog('HashCode de "'+p_Dest + p_File +'" Após o FTP em Finally => '+g_oCacic.GetFileHash(p_Dest + p_File)); - IdFTP.Disconnect; - IdFTP.Free; - result := true; - End; - Except - Begin - Configs.memoProgress.Lines.Add('FTP Mal Sucedido de "'+p_File+'"'); - g_oCacic.writeDebugLog('Oops! Problemas Sem Início de FTP...'); - result := false; - End; - end; - Except - result := false; - End; -end; - -// Função para fixar o HomeDrive como letra para a pasta do CACIC -function FixLocalFolder(strLocalFolder : String) : String; -var tstrLocalFolder1, - tstrLocalFolder2 : TStrings; - intAUX : integer; -Begin - Result := strLocalFolder; - // Crio um array separado por ":" (Para o caso de ter sido informada a letra da unidade) - tstrLocalFolder1 := TStrings.Create; - tstrLocalFolder1 := g_oCacic.explode(strLocalFolder,':'); - - if (tstrLocalFolder1.Count > 1) then - Begin - tstrLocalFolder2 := TStrings.Create; - // Ignoro a letra informada... - // Certifico-me de que as barras são invertidas... (erros acontecem) - // Crio um array quebrado por "\" - Result := StringReplace(tstrLocalFolder1[1],'/','\',[rfReplaceAll]); - tstrLocalFolder2 := g_oCacic.explode(Result,'\'); - - // Inicializo retorno com a unidade raiz do Sistema Operacional - // Concateno ao retorno as partes que formarão o caminho completo do CACIC - Result := g_oCacic.getHomeDrive; - for intAux := 0 to (tstrLocalFolder2.Count-1) do - if (tstrLocalFolder2[intAux] <> '') then - Result := Result + tstrLocalFolder2[intAux] + '\'; - tstrLocalFolder2.Free; - End - else - Result := g_oCacic.getHomeDrive + strLocalFolder + '\'; - - tstrLocalFolder1.Free; - - Result := StringReplace(Result,'\\','\',[rfReplaceAll]); -End; - -procedure GravaConfiguracoes; -var chkcacic_ini : TextFile; -begin - try - g_oCacic.writeDebugLog('g_ocacic => setLocalFolder => '+Configs.Edit_TeLocalFolder.text+'\'); - - FileSetAttr (ExtractFilePath(Application.Exename) + '\chkcacic.ini',0); // Retira os atributos do arquivo para evitar o erro FILE ACCESS DENIED em máquinas 2000 - AssignFile(chkcacic_ini,ExtractFilePath(Application.Exename) + '\chkcacic.ini'); {Associa o arquivo a uma variável do tipo TextFile} - Rewrite(chkcacic_ini); // Recria o arquivo... - Append(chkcacic_ini); - Writeln(chkcacic_ini,'# ==================================================================================='); - Writeln(chkcacic_ini,'# A edição deste arquivo também pode ser feita com o comando "chkcacic.exe /config"'); - Writeln(chkcacic_ini,'# ==================================================================================='); - Writeln(chkcacic_ini,''); - Writeln(chkcacic_ini,''); - Writeln(chkcacic_ini,'# CHAVES E VALORES OBRIGATÓRIOS PARA USO DO CHKCACIC.EXE'); - Writeln(chkcacic_ini,'# ==================================================================================='); - Writeln(chkcacic_ini,'# te_web_manager_address'); - Writeln(chkcacic_ini,'# Endereço IP ou Nome(DNS) do servidor onde o Módulo Gerente do CACIC foi instalado'); - Writeln(chkcacic_ini,'# Ex1.: te_web_manager_address=10.xxx.yyy.zzz'); - Writeln(chkcacic_ini,'# Ex2.: te_web_manager_address=uxesa001'); - Writeln(chkcacic_ini,'# te_local_folder'); - Writeln(chkcacic_ini,'# Pasta a ser criada na estação para instalação do CACIC agente principal'); - Writeln(chkcacic_ini,'# Ex.: te_local_folder=Cacic'); - Writeln(chkcacic_ini,'# in_show_process_informations'); - Writeln(chkcacic_ini,'# Indicador de exibicao de informações sobre o processo de instalação'); - Writeln(chkcacic_ini,'# Ex.: in_show_process=N'); - Writeln(chkcacic_ini,''); - Writeln(chkcacic_ini,''); - Writeln(chkcacic_ini,'# CHAVES E VALORES OPCIONAIS PARA USO DO CHKCACIC.EXE'); - Writeln(chkcacic_ini,'# (ATENÇÃO: NÃO PREENCHER EM CASO DE CHKCACIC.INI PARA O NETLOGON!)'); - Writeln(chkcacic_ini,'# ==================================================================================='); - Writeln(chkcacic_ini,'# te_process_informations'); - Writeln(chkcacic_ini,'# Informações a serem mostradas na janela de Instalação/Recuperação'); - Writeln(chkcacic_ini,'# Ex.: Empresa-UF / Suporte Técnico'); - Writeln(chkcacic_ini,'# Emails: email_do_suporte@xxxxxx.yyy.zz, outro_email@outro_dominio.xxx.yy'); - Writeln(chkcacic_ini,'# Telefones: (xx) yyyy-zzzz / (xx) yyyy-zzzz'); - Writeln(chkcacic_ini,'# Endereço: Rua Nome_da_Rua, Nº 99999'); - Writeln(chkcacic_ini,'# Cidade/UF'); - Writeln(chkcacic_ini,''); - Writeln(chkcacic_ini,''); - Writeln(chkcacic_ini,'# Recomendação Importante:'); - Writeln(chkcacic_ini,'# ======================='); - Writeln(chkcacic_ini,'# Para benefício da rede local, criar uma pasta "Modulos" no mesmo nível do chkcacic.exe, onde deverão'); - Writeln(chkcacic_ini,'# ser colocados todos os arquivos executáveis para uso do CACIC, pois, quando da necessidade de download'); - Writeln(chkcacic_ini,'# de módulo, o arquivo será apenas copiado e não será necessário o FTP:'); - Writeln(chkcacic_ini,'# MainProgramName........=> Agente Principal'); - Writeln(chkcacic_ini,'# cacicservice.exe ......=> Serviço para Sustentação do Agente Principal'); - Writeln(chkcacic_ini,'# ger_cols.exe ..........=> Gerente de Coletas'); - Writeln(chkcacic_ini,'# srcacicsrv.exe ........=> Suporte Remoto Seguro'); - Writeln(chkcacic_ini,'# chksis.exe ............=> Check System Routine (chkcacic residente)'); - Writeln(chkcacic_ini,'# wscript.exe ...........=> Motor de Execução de Scripts VBS'); - Writeln(chkcacic_ini,'# col_anvi.exe ..........=> Agente Coletor de Informações de Anti-Vírus'); - Writeln(chkcacic_ini,'# col_comp.exe ..........=> Agente Coletor de Informações de Compartilhamentos'); - Writeln(chkcacic_ini,'# col_hard.exe ..........=> Agente Coletor de Informações de Hardware'); - Writeln(chkcacic_ini,'# col_moni.exe ..........=> Agente Coletor de Informações de Sistemas Monitorados'); - Writeln(chkcacic_ini,'# col_soft.exe ..........=> Agente Coletor de Informações de Software'); - Writeln(chkcacic_ini,'# col_undi.exe ..........=> Agente Coletor de Informações de Unidades de Disco'); - Writeln(chkcacic_ini,'# ==================================================================================================================='); - Writeln(chkcacic_ini,''); - Writeln(chkcacic_ini,''); - Writeln(chkcacic_ini,'# ==================================================================================================================='); - Writeln(chkcacic_ini,'# Exemplo de estrutura para KIT (CD) de instalação'); - Writeln(chkcacic_ini,'# ==================================================================================================================='); - Writeln(chkcacic_ini,'# d:\chkcacic.exe'); - Writeln(chkcacic_ini,'# d:\chkcacic.ini'); - Writeln(chkcacic_ini,'# \Modulos'); - Writeln(chkcacic_ini,'# MainProgramName'); - Writeln(chkcacic_ini,'# cacicservice.exe'); - Writeln(chkcacic_ini,'# chksis.exe'); - Writeln(chkcacic_ini,'# col_anvi.exe'); - Writeln(chkcacic_ini,'# col_comp.exe'); - Writeln(chkcacic_ini,'# col_hard.exe'); - Writeln(chkcacic_ini,'# col_moni.exe'); - Writeln(chkcacic_ini,'# col_soft.exe'); - Writeln(chkcacic_ini,'# col_undi.exe'); - Writeln(chkcacic_ini,'# ger_cols.exe'); - Writeln(chkcacic_ini,'# srcacicsrv.exe'); - Writeln(chkcacic_ini,'# ini_cols.exe'); - Writeln(chkcacic_ini,'# wscript.exe'); - Writeln(chkcacic_ini,'# ==================================================================================================================='); - Writeln(chkcacic_ini,'# Obs.: Antes da gravação do CD ou imagem, é necessário executar "chkcacic.exe /config"'); - Writeln(chkcacic_ini,'# ==================================================================================================================='); - Writeln(chkcacic_ini,''); - Writeln(chkcacic_ini,'[Configs]'); - - // Atribuição dos valores do form FormConfig às variáveis... - if Configs.checkboxInShowProcessInformations.Checked then - v_InShowProcessInformations := 'S' - else - v_InShowProcessInformations := 'N'; - - v_TeProcessInformations := Configs.Memo_TeExtrasProcessInformations.Text; - - // Escrita dos parâmetros obrigatórios - Writeln(chkcacic_ini,'TeWebManagerAddress=' + g_oCacic.Encrypt(v_TeWebManagerAddress)); - Writeln(chkcacic_ini,'TeLocalFolder=' + g_oCacic.Encrypt(FixLocalFolder(Configs.Edit_TeLocalFolder.text))); - Writeln(chkcacic_ini,'InShowProcessInformations=' + g_oCacic.Encrypt(v_InShowProcessInformations)); - - // Escrita dos valores opcionais quando existirem - if (v_TeProcessInformations <>'') then - Writeln(chkcacic_ini,'TeProcessInformations='+ g_oCacic.Encrypt(StringReplace(v_TeProcessInformations,#13#10,'*13*10',[rfReplaceAll]))); - CloseFile(chkcacic_ini); {Fecha o arquivo texto} - - g_oCacic.setLocalFolder(FixLocalFolder(Configs.Edit_TeLocalFolder.text)); - except - end; -end; - -Function ListFileDir(Path: string):string; -var - SR: TSearchRec; - FileList : string; -begin - if FindFirst(Path, faAnyFile, SR) = 0 then - begin - repeat - if (SR.Attr <> faDirectory) then - begin - if (FileList<>'') then FileList := FileList + '#'; - FileList := FileList + SR.Name; - end; - until FindNext(SR) <> 0; - FindClose(SR); - Result := FileList; - end; -end; - - -Function CheckAgentVersion(p_strAgentName : String) : integer; // 2.2.0.16 -var v_array_AgentName : TStrings; - intAux : integer; -Begin - v_array_AgentName := g_oCacic.explode(p_strAgentName,'\'); - - v_strRemoteVersion := g_oCacic.xmlGetValue(StringReplace(StrUpper(PChar(v_array_AgentName[v_array_AgentName.count-1])),'.EXE','',[rfReplaceAll]), v_strCommResponse); - v_strLocalVersion := g_oCacic.GetVersionInfo(p_strAgentName); - - g_oCacic.writeDebugLog('Checando versão de "'+p_strAgentName+'"'); - - intAux := v_array_AgentName.Count; - - // V: 2.2.0.16 - // Verifico existência do arquivo "versoes_agentes.ini" para comparação das versões dos agentes principais - if (v_strRemoteVersion = '') AND FileExists(ExtractFilePath(Application.Exename)+'versoes_agentes.ini') then - Begin - if (g_oCacic.getValueFromFile('versoes_agentes',v_array_AgentName[intAux-1],ExtractFilePath(Application.Exename)+'versoes_agentes.ini')<>'') then - Begin - g_oCacic.writeDebugLog('Encontrado arquivo "'+(ExtractFilePath(Application.Exename)+'versoes_agentes.ini')+'"'); - v_strRemoteVersion := g_oCacic.getValueFromFile('versoes_agentes',v_array_AgentName[intAux-1],ExtractFilePath(Application.Exename)+'versoes_agentes.ini'); - End; - End; - - g_oCacic.writeDebugLog('Versão Remota: "'+v_strRemoteVersion+'" - Versão Local: "'+v_strLocalVersion+'"'); - - if (v_strRemoteVersion + v_strLocalVersion <> '') and - (v_strLocalVersion <> '0000') then - Begin - if (v_strRemoteVersion = v_strLocalVersion) then - Result := 1 - else - Result := 2; - End - else - Result := 0; -End; - -{ -http://delphi.about.com/cs/adptips1999/a/bltip1199_2.htm -Use Sample: -if DelTree('c:\TempDir') then - ShowMessage('Directory deleted!') -else - ShowMessage('Errors occured!') ; -} - -Function DelTree(DirName : string): Boolean; -var - SHFileOpStruct : TSHFileOpStruct; - DirBuf : array [0..255] of char; -begin - try - Fillchar(SHFileOpStruct,Sizeof(SHFileOpStruct),0) ; - FillChar(DirBuf, Sizeof(DirBuf), 0 ) ; - StrPCopy(DirBuf, DirName) ; - with SHFileOpStruct do begin - Wnd := 0; - pFrom := @DirBuf; - wFunc := FO_DELETE; - fFlags := FOF_ALLOWUNDO; - fFlags := fFlags or FOF_NOCONFIRMATION; - fFlags := fFlags or FOF_SILENT; - end; - Result := (SHFileOperation(SHFileOpStruct) = 0) ; - except - Result := False; - end; -end; - -function Posso_Rodar_CACIC : boolean; -Begin - result := false; - - // Se eu conseguir matar o arquivo abaixo é porque não há outra sessão deste agente aberta... (POG? Nããão! :) ) - g_oCacic.killFiles(g_oCacic.getLocalFolder,'aguarde_CACIC.txt'); - - // Se o aguarde_CACIC.txt existir é porque refere-se a uma versão mais atual: 2.2.0.20 ou maior - if not (FileExists(g_oCacic.getLocalFolder + 'aguarde_CACIC.txt')) then - result := true; -End; - -procedure verifyAndGet(p_strModuleName, - p_strFileHash, - p_strDestinationFolderName : String); -var v_strFileHash, - v_strDestinationFolderName : String; -Begin - v_strDestinationFolderName := p_strDestinationFolderName + '\'; - v_strDestinationFolderName := StringReplace(v_strDestinationFolderName,'\\','\',[rfReplaceAll]); - - g_oCacic.writeDebugLog('Verificando módulo: '+v_strDestinationFolderName +p_strModuleName); - // Verifico validade do Módulo e mato-o em caso negativo. - v_strFileHash := g_oCacic.GetFileHash(v_strDestinationFolderName + p_strModuleName); - - g_oCacic.writeDebugLog('verifyAndGet - HashCode Remot: "'+p_strFileHash+'"'); - g_oCacic.writeDebugLog('verifyAndGet - HashCode Local: "'+v_strFileHash+'"'); - - If (v_strFileHash <> p_strFileHash) then - g_oCacic.killFiles(v_strDestinationFolderName, p_strModuleName); - - If not FileExists(v_strDestinationFolderName + p_strModuleName) Then - Begin - if (FileExists(ExtractFilePath(Application.Exename) + '\Modulos\'+p_strModuleName)) then - Begin - g_oCacic.writeDebugLog('Copiando '+p_strModuleName+' de '+ExtractFilePath(Application.Exename)+'Modulos\'); - CopyFile(PChar(ExtractFilePath(Application.Exename) + 'Modulos\'+p_strModuleName), PChar(v_strDestinationFolderName + p_strModuleName),false); - FileSetAttr (PChar(v_strDestinationFolderName + p_strModuleName),0); // Retira os atributos do arquivo para evitar o erro FILE ACCESS DENIED - End - else - begin - - Try - if not FTP(g_oCacic.xmlGetValue('te_serv_updates' , v_strCommResponse), - g_oCacic.xmlGetValue('nu_porta_serv_updates' , v_strCommResponse), - g_oCacic.xmlGetValue('nm_usuario_login_serv_updates', v_strCommResponse), - g_oCacic.xmlGetValue('te_senha_login_serv_updates' , v_strCommResponse), - g_oCacic.xmlGetValue('te_path_serv_updates' , v_strCommResponse), - p_strModuleName, - v_strDestinationFolderName) then - Configs.memoProgress.Lines.add('ATENÇÃO! Não foi possível efetuar FTP para "'+v_strDestinationFolderName + p_strModuleName+'". Verifique o Servidor de Updates.'); - Except - g_oCacic.writeDebugLog('FTP de "'+ v_strDestinationFolderName + p_strModuleName+'" Interrompido.'); - End; - - if not FileExists(v_strDestinationFolderName + p_strModuleName) Then - Begin - g_oCacic.writeDebugLog('Problemas Efetuando Download de '+ v_strDestinationFolderName + p_strModuleName+' (FTP)'); - g_oCacic.writeDebugLog('Conexão:'); - g_oCacic.writeDebugLog(g_oCacic.xmlGetValue('te_serv_updates' , v_strCommResponse)+', '+ - g_oCacic.xmlGetValue('nu_porta_serv_updates' , v_strCommResponse)+', '+ - g_oCacic.xmlGetValue('nm_usuario_login_serv_updates', v_strCommResponse)+', '+ - g_oCacic.xmlGetValue('te_senha_login_serv_updates' , v_strCommResponse)+', '+ - g_oCacic.xmlGetValue('te_path_serv_updates' , v_strCommResponse)); - End - else - g_oCacic.writeDailyLog('Download Concluído de "'+p_strModuleName+'" (FTP)'); - end; - End; - End; - -function TfrmChkCACIC.CommunicateTo(p_StrAddress : String; p_tstringlistPostValues : TStringList) : boolean; -var IdHTTP1: TIdHTTP; - v_StrAddress : String; -Begin - v_StrAddress := 'http://' + StringReplace(StringReplace(LowerCase(p_StrAddress),'//','/',[rfReplaceAll]),'http://','',[rfReplaceAll]); - - Result := false; - Try - g_oCacic.writeDailyLog('Iniciando comunicação com Servidor Gerente WEB do CACIC'); - g_oCacic.writeDebugLog('Endereço Alvo: "'+v_StrAddress+'"'); - - IdHTTP1 := TIdHTTP.Create(nil); - idHTTP1.AllowCookies := true; - idHTTP1.ASCIIFilter := false; - idHTTP1.AuthRetries := 1; - idHTTP1.BoundPort := 0; - idHTTP1.HandleRedirects := false; - idHTTP1.ProxyParams.BasicAuthentication := false; - idHTTP1.ProxyParams.ProxyPort := 0; - idHTTP1.ReadTimeout := 0; - idHTTP1.RecvBufferSize := 32768; - idHTTP1.RedirectMaximum := 15; - idHTTP1.Request.Accept := 'text/html, */*'; - idHTTP1.Request.BasicAuthentication := true; - idHTTP1.Request.ContentLength := -1; - idHTTP1.Request.ContentRangeStart := 0; - idHTTP1.Request.ContentRangeEnd := 0; - idHTTP1.Request.ContentType := 'text/html'; - idHTTP1.SendBufferSize := 32768; - idHTTP1.Tag := 0; - - g_oCacic.writeDebugLog('Efetuando POST...'); - IdHTTP1.Post(v_StrAddress, tstringlistRequest_Config, tstringstreamResponse_Config); - g_oCacic.writeDebugLog('Retorno: "'+tstringstreamResponse_Config.DataString+'"'); - idHTTP1.Disconnect; - idHTTP1.Free; - - v_strCommResponse := tstringstreamResponse_Config.DataString; - Result := (Trim(UpperCase(g_oCacic.xmlGetValue('STATUS', v_strCommResponse))) = 'OK'); - if not boolCommandLine then - Configs.memoProgress.Lines.Add('Comunicação bem sucedida com "'+v_StrAddress+'".'); - Except - Begin - if not boolCommandLine then - Configs.memoProgress.Lines.Add('Não foi possível estabelecer comunicação com "'+v_StrAddress+'".'); - - g_oCacic.writeDailyLog('**********************************************************'); - g_oCacic.writeDailyLog('Oops! Não Foi Possível Comunicar com o Módulo Gerente WEB!'); - g_oCacic.writeDailyLog('**********************************************************'); - End - End; - - g_oCacic.writeDebugLog('Retorno de comunicação com servidor: '+v_strCommResponse); -End; - -procedure chkcacic; -var boolConfigura, - boolExistsAutoRun, - boolIniFileExists : boolean; - - v_te_texto_janela_instalacao, - v_modulos, - strAux, - strDateTimeMainProgram_BEGIN, - strDateTimeGERCOLS_BEGIN, - strDateTimeMainProgram_END, - strDateTimeGERCOLS_END : String; - - v_array_modulos : TStrings; - intAux : integer; - - wordServiceStatus : DWORD; -begin - strDateTimeMainProgram_BEGIN := ''; - strDateTimeMainProgram_END := ''; - strDateTimeGERCOLS_BEGIN := ''; - strDateTimeGERCOLS_END := ''; - v_TeSuccessPhrase := 'INSTALAÇÃO/ATUALIZAÇÃO EFETUADA COM SUCESSO!'; - v_TeInsuccessPhrase := '***** INSTALAÇÃO/ATUALIZAÇÃO NÃO EFETUADA COM SUCESSO *****'; - boolCommandLine := false; - boolIniFileExists := FileExists(ExtractFilePath(Application.Exename) + '\chkcacic.ini'); - - g_oCacic := TCACIC.Create(); - g_oCacic.setBoolCipher(true); - Try - - // 2.2.0.17 - Tratamento de opções passadas em linha de comando - // Grande dica do grande Cláudio Filho (OpenOffice.org) - if (ParamCount > 0) then - Begin - For intAux := 1 to ParamCount do - Begin - if LowerCase(Copy(ParamStr(intAux),1,6)) = '/serv=' then - begin - strAux := Trim(Copy(ParamStr(intAux),7,Length((ParamStr(intAux))))); - v_TeWebManagerAddress := Trim(Copy(strAux,0,Pos(' ', strAux) - 1)); - If v_TeWebManagerAddress = '' Then - v_TeWebManagerAddress := strAux; - //g_oCacic.writeDailyLog('Parâmetro "/serv" => "'+v_TeWebManagerAddress+'"'); - end; - - if LowerCase(Copy(ParamStr(intAux),1,5)) = '/dir=' then - begin - strAux := Trim(Copy(ParamStr(intAux),6,Length((ParamStr(intAux))))); - v_TeLocalFolder := Trim(Copy(strAux,0,Pos(' ', strAux) - 1)); - If v_TeLocalFolder = '' Then - v_TeLocalFolder := strAux; - //g_oCacic.writeDailyLog('Parâmetro "/dir" => "'+v_TeLocalFolder+'"'); - end; - end; - if not(v_TeWebManagerAddress='') and - not(v_TeLocalFolder='') then - boolCommandLine := true; - End - else - Begin - v_TeWebManagerAddress := 'pwebcgi01/cacic3'; - v_TeLocalFolder := 'Cacic'; - boolCommandLine := true; - End; - - g_oCacic.setWebManagerAddress(v_TeWebManagerAddress); - - // ATENÇÃO: Trecho para uso exclusivo no âmbito da DATAPREV a nível Brasil, para internalização maciça. - // Para envio à Comunidade, retirar as chaves mais abaixo, para que o código padrão seja descomentado. - // Anderson Peterle - NOV2010 - //v_TeWebManagerAddress := 'UXRJO115'; - //v_cacic_dir := 'Cacic'; - //v_exibe_informacoes := 'N'; // Manter o "N", pois, esse mesmo ChkCacic será colocado em NetLogons! - - // Se a chamada ao chkCACIC não passou parâmetros de IP do Servidor nem Pasta Padrão... - // Obs.: Normalmente a chamada com passagem de parâmetros é feita por script em servidor de domínio, para automatização do processo - if not boolCommandLine then - Begin - If not boolIniFileExists then - Begin - CriaFormConfigura; - MostraFormConfigura; - End; - - if (FileExists(g_oCacic.getWinDir + 'chksis.ini') and (g_oCacic.getValueFromFile('Configs', 'TeMainProgramHash' , g_oCacic.getWinDir + 'chksis.ini') = '')) or - not FileExists(g_oCacic.getWinDir + 'chksis.ini') then - Begin - // Versão anterior à 2.6 -> Elimino a pasta do sistema e arquivos de configuracoes externos - Deltree(g_oCacic.getLocalFolder); - - g_oCacic.killFiles(g_oCacic.getWinDir,'chksis.exe'); - g_oCacic.killFiles(g_oCacic.getWinDir,'chksis.ini'); - g_oCacic.killFiles(g_oCacic.getWinDir,'chksis.dat'); - g_oCacic.killFiles(g_oCacic.getWinDir,'chksis.log'); - End; - - if FileExists(g_oCacic.getLocalFolder + g_oCacic.getMainProgramName) then - ShowMessage('ATENÇÃO: Será necessário finalizar o Agente Principal ('+g_oCacic.getMainProgramName+') (Use CTRL ALT DEL)'); - - v_TeWebManagerAddress := g_oCacic.getValueFromFile('Configs', 'TeWebManagerAddress' , ExtractFilePath(Application.Exename) + '\chkcacic.ini'); - v_TeLocalFolder := g_oCacic.getValueFromFile('Configs', 'TeLocalFolder' , ExtractFilePath(Application.Exename) + '\chkcacic.ini'); - v_InShowProcessInformations := g_oCacic.getValueFromFile('Configs', 'InShowProcessInformations' , ExtractFilePath(Application.Exename) + '\chkcacic.ini'); - v_TeProcessInformations := StringReplace(g_oCacic.getValueFromFile('Configs', 'TeProcessInformations' , ExtractFilePath(Application.Exename) + '\chkcacic.ini'),'*13*10',#13#10,[rfReplaceAll]); - End; - - // Tratamento do diretório informado para o CACIC, para que seja na unidade HomeDrive - v_TeLocalFolder := FixLocalFolder(v_TeLocalFolder); - - g_oCacic.setLocalFolder(v_TeLocalFolder); - g_oCacic.checkDebugMode; - - g_oCacic.writeDebugLog('Verificando pasta "'+g_oCacic.getLocalFolder+'"'); - // Verifico a existência do diretório configurado para o Cacic, normalmente CACIC - if not DirectoryExists(g_oCacic.getLocalFolder) then - begin - g_oCacic.writeDailyLog('Criando pasta '+g_oCacic.getLocalFolder); - ForceDirectories(g_oCacic.getLocalFolder); - end; - - g_oCacic.writeDebugLog('Verificando pasta "'+g_oCacic.getLocalFolder+'Modulos'+'"'); - // Para eliminar versão 20014 e anteriores que provavelmente não fazem corretamente o AutoUpdate - if not DirectoryExists(g_oCacic.getLocalFolder+'Modulos') then - begin - g_oCacic.killFiles(g_oCacic.getLocalFolder, g_oCacic.getMainProgramName); - ForceDirectories(g_oCacic.getLocalFolder + 'Modulos'); - g_oCacic.writeDailyLog('Criando pasta '+g_oCacic.getLocalFolder+'Modulos'); - end; - - g_oCacic.writeDebugLog('Verificando pasta "'+g_oCacic.getLocalFolder+'Temp'+'"'); - // Crio o SubDiretório TEMP, caso não exista - if not DirectoryExists(g_oCacic.getLocalFolder+'Temp') then - begin - ForceDirectories(g_oCacic.getLocalFolder + 'Temp'); - g_oCacic.writeDailyLog('Criando pasta '+g_oCacic.getLocalFolder+'Temp'); - end; - - - - g_oCacic.writeDebugLog('Tipo de Drive: '+intToStr(GetDriveType(nil))); - - if not (GetDriveType(nil) = DRIVE_REMOTE) and not boolCommandLine then - Begin - g_oCacic.writeDebugLog('Acionando Formulário de Configuração'); - - CriaFormConfigura; - - Configs.Visible := true; - - Configs.gbMandatory.BringToFront; - Configs.gbMandatory.BringToFront; - - Configs.Label_TeWebManagerAddress.BringToFront; - Configs.Edit_TeWebManagerAddress.Text := v_TeWebManagerAddress; - Configs.Edit_TeWebManagerAddress.ReadOnly := true; - Configs.Edit_TeWebManagerAddress.BringToFront; - - Configs.Label_TeLocalFolder.BringToFront; - Configs.Edit_TeLocalFolder.Text := v_TeLocalFolder; - Configs.Edit_TeLocalFolder.ReadOnly := true; - configs.Edit_TeLocalFolder.BringToFront; - - Configs.Label_TeProcessInformations.Visible := false; - - Configs.checkboxInShowProcessInformations.Checked := true; - Configs.checkboxInShowProcessInformations.Visible := false; - - Configs.Height := 350; - Configs.lbMensagemNaoAplicavel.Visible := false; - - Configs.Memo_TeExtrasProcessInformations.Clear; - Configs.Memo_TeExtrasProcessInformations.Top := 15; - Configs.Memo_TeExtrasProcessInformations.Height := 196; - - Configs.gbMandatory.Caption := 'Configuração'; - Configs.gbMandatory.Visible := true; - - Configs.gbOptional.Caption := 'Andamento da Instalação/Atualização'; - Configs.gbOptional.Visible := true; - - Configs.Refresh; - Configs.Show; - End; - - // Verifica se o S.O. é NT Like e se o Usuário está com privilégio administrativo... - if (g_oCacic.isWindowsNTPlataform()) and (g_oCacic.isWindowsAdmin()) then - Begin - g_oCacic.writeDebugLog(':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::'); - g_oCacic.writeDebugLog(':::::::::::::: OBTENDO VALORES DO "chkcacic.ini" ::::::::::::::'); - g_oCacic.writeDebugLog(':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::'); - g_oCacic.writeDebugLog('Drive de Instalação......................: '+g_oCacic.getHomeDrive); - g_oCacic.writeDebugLog('Pasta para Instalação Local..............: '+g_oCacic.getLocalFolder); - g_oCacic.writeDebugLog('Endereço de Acesso ao Gerente WEB........: '+v_TeWebManagerAddress); - g_oCacic.writeDebugLog(':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::'); - boolConfigura := false; - - //chave AES. Recomenda-se que cada empresa/órgão altere a sua chave. - //v_tstrCipherOpened := g_oCacic.cipherOpen(g_oCacic.getLocalFolder + g_oCacic.getDatFileName); - - g_oCacic.writeDebugLog(':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::'); - g_oCacic.writeDebugLog(':::::::::::::::::::: LIBERAÇÃO DE FIREWALL ::::::::::::::::::::'); - g_oCacic.writeDebugLog(':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::'); - - if (g_oCacic.isWindowsGEXP()) then // Se >= Maior ou Igual ao WinXP... - Begin - g_oCacic.writeDebugLog(':: S.O. Maior/Igual a WinXP'); - Try - // Libero as policies do FireWall Interno - if (g_oCacic.isWindowsGEVista()) then // Maior ou Igual ao VISTA... - Begin - g_oCacic.writeDebugLog(':: S.O. Maior/Igual a WinVISTA'); - Try - Begin - // Liberando as conexões de Saída para o FTP - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\FTP-Out-TCP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=6|Profile=Private|App='+g_oCacic.getHomeDrive+'system32\\ftp.exe|Name=FTP|Desc=Programa de transferência de arquivos|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\FTP-Out-UDP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=17|Profile=Private|App='+g_oCacic.getHomeDrive+'system32\\ftp.exe|Name=FTP|Desc=Programa de transferência de arquivos|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\FTP-Out-TCP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=6|Profile=Private|App='+g_oCacic.getHomeDrive+'system32\\ftp.exe|Name=FTP|Desc=Programa de transferência de arquivos|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\FTP-Out-UDP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=17|Profile=Private|App='+g_oCacic.getHomeDrive+'system32\\ftp.exe|Name=FTP|Desc=Programa de transferência de arquivos|Edge=FALSE|'); - - // Liberando as conexões de Saída para o Ger_Cols - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-GERCOLS-Out-TCP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=6|Profile=Private|App='+g_oCacic.getLocalFolder+'Modulos\\ger_cols.exe|Name=GerCOLS|Desc=Módulo Gerente de Coletas do Sistema CACIC|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-GERCOLS-Out-UDP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=17|Profile=Private|App='+g_oCacic.getLocalFolder+'Modulos\\ger_cols.exe|Name=GerCOLS|Desc=Módulo Gerente de Coletas do Sistema CACIC|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-GERCOLS-Out-TCP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=6|Profile=Private|App='+g_oCacic.getLocalFolder+'Modulos\\ger_cols.exe|Name=GerCOLS|Desc=Módulo Gerente de Coletas do Sistema CACIC|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-GERCOLS-Out-UDP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=17|Profile=Private|App='+g_oCacic.getLocalFolder+'Modulos\\ger_cols.exe|Name=GerCOLS|Desc=Módulo Gerente de Coletas do Sistema CACIC|Edge=FALSE|'); - - // Liberando as conexões de Saída para o SrCACICsrv - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-SRCACICSRV-Out-TCP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=6|Profile=Private|App='+g_oCacic.getLocalFolder+'Modulos\\srcacicsrv.exe|Name=srCACICsrv|Desc=Módulo Suporte Remoto Seguro do Sistema CACIC|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-SRCACICSRV-Out-UDP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=17|Profile=Private|App='+g_oCacic.getLocalFolder+'Modulos\\srcacicsrv.exe|Name=srCACICsrv|Desc=Módulo Suporte Remoto Seguro do Sistema CACIC|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-SRCACICSRV-Out-TCP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=6|Profile=Private|App='+g_oCacic.getLocalFolder+'Modulos\\srcacicsrv.exe|Name=srCACICsrv|Desc=Módulo Suporte Remoto Seguro do Sistema CACIC|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-SRCACICSRV-Out-UDP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=17|Profile=Private|App='+g_oCacic.getLocalFolder+'Modulos\\srcacicsrv.exe|Name=srCACICsrv|Desc=Módulo Suporte Remoto Seguro do Sistema CACIC|Edge=FALSE|'); - - // Liberando as conexões de Saída para o ChkCacic - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-CHKCACIC-Out-TCP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=6|Profile=Private|App='+ExtractFilePath(Application.Exename) + '\chkcacic.exe|Name=chkCACIC|Desc=Módulo Verificador de Integridade e Instalador do Sistema CACIC|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-CHKCACIC-Out-UDP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=17|Profile=Private|App='+ExtractFilePath(Application.Exename) + '\chkcacic.exe|Name=chkCACIC|Desc=Módulo Verificador de Integridade e Instalador do Sistema CACIC|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-CHKCACIC-Out-TCP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=6|Profile=Private|App='+ExtractFilePath(Application.Exename) + '\chkcacic.exe|Name=chkCACIC|Desc=Módulo Verificador de Integridade e Instalador do Sistema CACIC|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-CHKCACIC-Out-UDP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=17|Profile=Private|App='+ExtractFilePath(Application.Exename) + '\chkcacic.exe|Name=chkCACIC|Desc=Módulo Verificador de Integridade e Instalador do Sistema CACIC|Edge=FALSE|'); - - - // Liberando as conexões de Saída para o ChkSis - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-CHKSIS-Out-TCP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=6|Profile=Private|App='+g_oCacic.getWinDir + 'chksis.exe|Name=chkSIS|Desc=Módulo Verificador de Integridade do Sistema CACIC|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-CHKSIS-Out-UDP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=17|Profile=Private|App='+g_oCacic.getWinDir + 'chksis.exe|Name=chkSIS|Desc=Módulo Verificador de Integridade do Sistema CACIC|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-CHKSIS-Out-TCP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=6|Profile=Private|App='+g_oCacic.getWinDir + 'chksis.exe|Name=chkSIS|Desc=Módulo Verificador de Integridade do Sistema CACIC|Edge=FALSE|'); - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules\CACIC-CHKSIS-Out-UDP','v2.0|Action=Allow|Active=TRUE|Dir=Out|Protocol=17|Profile=Private|App='+g_oCacic.getWinDir + 'chksis.exe|Name=chkSIS|Desc=Módulo Verificador de Integridade do Sistema CACIC|Edge=FALSE|'); - End - Except - g_oCacic.writeDebugLog('Problema Liberando Policies de FireWall!'); - End; - End - else - Begin - g_oCacic.writeDebugLog(':: S.O. Menor que WinVISTA'); - // Acrescento o ChkCacic e srCACICsrv às exceções do FireWall nativo... - {chkcacic} - g_oCacic.writeDebugLog('Inserindo "'+ExtractFilePath(Application.Exename) + 'chkcacic" nas exceções do FireWall!'); - g_oCacic.addApplicationToFirewall('chkCACIC - Instalador do Sistema CACIC',ExtractFilePath(Application.Exename) + Application.Exename,true); - g_oCacic.addApplicationToFirewall('srCACICsrv - Módulo de Suporte Remoto Seguro do Sistema CACIC',g_oCacic.getLocalFolder + 'Modulos\srcacicsrv.exe',true); - End; - Except - End; - End; - - g_oCacic.writeDebugLog(':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::'); - - if (ParamCount > 0) and (LowerCase(Copy(ParamStr(1),1,7)) = '/config') then - boolConfigura := true; - - while (v_TeWebManagerAddress = '') or (v_TeLocalFolder = '') or boolConfigura do - Begin - boolConfigura := false; - CriaFormConfigura; - - Configs.Edit_TeWebManagerAddress.text := v_TeWebManagerAddress; - Configs.Edit_TeLocalFolder.text := v_TeLocalFolder; - if v_InShowProcessInformations = 'S' then - Configs.checkboxInShowProcessInformations.Checked := true - else - Configs.checkboxInShowProcessInformations.Checked := false; - - Configs.Memo_TeExtrasProcessInformations.text := v_TeProcessInformations; - MostraFormConfigura; - End; - - if (ParamCount > 0) and (LowerCase(Copy(ParamStr(1),1,7)) = '/config') then - Begin - try - g_oCacic.Free(); - except - end; - Application.Terminate; - End; - - Try - // Tento o contato com o módulo gerente WEB para obtenção de - // dados para conexão FTP e relativos às versões atuais dos principais agentes - // Busco as configurações para acesso ao ambiente FTP - Updates - tstringlistRequest_Config.Values['in_chkcacic'] := 'chkcacic'; - - g_oCacic.writeDebugLog('Preparando Chamada ao Gerente WEB: "'+v_TeWebManagerAddress + '/ws/get_config.php"'); - if frmChkCACIC.CommunicateTo(v_TeWebManagerAddress + '/ws/get_config.php', tstringlistRequest_Config) then - Begin - g_oCacic.setMainProgramName(LowerCase(g_oCacic.xmlGetValue('te_MainProgramName',v_strCommResponse))); - g_oCacic.setMainProgramHash(g_oCacic.xmlGetValue('te_MainProgramHash',v_strCommResponse)); - - g_oCacic.writeDebugLog(':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::'); - g_oCacic.writeDebugLog(':::::::::::::::: VALORES OBTIDOS NO Gerente WEB :::::::::::::::'); - g_oCacic.writeDebugLog(':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::'); - g_oCacic.writeDebugLog('Servidor de updates......................: ' + g_oCacic.xmlGetValue('te_serv_updates' , v_strCommResponse)); - g_oCacic.writeDebugLog('Porta do servidor de updates.............: ' + g_oCacic.xmlGetValue('nu_porta_serv_updates' , v_strCommResponse)); - g_oCacic.writeDebugLog('Usuário para login no servidor de updates: ' + g_oCacic.xmlGetValue('nm_usuario_login_serv_updates', v_strCommResponse)); - g_oCacic.writeDebugLog('Pasta no servidor de updates.............: ' + g_oCacic.xmlGetValue('te_path_serv_updates' , v_strCommResponse)); - g_oCacic.writeDebugLog('Nome do Agente Principal.................: ' + g_oCacic.getMainProgramName); - g_oCacic.writeDebugLog('Código Hash do Agente Principal..........: ' + g_oCacic.getMainProgramHash); - g_oCacic.writeDebugLog(' '); - g_oCacic.writeDebugLog('Versões dos Agentes Primários:'); - g_oCacic.writeDebugLog('------------------------------'); - g_oCacic.writeDebugLog('Agente Principal.....................: (' +UpperCase( StringReplace(LowerCase(g_oCacic.getMainProgramName) ,'.exe','',[rfReplaceAll])) +') '+g_oCacic.xmlGetValue( StringReplace(UpperCase(g_oCacic.getMainProgramName),'.EXE','',[rfReplaceAll]) , v_strCommResponse)); - g_oCacic.writeDebugLog('Gerente de Coletas...................: (GER_COLS) '+g_oCacic.xmlGetValue('GER_COLS', v_strCommResponse)); - g_oCacic.writeDebugLog('Verificador de Integridade do Sistema: (CHKSIS) '+g_oCacic.xmlGetValue('CHKSIS', v_strCommResponse)); - g_oCacic.writeDebugLog(':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::'); - End; - Except - End; - - // Se NTFS em NT/2K/XP... - // If NTFS on NT Like... - if (g_oCacic.isWindowsNTPlataform()) then - Begin - g_oCacic.writeDebugLog(':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::'); - g_oCacic.writeDebugLog('::::::: VERIFICANDO FILE SYSTEM E ATRIBUINDO PERMISSÕES :::::::'); - g_oCacic.writeDebugLog(':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::'); - - // Atribuição de acesso ao módulo principal e pastas - - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder); - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + g_oCacic.getMainProgramName); - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + StringReplace(LowerCase(g_oCacic.getMainProgramName),'.exe','.inf',[rfReplaceAll])); - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + 'Logs\' + StringReplace(LowerCase(g_oCacic.getMainProgramName),'.exe','.log',[rfReplaceAll])); - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + 'Modulos'); - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + 'Temp'); - - // Atribuição de acesso aos módulos de gerenciamento de coletas e coletas para permissão de atualizações de versões - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + 'Modulos\ger_cols.exe'); - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + 'Modulos\srcacicsrv.exe'); - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + 'Modulos\col_anvi.exe'); - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + 'Modulos\col_comp.exe'); - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + 'Modulos\col_hard.exe'); - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + 'Modulos\col_moni.exe'); - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + 'Modulos\col_soft.exe'); - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + 'Modulos\col_undi.exe'); - frmChkCACIC.FS_SetSecurity(g_oCacic.getLocalFolder + 'Modulos\wscript.exe'); - - // Atribuição de acesso para atualização do módulo verificador de integridade do sistema e seus arquivos - frmChkCACIC.FS_SetSecurity(g_oCacic.getWinDir + 'chksis.exe'); - frmChkCACIC.FS_SetSecurity(g_oCacic.getWinDir + 'chksis.log'); - frmChkCACIC.FS_SetSecurity(g_oCacic.getWinDir + 'chksis.ini'); - - // Atribuição de acesso para atualização/exclusão de log do instalador - frmChkCACIC.FS_SetSecurity(g_oCacic.getHomeDrive + 'chkcacic.log'); - g_oCacic.writeDebugLog(':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::'); - End; - - // Verificação de versão do agente principal e exclusão em caso de versão antiga/diferente da atual - If (FileExists(g_oCacic.getLocalFolder + g_oCacic.getMainProgramName)) Then - Begin - v_strLocalVersion := trim(g_oCacic.GetVersionInfo(g_oCacic.getLocalFolder + g_oCacic.getMainProgramName)); - v_strRemoteVersion := StringReplace(g_oCacic.xmlGetValue( StringReplace(UpperCase(g_oCacic.getMainProgramName),'.EXE','',[rfReplaceAll]) , v_strCommResponse),'0103','',[rfReplaceAll]); - - // Pego as informações de dia/mês/ano/horas/minutos/segundos/milésimos que identificam o agente Principal - strAux := g_oCacic.getLocalFolder + g_oCacic.getMainProgramName; - strDateTimeMainProgram_BEGIN := FormatDateTime('ddmmyyyyhhnnsszzz', g_oCacic.getFolderDate(strAux)); - - g_oCacic.writeDebugLog(':::Verificação de Agente Principal :::'); - g_oCacic.writeDebugLog('v_strLocalVersion : "' + v_strLocalVersion + '"'); - g_oCacic.writeDebugLog('v_strRemoteVersion : "' + v_strRemoteVersion + '"'); - - if (v_strLocalVersion ='0000') or // Provavelmente versão muito antiga ou corrompida - (v_strLocalVersion ='2208') or - (v_strLocalVersion <> v_strRemoteVersion) then - g_oCacic.killFiles(g_oCacic.getLocalFolder, g_oCacic.getMainProgramName); - End; - - // Verificação de versão do ger_cols.exe e exclusão em caso de versão antiga/diferente da atual - If (FileExists(g_oCacic.getLocalFolder + 'Modulos\ger_cols.exe')) Then - Begin - strAux := g_oCacic.getLocalFolder + 'Modulos\ger_cols.exe'; - // Pego as informações de dia/mês/ano/horas/minutos/segundos/milésimos que identificam o agente Ger_Cols - strDateTimeGERCOLS_BEGIN := FormatDateTime('ddmmyyyyhhnnsszzz', g_oCacic.getFolderDate(strAux)); - - intAux := CheckAgentVersion(g_oCacic.getLocalFolder + 'Modulos\ger_cols.exe'); - // 0 => Arquivo de versões ou informação inexistente - // 1 => Versões iguais - // 2 => Versões diferentes - if (intAux = 0) then - Begin - v_strLocalVersion := StringReplace(trim(g_oCacic.GetVersionInfo(g_oCacic.getLocalFolder + 'Modulos\ger_cols.exe')),'.','',[rfReplaceAll]); - v_strRemoteVersion := StringReplace(g_oCacic.xmlGetValue('GER_COLS' , v_strCommResponse),'0103','',[rfReplaceAll]); - End; - - if (intAux = 2) or // Caso haja diferença na comparação de versões com "versoes_agentes.ini"... - (v_strLocalVersion ='0000') then // Provavelmente versão muito antiga ou corrompida - g_oCacic.killFiles(g_oCacic.getLocalFolder + 'Modulos\', 'ger_cols.exe'); - End; - - // Verificação de versão do chksis.exe e exclusão em caso de versão antiga/diferente da atual - If (FileExists(g_oCacic.getWinDir + 'chksis.exe')) Then - Begin - intAux := CheckAgentVersion(g_oCacic.getWinDir + 'chksis.exe'); - // 0 => Arquivo de versões ou informação inexistente - // 1 => Versões iguais - // 2 => Versões diferentes - if (intAux = 0) then - Begin - v_strLocalVersion := StringReplace(trim(g_oCacic.GetVersionInfo(g_oCacic.getWinDir + 'chksis.exe')),'.','',[rfReplaceAll]); - v_strRemoteVersion := StringReplace(g_oCacic.xmlGetValue('CHKSIS' , v_strCommResponse),'0103','',[rfReplaceAll]); - End; - - if (intAux = 2) or // Caso haja diferença na comparação de versões com "versoes_agentes.ini"... - (v_strLocalVersion ='0000') then // Provavelmente versão muito antiga ou corrompida - g_oCacic.killFiles(g_oCacic.getWinDir,'chksis.exe'); - End; - - // Tento detectar o ChkSis.EXE e copio ou faço FTP caso não exista - verifyAndGet('chksis.exe', - g_oCacic.xmlGetValue('TE_HASH_CHKSIS', v_strCommResponse), - g_oCacic.getWinDir); - - // Tento detectar o ChkSis.INI e crio-o caso necessário - If not FileExists(g_oCacic.getWinDir + 'chksis.ini') Then - begin - g_oCacic.writeDebugLog('Criando '+g_oCacic.getWinDir + 'chksis.ini'); - - g_oCacic.setValueToFile('Configs','TeWebManagerAddress',g_oCacic.Encrypt( v_TeWebManagerAddress) ,g_oCacic.getWinDir + 'chksis.ini'); - g_oCacic.setValueToFile('Configs','TeLocalFolder' ,g_oCacic.Encrypt( v_TeLocalFolder) ,g_oCacic.getWinDir + 'chksis.ini'); - g_oCacic.setValueToFile('Configs','TeMainProgramName' ,g_oCacic.Encrypt( g_oCacic.getMainProgramName),g_oCacic.getWinDir + 'chksis.ini'); - - FileSetAttr ( PChar(g_oCacic.getWinDir + 'chksis.ini'),0); // Retira os atributos do arquivo para evitar o erro FILE ACCESS DENIED em máquinas 2000 - end; - - - // Verificação de existência do CacicService.exe - g_oCacic.killFiles(g_oCacic.getWinDir,'cacicservice.exe'); - If (g_oCacic.isWindowsNTPlataform()) then - Begin - // Tento detectar o CACICservice.EXE e copio ou faço FTP caso não exista - verifyAndGet('cacicservice.exe', - g_oCacic.xmlGetValue('TE_HASH_CACICSERVICE', v_strCommResponse), - g_oCacic.getWinDir); - - // O CACICservice usará o arquivo de configurações \Windows\chksis.ini - End; - - strAux := g_oCacic.getLocalFolder + StringReplace(LowerCase(g_oCacic.getMainProgramName) ,'.exe','.inf',[rfReplaceAll]); - // Tento detectar o arquivo de configurações/informações do Agente Principal e crio-o caso necessário - If not FileExists(strAux) Then - begin - g_oCacic.writeDebugLog('Criando/Recriando ' + strAux); - - g_oCacic.setValueToFile('Configs','TeWebManagerAddress',g_oCacic.Encrypt( v_TeWebManagerAddress) , strAux); - g_oCacic.setValueToFile('Configs','TeLocalFolder' ,g_oCacic.Encrypt( v_TeLocalFolder) , strAux); - g_oCacic.setValueToFile('Configs','TeMainProgramName' ,g_oCacic.Encrypt( g_oCacic.getMainProgramName), strAux); - end; - - // Verifico se existe a pasta "Modulos" - v_modulos := ListFileDir(ExtractFilePath(Application.Exename)+'\Modulos\*.exe'); - if (v_modulos <> '') then g_oCacic.writeDailyLog('Pasta "Modulos" encontrada..'); - - // Tento detectar o Agente Principal e copio ou faço FTP caso não exista - verifyAndGet(g_oCacic.getMainProgramName, - g_oCacic.getMainProgramHash, - g_oCacic.getLocalFolder); - - verifyAndGet('ger_cols.exe', - g_oCacic.xmlGetValue('TE_HASH_GER_COLS', v_strCommResponse), - g_oCacic.getLocalFolder + 'Modulos'); - - // Caso exista a pasta "Modulos", copio todos os executáveis para a pasta Cacic\Modulos, exceto o agente principal, ger_cols.exe e chksis.exe - if (v_modulos <> '') then - Begin - v_array_modulos := g_oCacic.explode(v_modulos,'#'); - For intAux := 0 To v_array_modulos.count -1 Do - Begin - if (v_array_modulos[intAux]<> g_oCacic.getMainProgramName) and - (v_array_modulos[intAux]<>'ger_cols.exe') and - (v_array_modulos[intAux]<>'chksis.exe') then - Begin - g_oCacic.writeDailyLog('Copiando '+v_array_modulos[intAux]+' de '+ExtractFilePath(Application.Exename)+'Modulos\'); - CopyFile(PChar(ExtractFilePath(Application.Exename) + 'Modulos\'+v_array_modulos[intAux]), PChar(g_oCacic.getLocalFolder + 'Modulos\'+v_array_modulos[intAux]),false); - FileSetAttr (PChar(g_oCacic.getLocalFolder + 'Modulos\'+v_array_modulos[intAux]),0); // Retira os atributos do arquivo para evitar o erro FILE ACCESS DENIED em máquinas 2000 - End; - End; - End; - - // ATENÇÃO: - // Após testes no Vista, percebí que o firewall nativo interrompia o FTP e truncava o agente com tamanho zero... - // A nova tentativa abaixo ajudará a sobrepor o agente truncado e corrompido - - // Tento detectar (de novo) o ChkSis.EXE e copio ou faço FTP caso não exista - verifyAndGet('chksis.exe', - g_oCacic.xmlGetValue('TE_HASH_CHKSIS', v_strCommResponse), - g_oCacic.getWinDir); - - // Tento detectar (de novo) o Agente Principal e copio ou faço FTP caso não exista - verifyAndGet(g_oCacic.getMainProgramName, - g_oCacic.getMainProgramHash, - g_oCacic.getLocalFolder); - - verifyAndGet('ger_cols.exe', - g_oCacic.xmlGetValue('TE_HASH_GER_COLS', v_strCommResponse), - g_oCacic.getLocalFolder + 'Modulos'); - - if (g_oCacic.isWindowsNTPlataform) then - Begin - Try - // Acrescento o Ger_Cols e srCacicSrv às exceções do FireWall nativo... - - {chksis} - g_oCacic.writeDebugLog('Inserindo "'+g_oCacic.getWinDir + 'chksis" nas exceções do FireWall!'); - g_oCacic.addApplicationToFirewall('chkSIS - Módulo Verificador de Integridade do Sistema CACIC',g_oCacic.getWinDir + 'chksis.exe',true); - - {ger_cols} - g_oCacic.writeDebugLog('Inserindo "'+g_oCacic.getLocalFolder + 'Modulos\ger_cols" nas exceções do FireWall!'); - g_oCacic.addApplicationToFirewall('gerCOLS - Módulo Gerente de Coletas do Sistema CACIC',g_oCacic.getLocalFolder+'Modulos\ger_cols.exe',true); - - {srcacicsrv} - g_oCacic.writeDebugLog('Inserindo "'+g_oCacic.getLocalFolder + 'Modulos\srcacicsrv" nas exceções do FireWall!'); - g_oCacic.addApplicationToFirewall('srCACICsrv - Módulo Servidor de Suporte Remoto Seguro do Sistema CACIC',g_oCacic.getLocalFolder+'Modulos\srcacicsrv.exe',true); - - Except - End; - End; - - g_oCacic.writeDebugLog('Gravando registros para auto-execução'); - - // Somente para S.O. NOT NT LIKE - if NOT (g_oCacic.isWindowsNTPlataform) then - Begin - // Crio a chave/valor chksis para autoexecução do ChkSIS, caso não exista esta chave/valor - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\CheckSystemRoutine', g_oCacic.getWinDir + 'chksis.exe'); - - boolExistsAutoRun := false; - if (g_oCacic.getValueRegistryKey('HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\' + StringReplace(LowerCase(g_oCacic.getMainProgramName) ,'.exe','',[rfReplaceAll]) )=g_oCacic.getLocalFolder + g_oCacic.getMainProgramName) then - boolExistsAutoRun := true - else - g_oCacic.setValueRegistryKey('HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\' +StringReplace(LowerCase(g_oCacic.getMainProgramName) ,'.exe','',[rfReplaceAll]) , g_oCacic.getLocalFolder + g_oCacic.getMainProgramName); - End; - - g_oCacic.writeDebugLog('Abrindo Arquivo de Configurações do ChkSis'); - - g_oCacic.setValueToFile('Configs','TeWebManagerAddress' , g_oCacic.enCrypt(v_TeWebManagerAddress) , g_oCacic.getWinDir + 'chksis.ini'); - g_oCacic.setValueToFile('Configs','TeMainProgramName' , g_oCacic.enCrypt(g_oCacic.getMainProgramName) , g_oCacic.getWinDir + 'chksis.ini'); - g_oCacic.setValueToFile('Configs','TeMainProgramHash' , g_oCacic.enCrypt(g_oCacic.getMainProgramHash) , g_oCacic.getWinDir + 'chksis.ini'); - g_oCacic.setValueToFile('Configs','TeLocalFolder' , g_oCacic.enCrypt(g_oCacic.getLocalFolder) , g_oCacic.getWinDir + 'chksis.ini'); - g_oCacic.setValueToFile('Configs','TeServiceProgramHash' , g_oCacic.enCrypt(g_oCacic.xmlGetValue('TE_HASH_CACICSERVICE', v_strCommResponse)), g_oCacic.getWinDir + 'chksis.ini'); - - // Igualo as chaves TeWebManagerAddress dos arquivos chksis.ini e .ini! - - g_oCacic.writeDebugLog('Abrindo Arquivo de Configurações do Agente Principal'); - - g_oCacic.setValueToFile('Configs','TeWebManagerAddress' , g_oCacic.enCrypt(v_TeWebManagerAddress) , g_oCacic.getLocalFolder + StringReplace(LowerCase(g_oCacic.getMainProgramName) ,'.exe','.inf',[rfReplaceAll])); - g_oCacic.setValueToFile('Configs','TeMainProgramName' , g_oCacic.enCrypt(g_oCacic.getMainProgramName) , g_oCacic.getLocalFolder + StringReplace(LowerCase(g_oCacic.getMainProgramName) ,'.exe','.inf',[rfReplaceAll])); - g_oCacic.setValueToFile('Configs','TeMainProgramHash' , g_oCacic.enCrypt(g_oCacic.getMainProgramHash) , g_oCacic.getLocalFolder + StringReplace(LowerCase(g_oCacic.getMainProgramName) ,'.exe','.inf',[rfReplaceAll])); - g_oCacic.setValueToFile('Configs','TeLocalFolder' , g_oCacic.enCrypt(g_oCacic.getLocalFolder) , g_oCacic.getLocalFolder + StringReplace(LowerCase(g_oCacic.getMainProgramName) ,'.exe','.inf',[rfReplaceAll])); - g_oCacic.setValueToFile('Configs','TeServiceProgramHash' , g_oCacic.enCrypt(g_oCacic.xmlGetValue('TE_HASH_CACICSERVICE', v_strCommResponse)) , g_oCacic.getLocalFolder + StringReplace(LowerCase(g_oCacic.getMainProgramName) ,'.exe','.inf',[rfReplaceAll])); - - g_oCacic.writeDebugLog('Resgatando informações para identificação de alteração do agente CACIC3'); - // Pego as informações de dia/mês/ano/horas/minutos/segundos/milésimos que identificam os agentes - strAux := g_oCacic.getLocalFolder + g_oCacic.getMainProgramName; - strDateTimeMainProgram_END := FormatDateTime('ddmmyyyyhhnnsszzz', g_oCacic.getFolderDate(strAux)); - g_oCacic.writeDebugLog('Inicial => "' + strDateTimeMainProgram_BEGIN + '" Final => "' + strDateTimeMainProgram_END + '"'); - - g_oCacic.writeDebugLog('Resgatando informações para identificação de alteração do agente GER_COLS'); - strAux := g_oCacic.getLocalFolder + 'Modulos\ger_cols.exe'; - strDateTimeGERCOLS_END := FormatDateTime('ddmmyyyyhhnnsszzz', g_oCacic.getFolderDate(strAux)); - g_oCacic.writeDebugLog('Inicial => "' + strDateTimeGERCOLS_BEGIN + '" Final => "' + strDateTimeGERCOLS_END + '"'); - - // Caso o Cacic tenha sido baixado executo-o com parâmetro de configuração de servidor - if ((strDateTimeMainProgram_BEGIN <> strDateTimeMainProgram_END) OR - (strDateTimeGERCOLS_BEGIN <> strDateTimeGERCOLS_END)) then - Begin - v_te_texto_janela_instalacao := v_TeProcessInformations; - - if (g_oCacic.getValueRegistryKey('HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\' + StringReplace(LowerCase(g_oCacic.getMainProgramName),'.exe','',[rfReplaceAll]) )=g_oCacic.getLocalFolder + g_oCacic.getMainProgramName) and - (not g_oCacic.isWindowsNTPlataform()) or - (g_oCacic.isWindowsNTPlataform()) and - not boolCommandLine then - configs.memoProgress.Lines.Add('Sistema CACIC - '+v_TeSuccessPhrase) - else - Begin - if not boolCommandLine then - Configs.memoProgress.Lines.Add('Sistema CACIC - '+v_TeInsuccessPhrase); - ComunicaInsucesso('1'); // O indicador "1" sinalizará que não foi devido a privilégio na estação - End; - End - else - g_oCacic.writeDailyLog('ATENÇÃO: Instalação NÃO REALIZADA ou ATUALIZAÇÃO DESNECESSÁRIA!'); - - if Posso_Rodar_CACIC or - not boolExistsAutoRun or - (strDateTimeMainProgram_BEGIN <> strDateTimeMainProgram_END) then - Begin - // Se não for plataforma NT executo o agente principal - if not (g_oCacic.isWindowsNTPlataform()) then - Begin - g_oCacic.writeDebugLog('Executando '+g_oCacic.getLocalFolder + g_oCacic.getMainProgramName + ' /TeWebManagerAddress=' + v_TeWebManagerAddress); - if (strDateTimeMainProgram_BEGIN <> strDateTimeMainProgram_END) then - g_oCacic.createOneProcess(g_oCacic.getLocalFolder + g_oCacic.getMainProgramName + ' /TeWebManagerAddress=' + v_TeWebManagerAddress+ ' /execute', false) - else - g_oCacic.createOneProcess(g_oCacic.getLocalFolder + g_oCacic.getMainProgramName + ' /TeWebManagerAddress=' + v_TeWebManagerAddress , false); - End - else - Begin - - {*** 1 = SERVICE_STOPPED ***} - {*** 2 = SERVICE_START_PENDING ***} - {*** 3 = SERVICE_STOP_PENDING ***} - {*** 4 = SERVICE_RUNNING ***} - {*** 5 = SERVICE_CONTINUE_PENDING ***} - {*** 6 = SERVICE_PAUSE_PENDING ***} - {*** 7 = SERVICE_PAUSED ***} - - // Verifico se o serviço está instalado/rodando,etc. - wordServiceStatus := ServiceGetStatus(nil,'CacicSustainService'); - if (wordServiceStatus = 0) then - Begin - // Instalo e Habilito o serviço - g_oCacic.writeDailyLog('Instalando o CACICservice...'); - g_oCacic.createOneProcess(g_oCacic.getWinDir + 'cacicservice.exe /install /silent',true); - g_oCacic.createOneProcess(g_oCacic.getLocalFolder + g_oCacic.getMainProgramName + ' /TeWebManagerAddress=' + v_TeWebManagerAddress+ ' /execute', false) - End - else if (wordServiceStatus < 4) then - Begin - g_oCacic.writeDailyLog('Iniciando o CACICservice'); - g_oCacic.createOneProcess(g_oCacic.getWinDir + 'cacicservice.exe -start', true); - End - else if (wordServiceStatus > 4) then - Begin - g_oCacic.writeDailyLog('Continuando o CACICservice'); - g_oCacic.createOneProcess(g_oCacic.getWinDir + 'cacicservice.exe -continue', true); - End - else - g_oCacic.writeDailyLog('Não instalei/iniciei o CACICservice. Já está rodando...'); - End; - - if Posso_Rodar_CACIC and not boolCommandLine then - MessageDLG(#13#10+'ATENÇÃO! É recomendável a reinicialização do sistema para início de ações do CACIC.',mtInformation,[mbOK],0); - - End - else - g_oCacic.writeDebugLog('Chave de Auto-Execução já existente ou Execução já iniciada...'); - End - else - Begin // Se NT/2000/XP/... - if (v_InShowProcessInformations = 'S') and not boolCommandLine then - MessageDLG(#13#10+'ATENÇÃO! Essa aplicação requer execução com nível administrativo.',mtError,[mbOK],0); - g_oCacic.writeDailyLog('Sem Privilégios: Necessário ser administrador "local" da estação'); - ComunicaInsucesso('0'); // O indicador "0" (zero) sinalizará falta de privilégio na estação - End; - Except - g_oCacic.writeDailyLog('Falha na Instalação/Atualização'); - End; - - try - g_oCacic.Free; - except - end; - - Application.Terminate; -end; - -function ServiceRunning(sMachine, sService: PChar): Boolean; -begin - Result := SERVICE_RUNNING = ServiceGetStatus(sMachine, sService); -end; - -function ServiceStopped(sMachine, sService: PChar): Boolean; -begin - Result := SERVICE_STOPPED = ServiceGetStatus(sMachine, sService); -end; - -function FindWindowByTitle(WindowTitle: string): Hwnd; -var - NextHandle: Hwnd; - NextTitle: array[0..260] of char; -begin - // Get the first window - NextHandle := GetWindow(Application.Handle, GW_HWNDFIRST); - while NextHandle > 0 do - begin - // retrieve its text - GetWindowText(NextHandle, NextTitle, 255); - - if (trim(StrPas(NextTitle))<> '') and (Pos(strlower(pchar(WindowTitle)), strlower(PChar(StrPas(NextTitle)))) <> 0) then - begin - Result := NextHandle; - Exit; - end - else - // Get the next window - NextHandle := GetWindow(NextHandle, GW_HWNDNEXT); - end; - Result := 0; -end; - -procedure TfrmChkCACIC.FormCreate(Sender: TObject); -begin - Application.ShowMainForm := false; - tstringlistRequest_Config := TStringList.Create; - tstringstreamResponse_Config := TStringStream.Create(''); - - chkcacic; - - Application.Terminate; -end; - -procedure TfrmChkCACIC.FS_SetSecurity(p_Target : String); -var intAux : integer; - v_FS_Security : TNTFileSecurity; -begin - v_FS_Security := TNTFileSecurity.Create(nil); - v_FS_Security.FileName := ''; - v_FS_Security.FileName := p_Target; - v_FS_Security.RefreshSecurity; - - if (v_FS_Security.FileSystemName='NTFS')then - Begin - for intAux := 0 to Pred(v_FS_Security.EntryCount) do - begin - case v_FS_Security.EntryType[intAux] of seAlias, seDomain, seGroup : - Begin // If local group, alias or user... - v_FS_Security.FileRights[intAux] := [faAll]; - v_FS_Security.DirectoryRights[intAux] := [faAll]; - g_oCacic.writeDebugLog(p_Target + ' [Full Access] >> '+v_FS_Security.EntryName[intAux]); - //Setting total access on p_Target to local groups. - End; - End; - end; - - // Atribui permissão total aos grupos locais - // Set total permissions to local groups - v_FS_Security.SetSecurity; - end - else - g_oCacic.writeDailyLog('File System: "' + v_FS_Security.FileSystemName+'" - Ok!'); - - v_FS_Security.Free; -end; -end. diff --git a/chksis/chksis.cfg b/chksis/chksis.cfg deleted file mode 100755 index 301bbb6..0000000 --- a/chksis/chksis.cfg +++ /dev/null @@ -1,44 +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 --GD --cg --AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; --H+ --W+ --M --$M16384,1048576 --K$00400000 --E"C:\agentes_Windows_BINARIOS" --LE"c:\program files (x86)\borland\delphi7\Projects\Bpl" --LN"c:\program files (x86)\borland\delphi7\Projects\Bpl" --U"C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib\;C:\agentes_Windows;C:\vendors_lib\MagWMI" --O"C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib\;C:\agentes_Windows;C:\vendors_lib\MagWMI" --I"C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib\;C:\agentes_Windows;C:\vendors_lib\MagWMI" --R"C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib\;C:\agentes_Windows;C:\vendors_lib\MagWMI" --w-UNSAFE_TYPE --w-UNSAFE_CODE --w-UNSAFE_CAST diff --git a/chksis/chksis.dproj b/chksis/chksis.dproj index 174557f..2cff2b0 100755 --- a/chksis/chksis.dproj +++ b/chksis/chksis.dproj @@ -1,11 +1,12 @@ - + + {47208bdf-1cc5-4d10-943a-f45317ab5eb7} chksis.dpr Debug AnyCPU DCC32 - ..\chksis.exe + ..\..\Agentes_Windows_BINARIOS\chksis.exe 7.0 @@ -21,64 +22,23 @@ 7.0 - ..\ - C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7 - C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7 - C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7 - C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\CriptografiaDCP;C:\Arquivos de programas\Borland\Delphi7\Comps_CACIC\Mitec\v1010_Delphi7 + C:\devel\cacic\Agentes_Windows_BINARIOS DEBUG Delphi.Personality VCLApplication - - C:\Arquivos de programas\Borland\Delphi7\Mitec\D7 - False - True - False - - - C:\Arquivos de programas\Borland\Delphi7\Bin\ - - - True - False - 2 - 6 - 0 - 0 - False - False - False - False - False - 1046 - 1252 - - - Dataprev - Emp. de TI da Prev.Social - UDSL/SSLC - Sistema CACIC - Módulo Verificador de Integridade - 2.5.9.0 - - - - - ChkSIS - 2.6.0.0 - Licença: GNU/LGPL - - - chksis.dpr - - +C:\Arquivos de programas\Borland\Delphi7\Mitec\D7FalseTrueFalseC:\Arquivos de programas\Borland\Delphi7\Bin\TrueFalse2801212FalseFalseFalseFalseFalse10461252Dataprev - Emp. de TI da Prev.Social - URES/SESSSistema CACIC - Módulo Verificador de Integridade2.8.0.1212ChkSIS3.0Licença: GNU/LGPLchksis.dpr - + MainSource + + + - \ No newline at end of file diff --git a/chksis/chksis.drc b/chksis/chksis.drc deleted file mode 100644 index de95f70..0000000 --- a/chksis/chksis.drc +++ /dev/null @@ -1,756 +0,0 @@ -/* VER150 - Generated by the Borland Delphi Pascal Compiler - because -GD or --drc was supplied to the compiler. - - This file contains compiler-generated resources that - were bound to the executable. - If this file is empty, then no compiler-generated - resources were bound to the produced executable. -*/ - -#define ExtCtrls_clNameWindowFrame 65152 -#define ExtCtrls_clNameWindowText 65153 -#define WinHelpViewer_hNoKeyword 65154 -#define ExtCtrls_clNameDefault 65168 -#define ExtCtrls_clNameGrayText 65169 -#define ExtCtrls_clNameHighlight 65170 -#define ExtCtrls_clNameHighlightText 65171 -#define ExtCtrls_clNameInactiveBorder 65172 -#define ExtCtrls_clNameInactiveCaption 65173 -#define ExtCtrls_clNameInactiveCaptionText 65174 -#define ExtCtrls_clNameInfoBk 65175 -#define ExtCtrls_clNameInfoText 65176 -#define ExtCtrls_clNameMenu 65177 -#define ExtCtrls_clNameMenuText 65178 -#define ExtCtrls_clNameNone 65179 -#define ExtCtrls_clNameScrollBar 65180 -#define ExtCtrls_clName3DDkShadow 65181 -#define ExtCtrls_clName3DLight 65182 -#define ExtCtrls_clNameWindow 65183 -#define ExtCtrls_clNameFuchsia 65184 -#define ExtCtrls_clNameAqua 65185 -#define ExtCtrls_clNameWhite 65186 -#define ExtCtrls_clNameMoneyGreen 65187 -#define ExtCtrls_clNameSkyBlue 65188 -#define ExtCtrls_clNameCream 65189 -#define ExtCtrls_clNameMedGray 65190 -#define ExtCtrls_clNameActiveBorder 65191 -#define ExtCtrls_clNameActiveCaption 65192 -#define ExtCtrls_clNameAppWorkSpace 65193 -#define ExtCtrls_clNameBackground 65194 -#define ExtCtrls_clNameBtnFace 65195 -#define ExtCtrls_clNameBtnHighlight 65196 -#define ExtCtrls_clNameBtnShadow 65197 -#define ExtCtrls_clNameBtnText 65198 -#define ExtCtrls_clNameCaptionText 65199 -#define HelpIntfs_hNothingFound 65200 -#define HelpIntfs_hNoContext 65201 -#define HelpIntfs_hNoTopics 65202 -#define ExtCtrls_clNameBlack 65203 -#define ExtCtrls_clNameMaroon 65204 -#define ExtCtrls_clNameGreen 65205 -#define ExtCtrls_clNameOlive 65206 -#define ExtCtrls_clNameNavy 65207 -#define ExtCtrls_clNamePurple 65208 -#define ExtCtrls_clNameTeal 65209 -#define ExtCtrls_clNameGray 65210 -#define ExtCtrls_clNameSilver 65211 -#define ExtCtrls_clNameRed 65212 -#define ExtCtrls_clNameLime 65213 -#define ExtCtrls_clNameYellow 65214 -#define ExtCtrls_clNameBlue 65215 -#define Consts_SmkcUp 65216 -#define Consts_SmkcRight 65217 -#define Consts_SmkcDown 65218 -#define Consts_SmkcIns 65219 -#define Consts_SmkcDel 65220 -#define Consts_SmkcShift 65221 -#define Consts_SmkcCtrl 65222 -#define Consts_SmkcAlt 65223 -#define Consts_SIconToClipboard 65224 -#define Consts_SDuplicateMenus 65225 -#define Consts_SDockedCtlNeedsName 65226 -#define Consts_SDockTreeRemoveError 65227 -#define Consts_SDockZoneNotFound 65228 -#define Consts_SDockZoneHasNoCtl 65229 -#define OleConst_sNoRunningObject 65230 -#define HelpIntfs_hNoTableOfContents 65231 -#define Consts_SMsgDlgAbort 65232 -#define Consts_SMsgDlgRetry 65233 -#define Consts_SMsgDlgIgnore 65234 -#define Consts_SMsgDlgAll 65235 -#define Consts_SMsgDlgNoToAll 65236 -#define Consts_SMsgDlgYesToAll 65237 -#define Consts_SmkcBkSp 65238 -#define Consts_SmkcTab 65239 -#define Consts_SmkcEsc 65240 -#define Consts_SmkcEnter 65241 -#define Consts_SmkcSpace 65242 -#define Consts_SmkcPgUp 65243 -#define Consts_SmkcPgDn 65244 -#define Consts_SmkcEnd 65245 -#define Consts_SmkcHome 65246 -#define Consts_SmkcLeft 65247 -#define Consts_SHelpButton 65248 -#define Consts_SCloseButton 65249 -#define Consts_SIgnoreButton 65250 -#define Consts_SRetryButton 65251 -#define Consts_SAbortButton 65252 -#define Consts_SAllButton 65253 -#define Consts_SCannotDragForm 65254 -#define Consts_SMsgDlgWarning 65255 -#define Consts_SMsgDlgError 65256 -#define Consts_SMsgDlgInformation 65257 -#define Consts_SMsgDlgConfirm 65258 -#define Consts_SMsgDlgYes 65259 -#define Consts_SMsgDlgNo 65260 -#define Consts_SMsgDlgOK 65261 -#define Consts_SMsgDlgCancel 65262 -#define Consts_SMsgDlgHelp 65263 -#define Consts_SCannotFocus 65264 -#define Consts_SParentRequired 65265 -#define Consts_SMDIChildNotVisible 65266 -#define Consts_SVisibleChanged 65267 -#define Consts_SCannotShowModal 65268 -#define Consts_SMenuIndexError 65269 -#define Consts_SMenuReinserted 65270 -#define Consts_SMenuNotFound 65271 -#define Consts_SNoTimers 65272 -#define Consts_SGroupIndexTooLow 65273 -#define Consts_SNoMDIForm 65274 -#define Consts_SControlParentSetToSelf 65275 -#define Consts_SOKButton 65276 -#define Consts_SCancelButton 65277 -#define Consts_SYesButton 65278 -#define Consts_SNoButton 65279 -#define IdResourceStrings_RSUnevenSizeInEncodeStream 65280 -#define IdResourceStrings_RSURINoProto 65281 -#define IdResourceStrings_RSURINoHost 65282 -#define Consts_SInvalidBitmap 65283 -#define Consts_SInvalidIcon 65284 -#define Consts_SChangeIconSize 65285 -#define Consts_SUnknownClipboardFormat 65286 -#define Consts_SOutOfResources 65287 -#define Consts_SNoCanvasHandle 65288 -#define Consts_SInvalidImageSize 65289 -#define Consts_SInvalidImageList 65290 -#define Consts_SImageIndexError 65291 -#define Consts_SImageReadFail 65292 -#define Consts_SImageWriteFail 65293 -#define Consts_SWindowDCError 65294 -#define Consts_SWindowClass 65295 -#define IdResourceStrings_RSSocksServerCommandError 65296 -#define IdResourceStrings_RSSocksServerAddressError 65297 -#define IdResourceStrings_RSDestinationFileAlreadyExists 65298 -#define IdResourceStrings_RSSSLAcceptError 65299 -#define IdResourceStrings_RSSSLConnectError 65300 -#define IdResourceStrings_RSSSLSettingCipherError 65301 -#define IdResourceStrings_RSSSLCreatingContextError 65302 -#define IdResourceStrings_RSSSLLoadingRootCertError 65303 -#define IdResourceStrings_RSSSLLoadingCertError 65304 -#define IdResourceStrings_RSSSLLoadingKeyError 65305 -#define IdResourceStrings_RSSSLGetMethodError 65306 -#define IdResourceStrings_RSSSLDataBindingError 65307 -#define IdResourceStrings_RSOSSLModeNotSet 65308 -#define IdResourceStrings_RSOSSLCouldNotLoadSSLLibrary 65309 -#define IdResourceStrings_RSOSSLStatusString 65310 -#define IdResourceStrings_RSUnevenSizeInDecodeStream 65311 -#define IdResourceStrings_RSStackEHOSTUNREACH 65312 -#define IdResourceStrings_RSStackENOTEMPTY 65313 -#define IdResourceStrings_RSStackHOST_NOT_FOUND 65314 -#define IdResourceStrings_RSSocksRequestFailed 65315 -#define IdResourceStrings_RSSocksRequestServerFailed 65316 -#define IdResourceStrings_RSSocksRequestIdentFailed 65317 -#define IdResourceStrings_RSSocksUnknownError 65318 -#define IdResourceStrings_RSSocksServerRespondError 65319 -#define IdResourceStrings_RSSocksAuthMethodError 65320 -#define IdResourceStrings_RSSocksAuthError 65321 -#define IdResourceStrings_RSSocksServerGeneralError 65322 -#define IdResourceStrings_RSSocksServerPermissionError 65323 -#define IdResourceStrings_RSSocksServerNetUnreachableError 65324 -#define IdResourceStrings_RSSocksServerHostUnreachableError 65325 -#define IdResourceStrings_RSSocksServerConnectionRefusedError 65326 -#define IdResourceStrings_RSSocksServerTTLExpiredError 65327 -#define IdResourceStrings_RSStackEADDRNOTAVAIL 65328 -#define IdResourceStrings_RSStackENETDOWN 65329 -#define IdResourceStrings_RSStackENETUNREACH 65330 -#define IdResourceStrings_RSStackENETRESET 65331 -#define IdResourceStrings_RSStackECONNABORTED 65332 -#define IdResourceStrings_RSStackECONNRESET 65333 -#define IdResourceStrings_RSStackENOBUFS 65334 -#define IdResourceStrings_RSStackEISCONN 65335 -#define IdResourceStrings_RSStackENOTCONN 65336 -#define IdResourceStrings_RSStackESHUTDOWN 65337 -#define IdResourceStrings_RSStackETOOMANYREFS 65338 -#define IdResourceStrings_RSStackETIMEDOUT 65339 -#define IdResourceStrings_RSStackECONNREFUSED 65340 -#define IdResourceStrings_RSStackELOOP 65341 -#define IdResourceStrings_RSStackENAMETOOLONG 65342 -#define IdResourceStrings_RSStackEHOSTDOWN 65343 -#define IdResourceStrings_RSStackEINVAL 65344 -#define IdResourceStrings_RSStackEMFILE 65345 -#define IdResourceStrings_RSStackEWOULDBLOCK 65346 -#define IdResourceStrings_RSStackEINPROGRESS 65347 -#define IdResourceStrings_RSStackEALREADY 65348 -#define IdResourceStrings_RSStackENOTSOCK 65349 -#define IdResourceStrings_RSStackEDESTADDRREQ 65350 -#define IdResourceStrings_RSStackEMSGSIZE 65351 -#define IdResourceStrings_RSStackEPROTOTYPE 65352 -#define IdResourceStrings_RSStackENOPROTOOPT 65353 -#define IdResourceStrings_RSStackEPROTONOSUPPORT 65354 -#define IdResourceStrings_RSStackESOCKTNOSUPPORT 65355 -#define IdResourceStrings_RSStackEOPNOTSUPP 65356 -#define IdResourceStrings_RSStackEPFNOSUPPORT 65357 -#define IdResourceStrings_RSStackEAFNOSUPPORT 65358 -#define IdResourceStrings_RSStackEADDRINUSE 65359 -#define IdResourceStrings_RSStatusText 65360 -#define IdResourceStrings_RSConnectTimeout 65361 -#define IdResourceStrings_RSHTTPChunkStarted 65362 -#define IdResourceStrings_RSHTTPAuthAlreadyRegistered 65363 -#define IdResourceStrings_RSFTPUnknownHost 65364 -#define IdResourceStrings_RSInvalidFTPListingFormat 65365 -#define IdResourceStrings_RSFTPStatusReady 65366 -#define IdResourceStrings_RSFTPStatusStartTransfer 65367 -#define IdResourceStrings_RSFTPStatusDoneTransfer 65368 -#define IdResourceStrings_RSFTPStatusAbortTransfer 65369 -#define IdResourceStrings_RSInvalidServiceName 65370 -#define IdResourceStrings_RSStackError 65371 -#define IdResourceStrings_RSStackEINTR 65372 -#define IdResourceStrings_RSStackEBADF 65373 -#define IdResourceStrings_RSStackEACCES 65374 -#define IdResourceStrings_RSStackEFAULT 65375 -#define IdResourceStrings_RSFileNotFound 65376 -#define IdResourceStrings_RSOnlyOneAntiFreeze 65377 -#define IdResourceStrings_RSIOHandlerPropInvalid 65378 -#define IdResourceStrings_RSNotConnected 65379 -#define IdResourceStrings_RSIdNoDataToRead 65380 -#define IdResourceStrings_RSCanNotBindRange 65381 -#define IdResourceStrings_RSInvalidPortRange 65382 -#define IdResourceStrings_RSReadTimeout 65383 -#define IdResourceStrings_RSReadLnMaxLineLengthExceeded 65384 -#define IdResourceStrings_RSWS2CallError 65385 -#define IdResourceStrings_RSWS2LoadError 65386 -#define IdResourceStrings_RSStatusResolving 65387 -#define IdResourceStrings_RSStatusConnecting 65388 -#define IdResourceStrings_RSStatusConnected 65389 -#define IdResourceStrings_RSStatusDisconnecting 65390 -#define IdResourceStrings_RSStatusDisconnected 65391 -#define RTLConsts_SWriteError 65392 -#define RTLConsts_SThreadCreateError 65393 -#define RTLConsts_SThreadError 65394 -#define ComConst_SOleError 65395 -#define ComConst_SNoMethod 65396 -#define ComConst_SVarNotObject 65397 -#define ComConst_STooManyParams 65398 -#define ComConst_SDCOMNotInstalled 65399 -#define IdResourceStrings_RSAlreadyConnected 65400 -#define IdResourceStrings_RSCannotAllocateSocket 65401 -#define IdResourceStrings_RSConnectionClosedGracefully 65402 -#define IdResourceStrings_RSCouldNotBindSocket 65403 -#define IdResourceStrings_RSFailedTimeZoneInfo 65404 -#define IdResourceStrings_RSNotEnoughDataInBuffer 65405 -#define IdResourceStrings_RSWinsockInitializationError 65406 -#define IdResourceStrings_RSSetSizeExceeded 65407 -#define RTLConsts_SInvalidName 65408 -#define RTLConsts_SInvalidProperty 65409 -#define RTLConsts_SInvalidPropertyPath 65410 -#define RTLConsts_SInvalidPropertyValue 65411 -#define RTLConsts_SListCapacityError 65412 -#define RTLConsts_SListCountError 65413 -#define RTLConsts_SListIndexError 65414 -#define RTLConsts_SMemoryStreamError 65415 -#define RTLConsts_SPropertyException 65416 -#define RTLConsts_SReadError 65417 -#define RTLConsts_SReadOnlyProperty 65418 -#define RTLConsts_SResNotFound 65419 -#define RTLConsts_SSeekNotImplemented 65420 -#define RTLConsts_SSortedListError 65421 -#define RTLConsts_SUnknownGroup 65422 -#define RTLConsts_SUnknownProperty 65423 -#define SysConst_SLongDayNameSat 65424 -#define SysConst_SCannotCreateDir 65425 -#define RTLConsts_SAncestorNotFound 65426 -#define RTLConsts_SAssignError 65427 -#define RTLConsts_SBitsIndexError 65428 -#define RTLConsts_SCantWriteResourceStreamError 65429 -#define RTLConsts_SCheckSynchronizeError 65430 -#define RTLConsts_SClassNotFound 65431 -#define RTLConsts_SDuplicateClass 65432 -#define RTLConsts_SDuplicateItem 65433 -#define RTLConsts_SDuplicateName 65434 -#define RTLConsts_SDuplicateString 65435 -#define RTLConsts_SFCreateErrorEx 65436 -#define RTLConsts_SFOpenErrorEx 65437 -#define RTLConsts_SIniFileWriteError 65438 -#define RTLConsts_SInvalidImage 65439 -#define SysConst_SLongMonthNameOct 65440 -#define SysConst_SLongMonthNameNov 65441 -#define SysConst_SLongMonthNameDec 65442 -#define SysConst_SShortDayNameSun 65443 -#define SysConst_SShortDayNameMon 65444 -#define SysConst_SShortDayNameTue 65445 -#define SysConst_SShortDayNameWed 65446 -#define SysConst_SShortDayNameThu 65447 -#define SysConst_SShortDayNameFri 65448 -#define SysConst_SShortDayNameSat 65449 -#define SysConst_SLongDayNameSun 65450 -#define SysConst_SLongDayNameMon 65451 -#define SysConst_SLongDayNameTue 65452 -#define SysConst_SLongDayNameWed 65453 -#define SysConst_SLongDayNameThu 65454 -#define SysConst_SLongDayNameFri 65455 -#define SysConst_SShortMonthNameJun 65456 -#define SysConst_SShortMonthNameJul 65457 -#define SysConst_SShortMonthNameAug 65458 -#define SysConst_SShortMonthNameSep 65459 -#define SysConst_SShortMonthNameOct 65460 -#define SysConst_SShortMonthNameNov 65461 -#define SysConst_SShortMonthNameDec 65462 -#define SysConst_SLongMonthNameJan 65463 -#define SysConst_SLongMonthNameFeb 65464 -#define SysConst_SLongMonthNameMar 65465 -#define SysConst_SLongMonthNameApr 65466 -#define SysConst_SLongMonthNameMay 65467 -#define SysConst_SLongMonthNameJun 65468 -#define SysConst_SLongMonthNameJul 65469 -#define SysConst_SLongMonthNameAug 65470 -#define SysConst_SLongMonthNameSep 65471 -#define SysConst_SVarNotImplemented 65472 -#define SysConst_SVarUnexpected 65473 -#define SysConst_SExternalException 65474 -#define SysConst_SAssertionFailed 65475 -#define SysConst_SIntfCastError 65476 -#define SysConst_SSafecallException 65477 -#define SysConst_SAssertError 65478 -#define SysConst_SAbstractError 65479 -#define SysConst_SModuleAccessViolation 65480 -#define SysConst_SOSError 65481 -#define SysConst_SUnkOSError 65482 -#define SysConst_SShortMonthNameJan 65483 -#define SysConst_SShortMonthNameFeb 65484 -#define SysConst_SShortMonthNameMar 65485 -#define SysConst_SShortMonthNameApr 65486 -#define SysConst_SShortMonthNameMay 65487 -#define SysConst_SInvalidFormat 65488 -#define SysConst_SArgumentMissing 65489 -#define SysConst_SDispatchError 65490 -#define SysConst_SReadAccess 65491 -#define SysConst_SWriteAccess 65492 -#define SysConst_SVarArrayCreate 65493 -#define SysConst_SVarArrayBounds 65494 -#define SysConst_SVarArrayLocked 65495 -#define SysConst_SInvalidVarCast 65496 -#define SysConst_SInvalidVarOp 65497 -#define SysConst_SInvalidVarOpWithHResultWithPrefix 65498 -#define SysConst_SVarTypeCouldNotConvert 65499 -#define SysConst_SVarTypeConvertOverflow 65500 -#define SysConst_SVarOverflow 65501 -#define SysConst_SVarInvalid 65502 -#define SysConst_SVarBadType 65503 -#define SysConst_SDivByZero 65504 -#define SysConst_SRangeError 65505 -#define SysConst_SIntOverflow 65506 -#define SysConst_SInvalidOp 65507 -#define SysConst_SZeroDivide 65508 -#define SysConst_SOverflow 65509 -#define SysConst_SUnderflow 65510 -#define SysConst_SInvalidPointer 65511 -#define SysConst_SInvalidCast 65512 -#define SysConst_SAccessViolationArg3 65513 -#define SysConst_SAccessViolationNoArg 65514 -#define SysConst_SStackOverflow 65515 -#define SysConst_SControlC 65516 -#define SysConst_SPrivilege 65517 -#define SysConst_SException 65518 -#define SysConst_SExceptTitle 65519 -#define SysConst_SInvalidInteger 65520 -#define SysConst_SInvalidFloat 65521 -#define SysConst_SInvalidDate 65522 -#define SysConst_SInvalidTime 65523 -#define SysConst_SInvalidDateTime 65524 -#define SysConst_STimeEncodeError 65525 -#define SysConst_SDateEncodeError 65526 -#define SysConst_SOutOfMemory 65527 -#define SysConst_SInOutError 65528 -#define SysConst_SFileNotFound 65529 -#define SysConst_SInvalidFilename 65530 -#define SysConst_STooManyOpenFiles 65531 -#define SysConst_SAccessDenied 65532 -#define SysConst_SEndOfFile 65533 -#define SysConst_SDiskFull 65534 -#define SysConst_SInvalidInput 65535 -STRINGTABLE -BEGIN - ExtCtrls_clNameWindowFrame, "Window Frame" - ExtCtrls_clNameWindowText, "Window Text" - WinHelpViewer_hNoKeyword, "No help keyword specified." - ExtCtrls_clNameDefault, "Default" - ExtCtrls_clNameGrayText, "Gray Text" - ExtCtrls_clNameHighlight, "Highlight Background" - ExtCtrls_clNameHighlightText, "Highlight Text" - ExtCtrls_clNameInactiveBorder, "Inactive Border" - ExtCtrls_clNameInactiveCaption, "Inactive Caption" - ExtCtrls_clNameInactiveCaptionText, "Inactive Caption Text" - ExtCtrls_clNameInfoBk, "Info Background" - ExtCtrls_clNameInfoText, "Info Text" - ExtCtrls_clNameMenu, "Menu Background" - ExtCtrls_clNameMenuText, "Menu Text" - ExtCtrls_clNameNone, "None" - ExtCtrls_clNameScrollBar, "Scroll Bar" - ExtCtrls_clName3DDkShadow, "3D Dark Shadow" - ExtCtrls_clName3DLight, "3D Light" - ExtCtrls_clNameWindow, "Window Background" - ExtCtrls_clNameFuchsia, "Fuchsia" - ExtCtrls_clNameAqua, "Aqua" - ExtCtrls_clNameWhite, "White" - ExtCtrls_clNameMoneyGreen, "Money Green" - ExtCtrls_clNameSkyBlue, "Sky Blue" - ExtCtrls_clNameCream, "Cream" - ExtCtrls_clNameMedGray, "Medium Gray" - ExtCtrls_clNameActiveBorder, "Active Border" - ExtCtrls_clNameActiveCaption, "Active Caption" - ExtCtrls_clNameAppWorkSpace, "Application Workspace" - ExtCtrls_clNameBackground, "Background" - ExtCtrls_clNameBtnFace, "Button Face" - ExtCtrls_clNameBtnHighlight, "Button Highlight" - ExtCtrls_clNameBtnShadow, "Button Shadow" - ExtCtrls_clNameBtnText, "Button Text" - ExtCtrls_clNameCaptionText, "Caption Text" - HelpIntfs_hNothingFound, "No help found for %s" - HelpIntfs_hNoContext, "No context-sensitive help installed" - HelpIntfs_hNoTopics, "No topic-based help system installed" - ExtCtrls_clNameBlack, "Black" - ExtCtrls_clNameMaroon, "Maroon" - ExtCtrls_clNameGreen, "Green" - ExtCtrls_clNameOlive, "Olive" - ExtCtrls_clNameNavy, "Navy" - ExtCtrls_clNamePurple, "Purple" - ExtCtrls_clNameTeal, "Teal" - ExtCtrls_clNameGray, "Gray" - ExtCtrls_clNameSilver, "Silver" - ExtCtrls_clNameRed, "Red" - ExtCtrls_clNameLime, "Lime" - ExtCtrls_clNameYellow, "Yellow" - ExtCtrls_clNameBlue, "Blue" - Consts_SmkcUp, "Up" - Consts_SmkcRight, "Right" - Consts_SmkcDown, "Down" - Consts_SmkcIns, "Ins" - Consts_SmkcDel, "Del" - Consts_SmkcShift, "Shift+" - Consts_SmkcCtrl, "Ctrl+" - Consts_SmkcAlt, "Alt+" - Consts_SIconToClipboard, "Clipboard does not support Icons" - Consts_SDuplicateMenus, "Menu '%s' is already being used by another form" - Consts_SDockedCtlNeedsName, "Docked control must have a name" - Consts_SDockTreeRemoveError, "Error removing control from dock tree" - Consts_SDockZoneNotFound, " - Dock zone not found" - Consts_SDockZoneHasNoCtl, " - Dock zone has no control" - OleConst_sNoRunningObject, "Unable to retrieve a pointer to a running object registered with OLE for %s/%s" - HelpIntfs_hNoTableOfContents, "Unable to find a Table of Contents" - Consts_SMsgDlgAbort, "&Abort" - Consts_SMsgDlgRetry, "&Retry" - Consts_SMsgDlgIgnore, "&Ignore" - Consts_SMsgDlgAll, "&All" - Consts_SMsgDlgNoToAll, "N&o to All" - Consts_SMsgDlgYesToAll, "Yes to &All" - Consts_SmkcBkSp, "BkSp" - Consts_SmkcTab, "Tab" - Consts_SmkcEsc, "Esc" - Consts_SmkcEnter, "Enter" - Consts_SmkcSpace, "Space" - Consts_SmkcPgUp, "PgUp" - Consts_SmkcPgDn, "PgDn" - Consts_SmkcEnd, "End" - Consts_SmkcHome, "Home" - Consts_SmkcLeft, "Left" - Consts_SHelpButton, "&Help" - Consts_SCloseButton, "&Close" - Consts_SIgnoreButton, "&Ignore" - Consts_SRetryButton, "&Retry" - Consts_SAbortButton, "Abort" - Consts_SAllButton, "&All" - Consts_SCannotDragForm, "Cannot drag a form" - Consts_SMsgDlgWarning, "Warning" - Consts_SMsgDlgError, "Error" - Consts_SMsgDlgInformation, "Information" - Consts_SMsgDlgConfirm, "Confirm" - Consts_SMsgDlgYes, "&Yes" - Consts_SMsgDlgNo, "&No" - Consts_SMsgDlgOK, "OK" - Consts_SMsgDlgCancel, "Cancel" - Consts_SMsgDlgHelp, "&Help" - Consts_SCannotFocus, "Cannot focus a disabled or invisible window" - Consts_SParentRequired, "Control '%s' has no parent window" - Consts_SMDIChildNotVisible, "Cannot hide an MDI Child Form" - Consts_SVisibleChanged, "Cannot change Visible in OnShow or OnHide" - Consts_SCannotShowModal, "Cannot make a visible window modal" - Consts_SMenuIndexError, "Menu index out of range" - Consts_SMenuReinserted, "Menu inserted twice" - Consts_SMenuNotFound, "Sub-menu is not in menu" - Consts_SNoTimers, "Not enough timers available" - Consts_SGroupIndexTooLow, "GroupIndex cannot be less than a previous menu item's GroupIndex" - Consts_SNoMDIForm, "Cannot create form. No MDI forms are currently active" - Consts_SControlParentSetToSelf, "A control cannot have itself as its parent" - Consts_SOKButton, "OK" - Consts_SCancelButton, "Cancel" - Consts_SYesButton, "&Yes" - Consts_SNoButton, "&No" - IdResourceStrings_RSUnevenSizeInEncodeStream, "Uneven size in Encode." - IdResourceStrings_RSURINoProto, "Protocol field is empty" - IdResourceStrings_RSURINoHost, "Host field is empty" - Consts_SInvalidBitmap, "Bitmap image is not valid" - Consts_SInvalidIcon, "Icon image is not valid" - Consts_SChangeIconSize, "Cannot change the size of an icon" - Consts_SUnknownClipboardFormat, "Unsupported clipboard format" - Consts_SOutOfResources, "Out of system resources" - Consts_SNoCanvasHandle, "Canvas does not allow drawing" - Consts_SInvalidImageSize, "Invalid image size" - Consts_SInvalidImageList, "Invalid ImageList" - Consts_SImageIndexError, "Invalid ImageList Index" - Consts_SImageReadFail, "Failed to read ImageList data from stream" - Consts_SImageWriteFail, "Failed to write ImageList data to stream" - Consts_SWindowDCError, "Error creating window device context" - Consts_SWindowClass, "Error creating window class" - IdResourceStrings_RSSocksServerCommandError, "Command not supported." - IdResourceStrings_RSSocksServerAddressError, "Address type not supported." - IdResourceStrings_RSDestinationFileAlreadyExists, "Destination file already exists." - IdResourceStrings_RSSSLAcceptError, "Error accepting connection with SSL." - IdResourceStrings_RSSSLConnectError, "Error connecting with SSL." - IdResourceStrings_RSSSLSettingCipherError, "SetCipher failed." - IdResourceStrings_RSSSLCreatingContextError, "Error creating SSL context." - IdResourceStrings_RSSSLLoadingRootCertError, "Could not load root certificate." - IdResourceStrings_RSSSLLoadingCertError, "Could not load certificate." - IdResourceStrings_RSSSLLoadingKeyError, "Could not load key, check password." - IdResourceStrings_RSSSLGetMethodError, "Error geting SSL method." - IdResourceStrings_RSSSLDataBindingError, "Error binding data to SSL socket." - IdResourceStrings_RSOSSLModeNotSet, "Mode has not been set." - IdResourceStrings_RSOSSLCouldNotLoadSSLLibrary, "Could not load SSL library." - IdResourceStrings_RSOSSLStatusString, "SSL status: \"%s\"" - IdResourceStrings_RSUnevenSizeInDecodeStream, "Uneven size in DecodeToStream." - IdResourceStrings_RSStackEHOSTUNREACH, "No route to host." - IdResourceStrings_RSStackENOTEMPTY, "Directory not empty" - IdResourceStrings_RSStackHOST_NOT_FOUND, "Host not found." - IdResourceStrings_RSSocksRequestFailed, "Request rejected or failed." - IdResourceStrings_RSSocksRequestServerFailed, "Request rejected because SOCKS server cannot connect." - IdResourceStrings_RSSocksRequestIdentFailed, "Request rejected because the client program and identd report different user-ids." - IdResourceStrings_RSSocksUnknownError, "Unknown socks error." - IdResourceStrings_RSSocksServerRespondError, "Socks server did not respond." - IdResourceStrings_RSSocksAuthMethodError, "Invalid socks authentication method." - IdResourceStrings_RSSocksAuthError, "Authentication error to socks server." - IdResourceStrings_RSSocksServerGeneralError, "General SOCKS server failure." - IdResourceStrings_RSSocksServerPermissionError, "Connection not allowed by ruleset." - IdResourceStrings_RSSocksServerNetUnreachableError, "Network unreachable." - IdResourceStrings_RSSocksServerHostUnreachableError, "Host unreachable." - IdResourceStrings_RSSocksServerConnectionRefusedError, "Connection refused." - IdResourceStrings_RSSocksServerTTLExpiredError, "TTL expired." - IdResourceStrings_RSStackEADDRNOTAVAIL, "Cannot assign requested address." - IdResourceStrings_RSStackENETDOWN, "Network is down." - IdResourceStrings_RSStackENETUNREACH, "Network is unreachable." - IdResourceStrings_RSStackENETRESET, "Net dropped connection or reset." - IdResourceStrings_RSStackECONNABORTED, "Software caused connection abort." - IdResourceStrings_RSStackECONNRESET, "Connection reset by peer." - IdResourceStrings_RSStackENOBUFS, "No buffer space available." - IdResourceStrings_RSStackEISCONN, "Socket is already connected." - IdResourceStrings_RSStackENOTCONN, "Socket is not connected." - IdResourceStrings_RSStackESHUTDOWN, "Cannot send or receive after socket is closed." - IdResourceStrings_RSStackETOOMANYREFS, "Too many references, cannot splice." - IdResourceStrings_RSStackETIMEDOUT, "Connection timed out." - IdResourceStrings_RSStackECONNREFUSED, "Connection refused." - IdResourceStrings_RSStackELOOP, "Too many levels of symbolic links." - IdResourceStrings_RSStackENAMETOOLONG, "File name too long." - IdResourceStrings_RSStackEHOSTDOWN, "Host is down." - IdResourceStrings_RSStackEINVAL, "Invalid argument." - IdResourceStrings_RSStackEMFILE, "Too many open files." - IdResourceStrings_RSStackEWOULDBLOCK, "Operation would block. " - IdResourceStrings_RSStackEINPROGRESS, "Operation now in progress." - IdResourceStrings_RSStackEALREADY, "Operation already in progress." - IdResourceStrings_RSStackENOTSOCK, "Socket operation on non-socket." - IdResourceStrings_RSStackEDESTADDRREQ, "Destination address required." - IdResourceStrings_RSStackEMSGSIZE, "Message too long." - IdResourceStrings_RSStackEPROTOTYPE, "Protocol wrong type for socket." - IdResourceStrings_RSStackENOPROTOOPT, "Bad protocol option." - IdResourceStrings_RSStackEPROTONOSUPPORT, "Protocol not supported." - IdResourceStrings_RSStackESOCKTNOSUPPORT, "Socket type not supported." - IdResourceStrings_RSStackEOPNOTSUPP, "Operation not supported on socket." - IdResourceStrings_RSStackEPFNOSUPPORT, "Protocol family not supported." - IdResourceStrings_RSStackEAFNOSUPPORT, "Address family not supported by protocol family." - IdResourceStrings_RSStackEADDRINUSE, "Address already in use." - IdResourceStrings_RSStatusText, "%s" - IdResourceStrings_RSConnectTimeout, "Connect timed out." - IdResourceStrings_RSHTTPChunkStarted, "Chunk Started" - IdResourceStrings_RSHTTPAuthAlreadyRegistered, "This authentication method is already registered with class name %s." - IdResourceStrings_RSFTPUnknownHost, "Unknown" - IdResourceStrings_RSInvalidFTPListingFormat, "Unknown FTP listing format" - IdResourceStrings_RSFTPStatusReady, "Connection established" - IdResourceStrings_RSFTPStatusStartTransfer, "Starting FTP transfer" - IdResourceStrings_RSFTPStatusDoneTransfer, "Transfer complete" - IdResourceStrings_RSFTPStatusAbortTransfer, "Transfer aborted" - IdResourceStrings_RSInvalidServiceName, "%s is not a valid service." - IdResourceStrings_RSStackError, "Socket Error # %d\r\n%s" - IdResourceStrings_RSStackEINTR, "Interrupted system call." - IdResourceStrings_RSStackEBADF, "Bad file number." - IdResourceStrings_RSStackEACCES, "Access denied." - IdResourceStrings_RSStackEFAULT, "Bad address." - IdResourceStrings_RSFileNotFound, "File \"%s\" not found" - IdResourceStrings_RSOnlyOneAntiFreeze, "Only one TIdAntiFreeze can exist per application." - IdResourceStrings_RSIOHandlerPropInvalid, "IOHandler value is not valid" - IdResourceStrings_RSNotConnected, "Not Connected" - IdResourceStrings_RSIdNoDataToRead, "No data to read." - IdResourceStrings_RSCanNotBindRange, "Can not bind in port range (%d - %d)" - IdResourceStrings_RSInvalidPortRange, "Invalid Port Range (%d - %d)" - IdResourceStrings_RSReadTimeout, "Read Timeout" - IdResourceStrings_RSReadLnMaxLineLengthExceeded, "Max line length exceeded." - IdResourceStrings_RSWS2CallError, "Error on call Winsock2 library function %s" - IdResourceStrings_RSWS2LoadError, "Error on loading Winsock2 library (%s)" - IdResourceStrings_RSStatusResolving, "Resolving hostname %s." - IdResourceStrings_RSStatusConnecting, "Connecting to %s." - IdResourceStrings_RSStatusConnected, "Connected." - IdResourceStrings_RSStatusDisconnecting, "Disconnecting." - IdResourceStrings_RSStatusDisconnected, "Disconnected." - RTLConsts_SWriteError, "Stream write error" - RTLConsts_SThreadCreateError, "Thread creation error: %s" - RTLConsts_SThreadError, "Thread Error: %s (%d)" - ComConst_SOleError, "OLE error %.8x" - ComConst_SNoMethod, "Method '%s' not supported by automation object" - ComConst_SVarNotObject, "Variant does not reference an automation object" - ComConst_STooManyParams, "Dispatch methods do not support more than 64 parameters" - ComConst_SDCOMNotInstalled, "DCOM not installed" - IdResourceStrings_RSAlreadyConnected, "Already connected." - IdResourceStrings_RSCannotAllocateSocket, "Cannot allocate socket." - IdResourceStrings_RSConnectionClosedGracefully, "Connection Closed Gracefully." - IdResourceStrings_RSCouldNotBindSocket, "Could not bind socket. Address and port are already in use." - IdResourceStrings_RSFailedTimeZoneInfo, "Failed attempting to retrieve time zone information." - IdResourceStrings_RSNotEnoughDataInBuffer, "Not enough data in buffer." - IdResourceStrings_RSWinsockInitializationError, "Winsock Initialization Error." - IdResourceStrings_RSSetSizeExceeded, "Set Size Exceeded." - RTLConsts_SInvalidName, "''%s'' is not a valid component name" - RTLConsts_SInvalidProperty, "Invalid property value" - RTLConsts_SInvalidPropertyPath, "Invalid property path" - RTLConsts_SInvalidPropertyValue, "Invalid property value" - RTLConsts_SListCapacityError, "List capacity out of bounds (%d)" - RTLConsts_SListCountError, "List count out of bounds (%d)" - RTLConsts_SListIndexError, "List index out of bounds (%d)" - RTLConsts_SMemoryStreamError, "Out of memory while expanding memory stream" - RTLConsts_SPropertyException, "Error reading %s%s%s: %s" - RTLConsts_SReadError, "Stream read error" - RTLConsts_SReadOnlyProperty, "Property is read-only" - RTLConsts_SResNotFound, "Resource %s not found" - RTLConsts_SSeekNotImplemented, "%s.Seek not implemented" - RTLConsts_SSortedListError, "Operation not allowed on sorted list" - RTLConsts_SUnknownGroup, "%s not in a class registration group" - RTLConsts_SUnknownProperty, "Property %s does not exist" - SysConst_SLongDayNameSat, "Saturday" - SysConst_SCannotCreateDir, "Unable to create directory" - RTLConsts_SAncestorNotFound, "Ancestor for '%s' not found" - RTLConsts_SAssignError, "Cannot assign a %s to a %s" - RTLConsts_SBitsIndexError, "Bits index out of range" - RTLConsts_SCantWriteResourceStreamError, "Can't write to a read-only resource stream" - RTLConsts_SCheckSynchronizeError, "CheckSynchronize called from thread $%x, which is NOT the main thread" - RTLConsts_SClassNotFound, "Class %s not found" - RTLConsts_SDuplicateClass, "A class named %s already exists" - RTLConsts_SDuplicateItem, "List does not allow duplicates ($0%x)" - RTLConsts_SDuplicateName, "A component named %s already exists" - RTLConsts_SDuplicateString, "String list does not allow duplicates" - RTLConsts_SFCreateErrorEx, "Cannot create file \"%s\". %s" - RTLConsts_SFOpenErrorEx, "Cannot open file \"%s\". %s" - RTLConsts_SIniFileWriteError, "Unable to write to %s" - RTLConsts_SInvalidImage, "Invalid stream format" - SysConst_SLongMonthNameOct, "October" - SysConst_SLongMonthNameNov, "November" - SysConst_SLongMonthNameDec, "December" - SysConst_SShortDayNameSun, "Sun" - SysConst_SShortDayNameMon, "Mon" - SysConst_SShortDayNameTue, "Tue" - SysConst_SShortDayNameWed, "Wed" - SysConst_SShortDayNameThu, "Thu" - SysConst_SShortDayNameFri, "Fri" - SysConst_SShortDayNameSat, "Sat" - SysConst_SLongDayNameSun, "Sunday" - SysConst_SLongDayNameMon, "Monday" - SysConst_SLongDayNameTue, "Tuesday" - SysConst_SLongDayNameWed, "Wednesday" - SysConst_SLongDayNameThu, "Thursday" - SysConst_SLongDayNameFri, "Friday" - SysConst_SShortMonthNameJun, "Jun" - SysConst_SShortMonthNameJul, "Jul" - SysConst_SShortMonthNameAug, "Aug" - SysConst_SShortMonthNameSep, "Sep" - SysConst_SShortMonthNameOct, "Oct" - SysConst_SShortMonthNameNov, "Nov" - SysConst_SShortMonthNameDec, "Dec" - SysConst_SLongMonthNameJan, "January" - SysConst_SLongMonthNameFeb, "February" - SysConst_SLongMonthNameMar, "March" - SysConst_SLongMonthNameApr, "April" - SysConst_SLongMonthNameMay, "May" - SysConst_SLongMonthNameJun, "June" - SysConst_SLongMonthNameJul, "July" - SysConst_SLongMonthNameAug, "August" - SysConst_SLongMonthNameSep, "September" - SysConst_SVarNotImplemented, "Operation not supported" - SysConst_SVarUnexpected, "Unexpected variant error" - SysConst_SExternalException, "External exception %x" - SysConst_SAssertionFailed, "Assertion failed" - SysConst_SIntfCastError, "Interface not supported" - SysConst_SSafecallException, "Exception in safecall method" - SysConst_SAssertError, "%s (%s, line %d)" - SysConst_SAbstractError, "Abstract Error" - SysConst_SModuleAccessViolation, "Access violation at address %p in module '%s'. %s of address %p" - SysConst_SOSError, "System Error. Code: %d.\r\n%s" - SysConst_SUnkOSError, "A call to an OS function failed" - SysConst_SShortMonthNameJan, "Jan" - SysConst_SShortMonthNameFeb, "Feb" - SysConst_SShortMonthNameMar, "Mar" - SysConst_SShortMonthNameApr, "Apr" - SysConst_SShortMonthNameMay, "May" - SysConst_SInvalidFormat, "Format '%s' invalid or incompatible with argument" - SysConst_SArgumentMissing, "No argument for format '%s'" - SysConst_SDispatchError, "Variant method calls not supported" - SysConst_SReadAccess, "Read" - SysConst_SWriteAccess, "Write" - SysConst_SVarArrayCreate, "Error creating variant or safe array" - SysConst_SVarArrayBounds, "Variant or safe array index out of bounds" - SysConst_SVarArrayLocked, "Variant or safe array is locked" - SysConst_SInvalidVarCast, "Invalid variant type conversion" - SysConst_SInvalidVarOp, "Invalid variant operation" - SysConst_SInvalidVarOpWithHResultWithPrefix, "Invalid variant operation (%s%.8x)\n%s" - SysConst_SVarTypeCouldNotConvert, "Could not convert variant of type (%s) into type (%s)" - SysConst_SVarTypeConvertOverflow, "Overflow while converting variant of type (%s) into type (%s)" - SysConst_SVarOverflow, "Variant overflow" - SysConst_SVarInvalid, "Invalid argument" - SysConst_SVarBadType, "Invalid variant type" - SysConst_SDivByZero, "Division by zero" - SysConst_SRangeError, "Range check error" - SysConst_SIntOverflow, "Integer overflow" - SysConst_SInvalidOp, "Invalid floating point operation" - SysConst_SZeroDivide, "Floating point division by zero" - SysConst_SOverflow, "Floating point overflow" - SysConst_SUnderflow, "Floating point underflow" - SysConst_SInvalidPointer, "Invalid pointer operation" - SysConst_SInvalidCast, "Invalid class typecast" - SysConst_SAccessViolationArg3, "Access violation at address %p. %s of address %p" - SysConst_SAccessViolationNoArg, "Access violation" - SysConst_SStackOverflow, "Stack overflow" - SysConst_SControlC, "Control-C hit" - SysConst_SPrivilege, "Privileged instruction" - SysConst_SException, "Exception %s in module %s at %p.\r\n%s%s\r\n" - SysConst_SExceptTitle, "Application Error" - SysConst_SInvalidInteger, "'%s' is not a valid integer value" - SysConst_SInvalidFloat, "'%s' is not a valid floating point value" - SysConst_SInvalidDate, "'%s' is not a valid date" - SysConst_SInvalidTime, "'%s' is not a valid time" - SysConst_SInvalidDateTime, "'%s' is not a valid date and time" - SysConst_STimeEncodeError, "Invalid argument to time encode" - SysConst_SDateEncodeError, "Invalid argument to date encode" - SysConst_SOutOfMemory, "Out of memory" - SysConst_SInOutError, "I/O error %d" - SysConst_SFileNotFound, "File not found" - SysConst_SInvalidFilename, "Invalid filename" - SysConst_STooManyOpenFiles, "Too many open files" - SysConst_SAccessDenied, "File access denied" - SysConst_SEndOfFile, "Read beyond end of file" - SysConst_SDiskFull, "Disk full" - SysConst_SInvalidInput, "Invalid numeric input" -END - diff --git a/chksis/chksis.dsk b/chksis/chksis.dsk deleted file mode 100755 index f79a156..0000000 --- a/chksis/chksis.dsk +++ /dev/null @@ -1,328 +0,0 @@ -[Closed Files] -File_0=SourceModule,'K:\chksis\main.pas',0,34,24,5,474,1,0 -File_1=SourceModule,'C:\Arquivos de programas\Borland\Delphi7\Source\Rtl\Common\IniFiles.pas',0,1,1,1,1,0,0 -File_2=SourceModule,'K:\chksis\LibXmlParser.pas',0,1,1,1,1,0,0 -File_3=SourceModule,'K:\chkcacic\main.pas',0,1,1,31,4,1,0 -File_4=SourceModule,'C:\arariboia_mod\chkCACIC_mod\xml.pas',0,1,1,1,1,0,0 -File_5=SourceModule,'C:\arariboia_mod\chkCACIC_mod\LibXmlParser.pas',0,1,1,1,1,0,0 -File_6=SourceModule,'C:\DOCUME~1\D306851\CONFIG~1\TEMP\IdNetworkCalculator.pas',0,1,55,1,1,0,0 -File_7=SourceModule,'C:\arariboia\chkCACIC\main.pas',0,1,344,5,371,1,0 -File_8=SourceModule,'C:\arariboia\chkCACIC\main.dfm',0,1,1,1,1,0,0 - -[Modules] -Module0=K:\chksis\chksis.dpr -Count=1 -EditWindowCount=1 - -[K:\chksis\chksis.dpr] -ModuleType=SourceModule -FormState=0 -FormOnTop=0 - -[C:\Arquivos de programas\Borland\Delphi7\Projects\ProjectGroup1.bpg] -FormState=0 -FormOnTop=0 - -[EditWindow0] -ViewCount=1 -CurrentView=0 -View0=0 -CodeExplorer=CodeExplorer@EditWindow0 -MessageView=MessageView@EditWindow0 -Create=1 -Visible=1 -State=2 -Left=247 -Top=125 -Width=777 -Height=475 -MaxLeft=-4 -MaxTop=100 -MaxWidth=1032 -MaxHeight=644 -ClientWidth=1024 -ClientHeight=617 -LeftPanelSize=0 -LeftPanelClients=CodeExplorer@EditWindow0 -LeftPanelData=00000400010000000C000000436F64654578706C6F726572000000000000000000000000000000000001000000000000000000000000FFFFFFFF -RightPanelSize=0 -BottomPanelSize=85 -BottomPanelClients=MessageView@EditWindow0 -BottomPanelData=000004000000000000000000000000000000000000000000000100000000000000000B0000004D65737361676556696577FFFFFFFF - -[View0] -Module=K:\chksis\chksis.dpr -CursorX=1 -CursorY=711 -TopLine=672 -LeftCol=1 - -[Watches] -Count=0 - -[WatchWindow] -WatchColumnWidth=100 -WatchShowColumnHeaders=1 -Create=1 -Visible=0 -State=0 -Left=299 -Top=305 -Width=426 -Height=157 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=418 -ClientHeight=133 -TBDockHeight=157 -LRDockWidth=426 -Dockable=1 - -[Breakpoints] -Count=0 - -[AddressBreakpoints] -Count=0 - -[Main Window] -Create=1 -Visible=1 -State=2 -Left=0 -Top=91 -Width=800 -Height=105 -MaxLeft=-1 -MaxTop=-1 -MaxWidth=808 -MaxHeight=105 -ClientWidth=800 -ClientHeight=78 - -[ProjectManager] -Create=1 -Visible=0 -State=0 -Left=369 -Top=372 -Width=438 -Height=303 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=430 -ClientHeight=279 -TBDockHeight=303 -LRDockWidth=438 -Dockable=1 - -[Components] -Left=240 -Top=237 -Width=183 -Height=233 -Create=1 -Visible=0 -State=0 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=175 -ClientHeight=209 -TBDockHeight=233 -LRDockWidth=183 -Dockable=1 - -[CPUWindow] -Create=1 -Visible=0 -State=0 -Left=85 -Top=7 -Width=715 -Height=565 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=707 -ClientHeight=538 -DumpPane=79 -DisassemblyPane=187 -RegisterPane=231 -FlagPane=64 - -[AlignmentPalette] -Create=1 -Visible=0 -State=0 -Left=200 -Top=107 -Width=156 -Height=82 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=150 -ClientHeight=60 - -[PropertyInspector] -Create=1 -Visible=1 -State=0 -Left=7 -Top=147 -Width=230 -Height=285 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=222 -ClientHeight=261 -TBDockHeight=285 -LRDockWidth=190 -Dockable=1 -SplitPos=109 -ArrangeBy=Name -SelectedItem= -ExpandedItems=Network,Network.TCPIP,Network.WinSock,NetworkAddress,NetworkMask -HiddenCategories= - -[CallStackWindow] -Create=1 -Visible=0 -State=0 -Left=253 -Top=219 -Width=294 -Height=161 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=286 -ClientHeight=137 -TBDockHeight=161 -LRDockWidth=294 -Dockable=1 - -[ObjectTree] -Create=1 -Visible=1 -State=0 -Left=0 -Top=105 -Width=190 -Height=186 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=182 -ClientHeight=162 -TBDockHeight=186 -LRDockWidth=190 -Dockable=1 - -[LocalVarsWindow] -Create=1 -Visible=0 -State=0 -Left=273 -Top=197 -Width=421 -Height=189 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=413 -ClientHeight=165 -TBDockHeight=189 -LRDockWidth=421 -Dockable=1 - -[ToDo List] -Create=1 -Visible=0 -State=0 -Left=202 -Top=155 -Width=470 -Height=250 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=462 -ClientHeight=226 -TBDockHeight=250 -LRDockWidth=470 -Dockable=1 -Column0Width=200 -Column1Width=30 -Column2Width=100 -Column3Width=70 -Column4Width=70 -SortOrder=4 -ShowHints=1 -ShowChecked=1 - -[ModuleWindow] -Create=1 -Visible=0 -State=0 -Left=-12 -Top=227 -Width=638 -Height=355 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=630 -ClientHeight=331 -TBDockHeight=355 -LRDockWidth=638 -Dockable=1 -Column0Width=125 -Column1Width=100 -Column2Width=155 -EntryPointPane=225 -CompUnitPane=104 - -[MessageHintFrm] -Create=1 -Visible=0 -State=0 -Left=305 -Top=184 -Width=383 -Height=195 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=375 -ClientHeight=171 -TBDockHeight=195 -LRDockWidth=383 -Dockable=1 - -[CodeExplorer@EditWindow0] -Create=1 -Visible=0 -State=0 -Left=0 -Top=12 -Width=140 -Height=352 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=140 -ClientHeight=352 -TBDockHeight=305 -LRDockWidth=140 -Dockable=1 - -[MessageView@EditWindow0] -Create=1 -Visible=1 -State=0 -Left=12 -Top=0 -Width=788 -Height=85 -MaxLeft=-1 -MaxTop=-1 -ClientWidth=788 -ClientHeight=85 -TBDockHeight=85 -LRDockWidth=443 -Dockable=1 - -[DockHosts] -DockHostCount=0 - diff --git a/chksis/chksis.identcache b/chksis/chksis.identcache deleted file mode 100755 index c5bef97..0000000 Binary files a/chksis/chksis.identcache and /dev/null differ diff --git a/chksis/chksis.res b/chksis/chksis.res index 00525a7..1eb25bf 100755 Binary files a/chksis/chksis.res and b/chksis/chksis.res differ diff --git a/gercols/gercols.cfg b/gercols/gercols.cfg deleted file mode 100644 index c62bff8..0000000 --- a/gercols/gercols.cfg +++ /dev/null @@ -1,41 +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+ --$Y+ --$Z1 --GD --cg --AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; --H+ --W+ --M --$M16384,1048576 --K$00400000 --E"C:\agentes_Windows_BINARIOS" --LE"c:\program files (x86)\borland\delphi7\Projects\Bpl" --LN"c:\program files (x86)\borland\delphi7\Projects\Bpl" --U"C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\agentes_Windows;C:\vendors_lib\TRegExpr\Source;C:\vendors_lib\MagWMI" --O"C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\agentes_Windows;C:\vendors_lib\TRegExpr\Source;C:\vendors_lib\MagWMI" --I"C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\agentes_Windows;C:\vendors_lib\TRegExpr\Source;C:\vendors_lib\MagWMI" --R"C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\agentes_Windows;C:\vendors_lib\TRegExpr\Source;C:\vendors_lib\MagWMI" diff --git a/gercols/gercols.dproj b/gercols/gercols.dproj new file mode 100644 index 0000000..91cdb46 --- /dev/null +++ b/gercols/gercols.dproj @@ -0,0 +1,53 @@ + + + + {99cd351b-5091-4488-bdd7-e1863799b467} + gercols.dpr + Release + AnyCPU + DCC32 + ..\..\Agentes_Windows_BINARIOS\gercols.exe + + + 7.0 + False + False + False + 0 + C:\devel\cacic\Agentes_Windows_BINARIOS + DEBUG + True + True + True + + + 7.0 + False + 2 + C:\devel\cacic\Agentes_Windows_BINARIOS + C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\agentes_Windows;C:\vendors_lib\TRegExpr\Source;C:\vendors_lib\MagWMI + C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\agentes_Windows;C:\vendors_lib\TRegExpr\Source;C:\vendors_lib\MagWMI + C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\agentes_Windows;C:\vendors_lib\TRegExpr\Source;C:\vendors_lib\MagWMI + C:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib;C:\agentes_Windows;C:\vendors_lib\TRegExpr\Source;C:\vendors_lib\MagWMI + DEBUG + True + True + True + + + Delphi.Personality + VCLApplication + +C:\vendors_lib\JVCL345CompleteJCL231-Build4197\jcl\lib\d7\debugFalseTrueFalseTrueFalse2801212FalseFalseFalseFalseFalse10461252Dataprev-Emp. de TI da Prev Social - URES/SESSSistema CACIC - Módulo Gerente de Coletas2.8.0.1212Ger_COLS3.0Licença: GNU/LGPLgercols.dpr + + + + + MainSource + + + + + + + \ No newline at end of file diff --git a/gercols/gercols.drc b/gercols/gercols.drc deleted file mode 100644 index 2e47df6..0000000 --- a/gercols/gercols.drc +++ /dev/null @@ -1,992 +0,0 @@ -/* VER150 - Generated by the Borland Delphi Pascal Compiler - because -GD or --drc was supplied to the compiler. - - This file contains compiler-generated resources that - were bound to the executable. - If this file is empty, then no compiler-generated - resources were bound to the produced executable. -*/ - -#define ExtCtrls_clNameMenuText 65040 -#define ExtCtrls_clNameNone 65041 -#define ExtCtrls_clNameScrollBar 65042 -#define ExtCtrls_clName3DDkShadow 65043 -#define ExtCtrls_clName3DLight 65044 -#define ExtCtrls_clNameWindow 65045 -#define ExtCtrls_clNameWindowFrame 65046 -#define ExtCtrls_clNameWindowText 65047 -#define WinHelpViewer_hNoKeyword 65048 -#define ExtCtrls_clNameBackground 65056 -#define ExtCtrls_clNameBtnFace 65057 -#define ExtCtrls_clNameBtnHighlight 65058 -#define ExtCtrls_clNameBtnShadow 65059 -#define ExtCtrls_clNameBtnText 65060 -#define ExtCtrls_clNameCaptionText 65061 -#define ExtCtrls_clNameDefault 65062 -#define ExtCtrls_clNameGrayText 65063 -#define ExtCtrls_clNameHighlight 65064 -#define ExtCtrls_clNameHighlightText 65065 -#define ExtCtrls_clNameInactiveBorder 65066 -#define ExtCtrls_clNameInactiveCaption 65067 -#define ExtCtrls_clNameInactiveCaptionText 65068 -#define ExtCtrls_clNameInfoBk 65069 -#define ExtCtrls_clNameInfoText 65070 -#define ExtCtrls_clNameMenu 65071 -#define ExtCtrls_clNameGray 65072 -#define ExtCtrls_clNameSilver 65073 -#define ExtCtrls_clNameRed 65074 -#define ExtCtrls_clNameLime 65075 -#define ExtCtrls_clNameYellow 65076 -#define ExtCtrls_clNameBlue 65077 -#define ExtCtrls_clNameFuchsia 65078 -#define ExtCtrls_clNameAqua 65079 -#define ExtCtrls_clNameWhite 65080 -#define ExtCtrls_clNameMoneyGreen 65081 -#define ExtCtrls_clNameSkyBlue 65082 -#define ExtCtrls_clNameCream 65083 -#define ExtCtrls_clNameMedGray 65084 -#define ExtCtrls_clNameActiveBorder 65085 -#define ExtCtrls_clNameActiveCaption 65086 -#define ExtCtrls_clNameAppWorkSpace 65087 -#define Consts_SDockedCtlNeedsName 65088 -#define Consts_SDockTreeRemoveError 65089 -#define Consts_SDockZoneNotFound 65090 -#define Consts_SDockZoneHasNoCtl 65091 -#define OleConst_sNoRunningObject 65092 -#define HelpIntfs_hNoTableOfContents 65093 -#define HelpIntfs_hNothingFound 65094 -#define HelpIntfs_hNoContext 65095 -#define HelpIntfs_hNoTopics 65096 -#define ExtCtrls_clNameBlack 65097 -#define ExtCtrls_clNameMaroon 65098 -#define ExtCtrls_clNameGreen 65099 -#define ExtCtrls_clNameOlive 65100 -#define ExtCtrls_clNameNavy 65101 -#define ExtCtrls_clNamePurple 65102 -#define ExtCtrls_clNameTeal 65103 -#define Consts_SmkcSpace 65104 -#define Consts_SmkcPgUp 65105 -#define Consts_SmkcPgDn 65106 -#define Consts_SmkcEnd 65107 -#define Consts_SmkcHome 65108 -#define Consts_SmkcLeft 65109 -#define Consts_SmkcUp 65110 -#define Consts_SmkcRight 65111 -#define Consts_SmkcDown 65112 -#define Consts_SmkcIns 65113 -#define Consts_SmkcDel 65114 -#define Consts_SmkcShift 65115 -#define Consts_SmkcCtrl 65116 -#define Consts_SmkcAlt 65117 -#define Consts_SIconToClipboard 65118 -#define Consts_SDuplicateMenus 65119 -#define Consts_SMsgDlgConfirm 65120 -#define Consts_SMsgDlgYes 65121 -#define Consts_SMsgDlgNo 65122 -#define Consts_SMsgDlgOK 65123 -#define Consts_SMsgDlgCancel 65124 -#define Consts_SMsgDlgHelp 65125 -#define Consts_SMsgDlgAbort 65126 -#define Consts_SMsgDlgRetry 65127 -#define Consts_SMsgDlgIgnore 65128 -#define Consts_SMsgDlgAll 65129 -#define Consts_SMsgDlgNoToAll 65130 -#define Consts_SMsgDlgYesToAll 65131 -#define Consts_SmkcBkSp 65132 -#define Consts_SmkcTab 65133 -#define Consts_SmkcEsc 65134 -#define Consts_SmkcEnter 65135 -#define Consts_SNoMDIForm 65136 -#define Consts_SControlParentSetToSelf 65137 -#define Consts_SOKButton 65138 -#define Consts_SCancelButton 65139 -#define Consts_SYesButton 65140 -#define Consts_SNoButton 65141 -#define Consts_SHelpButton 65142 -#define Consts_SCloseButton 65143 -#define Consts_SIgnoreButton 65144 -#define Consts_SRetryButton 65145 -#define Consts_SAbortButton 65146 -#define Consts_SAllButton 65147 -#define Consts_SCannotDragForm 65148 -#define Consts_SMsgDlgWarning 65149 -#define Consts_SMsgDlgError 65150 -#define Consts_SMsgDlgInformation 65151 -#define Consts_SInvalidImageList 65152 -#define Consts_SImageIndexError 65153 -#define Consts_SImageReadFail 65154 -#define Consts_SImageWriteFail 65155 -#define Consts_SWindowDCError 65156 -#define Consts_SWindowClass 65157 -#define Consts_SCannotFocus 65158 -#define Consts_SParentRequired 65159 -#define Consts_SMDIChildNotVisible 65160 -#define Consts_SVisibleChanged 65161 -#define Consts_SCannotShowModal 65162 -#define Consts_SMenuIndexError 65163 -#define Consts_SMenuReinserted 65164 -#define Consts_SMenuNotFound 65165 -#define Consts_SNoTimers 65166 -#define Consts_SGroupIndexTooLow 65167 -#define IdResourceStrings_RSSSLGetMethodError 65168 -#define IdResourceStrings_RSSSLDataBindingError 65169 -#define IdResourceStrings_RSOSSLModeNotSet 65170 -#define IdResourceStrings_RSOSSLCouldNotLoadSSLLibrary 65171 -#define IdResourceStrings_RSOSSLStatusString 65172 -#define IdResourceStrings_RSUnevenSizeInDecodeStream 65173 -#define IdResourceStrings_RSUnevenSizeInEncodeStream 65174 -#define IdResourceStrings_RSURINoProto 65175 -#define IdResourceStrings_RSURINoHost 65176 -#define Consts_SInvalidBitmap 65177 -#define Consts_SInvalidIcon 65178 -#define Consts_SChangeIconSize 65179 -#define Consts_SUnknownClipboardFormat 65180 -#define Consts_SOutOfResources 65181 -#define Consts_SNoCanvasHandle 65182 -#define Consts_SInvalidImageSize 65183 -#define IdResourceStrings_RSSocksServerGeneralError 65184 -#define IdResourceStrings_RSSocksServerPermissionError 65185 -#define IdResourceStrings_RSSocksServerNetUnreachableError 65186 -#define IdResourceStrings_RSSocksServerHostUnreachableError 65187 -#define IdResourceStrings_RSSocksServerConnectionRefusedError 65188 -#define IdResourceStrings_RSSocksServerTTLExpiredError 65189 -#define IdResourceStrings_RSSocksServerCommandError 65190 -#define IdResourceStrings_RSSocksServerAddressError 65191 -#define IdResourceStrings_RSDestinationFileAlreadyExists 65192 -#define IdResourceStrings_RSSSLAcceptError 65193 -#define IdResourceStrings_RSSSLConnectError 65194 -#define IdResourceStrings_RSSSLSettingCipherError 65195 -#define IdResourceStrings_RSSSLCreatingContextError 65196 -#define IdResourceStrings_RSSSLLoadingRootCertError 65197 -#define IdResourceStrings_RSSSLLoadingCertError 65198 -#define IdResourceStrings_RSSSLLoadingKeyError 65199 -#define IdResourceStrings_RSStackETOOMANYREFS 65200 -#define IdResourceStrings_RSStackETIMEDOUT 65201 -#define IdResourceStrings_RSStackECONNREFUSED 65202 -#define IdResourceStrings_RSStackELOOP 65203 -#define IdResourceStrings_RSStackENAMETOOLONG 65204 -#define IdResourceStrings_RSStackEHOSTDOWN 65205 -#define IdResourceStrings_RSStackEHOSTUNREACH 65206 -#define IdResourceStrings_RSStackENOTEMPTY 65207 -#define IdResourceStrings_RSStackHOST_NOT_FOUND 65208 -#define IdResourceStrings_RSSocksRequestFailed 65209 -#define IdResourceStrings_RSSocksRequestServerFailed 65210 -#define IdResourceStrings_RSSocksRequestIdentFailed 65211 -#define IdResourceStrings_RSSocksUnknownError 65212 -#define IdResourceStrings_RSSocksServerRespondError 65213 -#define IdResourceStrings_RSSocksAuthMethodError 65214 -#define IdResourceStrings_RSSocksAuthError 65215 -#define IdResourceStrings_RSStackEPROTONOSUPPORT 65216 -#define IdResourceStrings_RSStackESOCKTNOSUPPORT 65217 -#define IdResourceStrings_RSStackEOPNOTSUPP 65218 -#define IdResourceStrings_RSStackEPFNOSUPPORT 65219 -#define IdResourceStrings_RSStackEAFNOSUPPORT 65220 -#define IdResourceStrings_RSStackEADDRINUSE 65221 -#define IdResourceStrings_RSStackEADDRNOTAVAIL 65222 -#define IdResourceStrings_RSStackENETDOWN 65223 -#define IdResourceStrings_RSStackENETUNREACH 65224 -#define IdResourceStrings_RSStackENETRESET 65225 -#define IdResourceStrings_RSStackECONNABORTED 65226 -#define IdResourceStrings_RSStackECONNRESET 65227 -#define IdResourceStrings_RSStackENOBUFS 65228 -#define IdResourceStrings_RSStackEISCONN 65229 -#define IdResourceStrings_RSStackENOTCONN 65230 -#define IdResourceStrings_RSStackESHUTDOWN 65231 -#define IdResourceStrings_RSInvalidServiceName 65232 -#define IdResourceStrings_RSStackError 65233 -#define IdResourceStrings_RSStackEINTR 65234 -#define IdResourceStrings_RSStackEBADF 65235 -#define IdResourceStrings_RSStackEACCES 65236 -#define IdResourceStrings_RSStackEFAULT 65237 -#define IdResourceStrings_RSStackEINVAL 65238 -#define IdResourceStrings_RSStackEMFILE 65239 -#define IdResourceStrings_RSStackEWOULDBLOCK 65240 -#define IdResourceStrings_RSStackEINPROGRESS 65241 -#define IdResourceStrings_RSStackEALREADY 65242 -#define IdResourceStrings_RSStackENOTSOCK 65243 -#define IdResourceStrings_RSStackEDESTADDRREQ 65244 -#define IdResourceStrings_RSStackEMSGSIZE 65245 -#define IdResourceStrings_RSStackEPROTOTYPE 65246 -#define IdResourceStrings_RSStackENOPROTOOPT 65247 -#define IdResourceStrings_RSWS2LoadError 65248 -#define IdResourceStrings_RSStatusResolving 65249 -#define IdResourceStrings_RSStatusConnecting 65250 -#define IdResourceStrings_RSStatusConnected 65251 -#define IdResourceStrings_RSStatusDisconnecting 65252 -#define IdResourceStrings_RSStatusDisconnected 65253 -#define IdResourceStrings_RSStatusText 65254 -#define IdResourceStrings_RSConnectTimeout 65255 -#define IdResourceStrings_RSHTTPChunkStarted 65256 -#define IdResourceStrings_RSHTTPAuthAlreadyRegistered 65257 -#define IdResourceStrings_RSFTPUnknownHost 65258 -#define IdResourceStrings_RSInvalidFTPListingFormat 65259 -#define IdResourceStrings_RSFTPStatusReady 65260 -#define IdResourceStrings_RSFTPStatusStartTransfer 65261 -#define IdResourceStrings_RSFTPStatusDoneTransfer 65262 -#define IdResourceStrings_RSFTPStatusAbortTransfer 65263 -#define IdResourceStrings_RSConnectionClosedGracefully 65264 -#define IdResourceStrings_RSCouldNotBindSocket 65265 -#define IdResourceStrings_RSFailedTimeZoneInfo 65266 -#define IdResourceStrings_RSNotEnoughDataInBuffer 65267 -#define IdResourceStrings_RSWinsockInitializationError 65268 -#define IdResourceStrings_RSSetSizeExceeded 65269 -#define IdResourceStrings_RSFileNotFound 65270 -#define IdResourceStrings_RSOnlyOneAntiFreeze 65271 -#define IdResourceStrings_RSIOHandlerPropInvalid 65272 -#define IdResourceStrings_RSNotConnected 65273 -#define IdResourceStrings_RSIdNoDataToRead 65274 -#define IdResourceStrings_RSCanNotBindRange 65275 -#define IdResourceStrings_RSInvalidPortRange 65276 -#define IdResourceStrings_RSReadTimeout 65277 -#define IdResourceStrings_RSReadLnMaxLineLengthExceeded 65278 -#define IdResourceStrings_RSWS2CallError 65279 -#define JclResources_RsIntelCacheDescrEA 65280 -#define JclResources_RsIntelCacheDescrEB 65281 -#define JclResources_RsIntelCacheDescrEC 65282 -#define JclResources_RsIntelCacheDescrF0 65283 -#define JclResources_RsIntelCacheDescrF1 65284 -#define JclResources_RsIntelCacheDescrFF 65285 -#define JclResources_RsInvalidMMFName 65286 -#define JclResources_RsInvalidMMFEmpty 65287 -#define JclResources_RsWin32Error 65288 -#define ComConst_SOleError 65289 -#define ComConst_SNoMethod 65290 -#define ComConst_SVarNotObject 65291 -#define ComConst_STooManyParams 65292 -#define ComConst_SDCOMNotInstalled 65293 -#define IdResourceStrings_RSAlreadyConnected 65294 -#define IdResourceStrings_RSCannotAllocateSocket 65295 -#define JclResources_RsIntelCacheDescrB4 65296 -#define JclResources_RsIntelCacheDescrBA 65297 -#define JclResources_RsIntelCacheDescrC0 65298 -#define JclResources_RsIntelCacheDescrCA 65299 -#define JclResources_RsIntelCacheDescrD0 65300 -#define JclResources_RsIntelCacheDescrD1 65301 -#define JclResources_RsIntelCacheDescrD2 65302 -#define JclResources_RsIntelCacheDescrD6 65303 -#define JclResources_RsIntelCacheDescrD7 65304 -#define JclResources_RsIntelCacheDescrD8 65305 -#define JclResources_RsIntelCacheDescrDC 65306 -#define JclResources_RsIntelCacheDescrDD 65307 -#define JclResources_RsIntelCacheDescrDE 65308 -#define JclResources_RsIntelCacheDescrE2 65309 -#define JclResources_RsIntelCacheDescrE3 65310 -#define JclResources_RsIntelCacheDescrE4 65311 -#define JclResources_RsIntelCacheDescr7A 65312 -#define JclResources_RsIntelCacheDescr7B 65313 -#define JclResources_RsIntelCacheDescr7C 65314 -#define JclResources_RsIntelCacheDescr7D 65315 -#define JclResources_RsIntelCacheDescr7F 65316 -#define JclResources_RsIntelCacheDescr80 65317 -#define JclResources_RsIntelCacheDescr82 65318 -#define JclResources_RsIntelCacheDescr83 65319 -#define JclResources_RsIntelCacheDescr84 65320 -#define JclResources_RsIntelCacheDescr85 65321 -#define JclResources_RsIntelCacheDescr86 65322 -#define JclResources_RsIntelCacheDescr87 65323 -#define JclResources_RsIntelCacheDescrB0 65324 -#define JclResources_RsIntelCacheDescrB1 65325 -#define JclResources_RsIntelCacheDescrB2 65326 -#define JclResources_RsIntelCacheDescrB3 65327 -#define JclResources_RsIntelCacheDescr59 65328 -#define JclResources_RsIntelCacheDescr5A 65329 -#define JclResources_RsIntelCacheDescr5B 65330 -#define JclResources_RsIntelCacheDescr5C 65331 -#define JclResources_RsIntelCacheDescr5D 65332 -#define JclResources_RsIntelCacheDescr60 65333 -#define JclResources_RsIntelCacheDescr66 65334 -#define JclResources_RsIntelCacheDescr67 65335 -#define JclResources_RsIntelCacheDescr68 65336 -#define JclResources_RsIntelCacheDescr70 65337 -#define JclResources_RsIntelCacheDescr71 65338 -#define JclResources_RsIntelCacheDescr72 65339 -#define JclResources_RsIntelCacheDescr73 65340 -#define JclResources_RsIntelCacheDescr76 65341 -#define JclResources_RsIntelCacheDescr78 65342 -#define JclResources_RsIntelCacheDescr79 65343 -#define JclResources_RsIntelCacheDescr46 65344 -#define JclResources_RsIntelCacheDescr47 65345 -#define JclResources_RsIntelCacheDescr48 65346 -#define JclResources_RsIntelCacheDescr49 65347 -#define JclResources_RsIntelCacheDescr4A 65348 -#define JclResources_RsIntelCacheDescr4B 65349 -#define JclResources_RsIntelCacheDescr4C 65350 -#define JclResources_RsIntelCacheDescr4D 65351 -#define JclResources_RsIntelCacheDescr4E 65352 -#define JclResources_RsIntelCacheDescr4F 65353 -#define JclResources_RsIntelCacheDescr50 65354 -#define JclResources_RsIntelCacheDescr51 65355 -#define JclResources_RsIntelCacheDescr52 65356 -#define JclResources_RsIntelCacheDescr55 65357 -#define JclResources_RsIntelCacheDescr56 65358 -#define JclResources_RsIntelCacheDescr57 65359 -#define JclResources_RsIntelCacheDescr25 65360 -#define JclResources_RsIntelCacheDescr29 65361 -#define JclResources_RsIntelCacheDescr2C 65362 -#define JclResources_RsIntelCacheDescr30 65363 -#define JclResources_RsIntelCacheDescr39 65364 -#define JclResources_RsIntelCacheDescr3A 65365 -#define JclResources_RsIntelCacheDescr3B 65366 -#define JclResources_RsIntelCacheDescr3C 65367 -#define JclResources_RsIntelCacheDescr3D 65368 -#define JclResources_RsIntelCacheDescr3E 65369 -#define JclResources_RsIntelCacheDescr40 65370 -#define JclResources_RsIntelCacheDescr41 65371 -#define JclResources_RsIntelCacheDescr42 65372 -#define JclResources_RsIntelCacheDescr43 65373 -#define JclResources_RsIntelCacheDescr44 65374 -#define JclResources_RsIntelCacheDescr45 65375 -#define JclResources_RsIntelCacheDescr01 65376 -#define JclResources_RsIntelCacheDescr02 65377 -#define JclResources_RsIntelCacheDescr03 65378 -#define JclResources_RsIntelCacheDescr04 65379 -#define JclResources_RsIntelCacheDescr05 65380 -#define JclResources_RsIntelCacheDescr06 65381 -#define JclResources_RsIntelCacheDescr08 65382 -#define JclResources_RsIntelCacheDescr09 65383 -#define JclResources_RsIntelCacheDescr0A 65384 -#define JclResources_RsIntelCacheDescr0B 65385 -#define JclResources_RsIntelCacheDescr0C 65386 -#define JclResources_RsIntelCacheDescr0D 65387 -#define JclResources_RsIntelCacheDescr0E 65388 -#define JclResources_RsIntelCacheDescr21 65389 -#define JclResources_RsIntelCacheDescr22 65390 -#define JclResources_RsIntelCacheDescr23 65391 -#define RTLConsts_SSortedListError 65392 -#define RTLConsts_SUnknownGroup 65393 -#define RTLConsts_SUnknownProperty 65394 -#define RTLConsts_SWriteError 65395 -#define RTLConsts_SThreadCreateError 65396 -#define RTLConsts_SThreadError 65397 -#define JclResources_RsEReplacementChar 65398 -#define JclResources_RsCannotCreateDir 65399 -#define JclResources_RsFileUtilsNoVersionInfo 65400 -#define JclResources_RsFileUtilsFileDoesNotExist 65401 -#define JclResources_RsUnableToOpenKeyRead 65402 -#define JclResources_RsUnableToAccessValue 65403 -#define JclResources_RsWrongDataType 65404 -#define JclResources_RsInconsistentPath 65405 -#define JclResources_RsSynchCreateMutex 65406 -#define JclResources_RsIntelCacheDescr00 65407 -#define RTLConsts_SInvalidImage 65408 -#define RTLConsts_SInvalidName 65409 -#define RTLConsts_SInvalidProperty 65410 -#define RTLConsts_SInvalidPropertyPath 65411 -#define RTLConsts_SInvalidPropertyValue 65412 -#define RTLConsts_SInvalidRegType 65413 -#define RTLConsts_SListCapacityError 65414 -#define RTLConsts_SListCountError 65415 -#define RTLConsts_SListIndexError 65416 -#define RTLConsts_SMemoryStreamError 65417 -#define RTLConsts_SPropertyException 65418 -#define RTLConsts_SReadError 65419 -#define RTLConsts_SReadOnlyProperty 65420 -#define RTLConsts_SRegGetDataFailed 65421 -#define RTLConsts_SResNotFound 65422 -#define RTLConsts_SSeekNotImplemented 65423 -#define SysConst_SLongDayNameFri 65424 -#define SysConst_SLongDayNameSat 65425 -#define SysConst_SCannotCreateDir 65426 -#define RTLConsts_SAncestorNotFound 65427 -#define RTLConsts_SAssignError 65428 -#define RTLConsts_SBitsIndexError 65429 -#define RTLConsts_SCantWriteResourceStreamError 65430 -#define RTLConsts_SCheckSynchronizeError 65431 -#define RTLConsts_SClassNotFound 65432 -#define RTLConsts_SDuplicateClass 65433 -#define RTLConsts_SDuplicateItem 65434 -#define RTLConsts_SDuplicateName 65435 -#define RTLConsts_SDuplicateString 65436 -#define RTLConsts_SFCreateErrorEx 65437 -#define RTLConsts_SFOpenErrorEx 65438 -#define RTLConsts_SIniFileWriteError 65439 -#define SysConst_SLongMonthNameSep 65440 -#define SysConst_SLongMonthNameOct 65441 -#define SysConst_SLongMonthNameNov 65442 -#define SysConst_SLongMonthNameDec 65443 -#define SysConst_SShortDayNameSun 65444 -#define SysConst_SShortDayNameMon 65445 -#define SysConst_SShortDayNameTue 65446 -#define SysConst_SShortDayNameWed 65447 -#define SysConst_SShortDayNameThu 65448 -#define SysConst_SShortDayNameFri 65449 -#define SysConst_SShortDayNameSat 65450 -#define SysConst_SLongDayNameSun 65451 -#define SysConst_SLongDayNameMon 65452 -#define SysConst_SLongDayNameTue 65453 -#define SysConst_SLongDayNameWed 65454 -#define SysConst_SLongDayNameThu 65455 -#define SysConst_SShortMonthNameMay 65456 -#define SysConst_SShortMonthNameJun 65457 -#define SysConst_SShortMonthNameJul 65458 -#define SysConst_SShortMonthNameAug 65459 -#define SysConst_SShortMonthNameSep 65460 -#define SysConst_SShortMonthNameOct 65461 -#define SysConst_SShortMonthNameNov 65462 -#define SysConst_SShortMonthNameDec 65463 -#define SysConst_SLongMonthNameJan 65464 -#define SysConst_SLongMonthNameFeb 65465 -#define SysConst_SLongMonthNameMar 65466 -#define SysConst_SLongMonthNameApr 65467 -#define SysConst_SLongMonthNameMay 65468 -#define SysConst_SLongMonthNameJun 65469 -#define SysConst_SLongMonthNameJul 65470 -#define SysConst_SLongMonthNameAug 65471 -#define SysConst_SVarBadType 65472 -#define SysConst_SVarNotImplemented 65473 -#define SysConst_SVarUnexpected 65474 -#define SysConst_SExternalException 65475 -#define SysConst_SAssertionFailed 65476 -#define SysConst_SIntfCastError 65477 -#define SysConst_SSafecallException 65478 -#define SysConst_SAssertError 65479 -#define SysConst_SAbstractError 65480 -#define SysConst_SModuleAccessViolation 65481 -#define SysConst_SOSError 65482 -#define SysConst_SUnkOSError 65483 -#define SysConst_SShortMonthNameJan 65484 -#define SysConst_SShortMonthNameFeb 65485 -#define SysConst_SShortMonthNameMar 65486 -#define SysConst_SShortMonthNameApr 65487 -#define SysConst_SInvalidFormat 65488 -#define SysConst_SArgumentMissing 65489 -#define SysConst_SDispatchError 65490 -#define SysConst_SReadAccess 65491 -#define SysConst_SWriteAccess 65492 -#define SysConst_SFormatTooLong 65493 -#define SysConst_SVarArrayCreate 65494 -#define SysConst_SVarArrayBounds 65495 -#define SysConst_SVarArrayLocked 65496 -#define SysConst_SInvalidVarCast 65497 -#define SysConst_SInvalidVarOp 65498 -#define SysConst_SInvalidVarOpWithHResultWithPrefix 65499 -#define SysConst_SVarTypeCouldNotConvert 65500 -#define SysConst_SVarTypeConvertOverflow 65501 -#define SysConst_SVarOverflow 65502 -#define SysConst_SVarInvalid 65503 -#define SysConst_SDivByZero 65504 -#define SysConst_SRangeError 65505 -#define SysConst_SIntOverflow 65506 -#define SysConst_SInvalidOp 65507 -#define SysConst_SZeroDivide 65508 -#define SysConst_SOverflow 65509 -#define SysConst_SUnderflow 65510 -#define SysConst_SInvalidPointer 65511 -#define SysConst_SInvalidCast 65512 -#define SysConst_SAccessViolationArg3 65513 -#define SysConst_SAccessViolationNoArg 65514 -#define SysConst_SStackOverflow 65515 -#define SysConst_SControlC 65516 -#define SysConst_SPrivilege 65517 -#define SysConst_SException 65518 -#define SysConst_SExceptTitle 65519 -#define SysConst_SInvalidInteger 65520 -#define SysConst_SInvalidFloat 65521 -#define SysConst_SInvalidDate 65522 -#define SysConst_SInvalidTime 65523 -#define SysConst_SInvalidDateTime 65524 -#define SysConst_STimeEncodeError 65525 -#define SysConst_SDateEncodeError 65526 -#define SysConst_SOutOfMemory 65527 -#define SysConst_SInOutError 65528 -#define SysConst_SFileNotFound 65529 -#define SysConst_SInvalidFilename 65530 -#define SysConst_STooManyOpenFiles 65531 -#define SysConst_SAccessDenied 65532 -#define SysConst_SEndOfFile 65533 -#define SysConst_SDiskFull 65534 -#define SysConst_SInvalidInput 65535 -STRINGTABLE -BEGIN - ExtCtrls_clNameMenuText, "Menu Text" - ExtCtrls_clNameNone, "None" - ExtCtrls_clNameScrollBar, "Scroll Bar" - ExtCtrls_clName3DDkShadow, "3D Dark Shadow" - ExtCtrls_clName3DLight, "3D Light" - ExtCtrls_clNameWindow, "Window Background" - ExtCtrls_clNameWindowFrame, "Window Frame" - ExtCtrls_clNameWindowText, "Window Text" - WinHelpViewer_hNoKeyword, "No help keyword specified." - ExtCtrls_clNameBackground, "Background" - ExtCtrls_clNameBtnFace, "Button Face" - ExtCtrls_clNameBtnHighlight, "Button Highlight" - ExtCtrls_clNameBtnShadow, "Button Shadow" - ExtCtrls_clNameBtnText, "Button Text" - ExtCtrls_clNameCaptionText, "Caption Text" - ExtCtrls_clNameDefault, "Default" - ExtCtrls_clNameGrayText, "Gray Text" - ExtCtrls_clNameHighlight, "Highlight Background" - ExtCtrls_clNameHighlightText, "Highlight Text" - ExtCtrls_clNameInactiveBorder, "Inactive Border" - ExtCtrls_clNameInactiveCaption, "Inactive Caption" - ExtCtrls_clNameInactiveCaptionText, "Inactive Caption Text" - ExtCtrls_clNameInfoBk, "Info Background" - ExtCtrls_clNameInfoText, "Info Text" - ExtCtrls_clNameMenu, "Menu Background" - ExtCtrls_clNameGray, "Gray" - ExtCtrls_clNameSilver, "Silver" - ExtCtrls_clNameRed, "Red" - ExtCtrls_clNameLime, "Lime" - ExtCtrls_clNameYellow, "Yellow" - ExtCtrls_clNameBlue, "Blue" - ExtCtrls_clNameFuchsia, "Fuchsia" - ExtCtrls_clNameAqua, "Aqua" - ExtCtrls_clNameWhite, "White" - ExtCtrls_clNameMoneyGreen, "Money Green" - ExtCtrls_clNameSkyBlue, "Sky Blue" - ExtCtrls_clNameCream, "Cream" - ExtCtrls_clNameMedGray, "Medium Gray" - ExtCtrls_clNameActiveBorder, "Active Border" - ExtCtrls_clNameActiveCaption, "Active Caption" - ExtCtrls_clNameAppWorkSpace, "Application Workspace" - Consts_SDockedCtlNeedsName, "Docked control must have a name" - Consts_SDockTreeRemoveError, "Error removing control from dock tree" - Consts_SDockZoneNotFound, " - Dock zone not found" - Consts_SDockZoneHasNoCtl, " - Dock zone has no control" - OleConst_sNoRunningObject, "Unable to retrieve a pointer to a running object registered with OLE for %s/%s" - HelpIntfs_hNoTableOfContents, "Unable to find a Table of Contents" - HelpIntfs_hNothingFound, "No help found for %s" - HelpIntfs_hNoContext, "No context-sensitive help installed" - HelpIntfs_hNoTopics, "No topic-based help system installed" - ExtCtrls_clNameBlack, "Black" - ExtCtrls_clNameMaroon, "Maroon" - ExtCtrls_clNameGreen, "Green" - ExtCtrls_clNameOlive, "Olive" - ExtCtrls_clNameNavy, "Navy" - ExtCtrls_clNamePurple, "Purple" - ExtCtrls_clNameTeal, "Teal" - Consts_SmkcSpace, "Space" - Consts_SmkcPgUp, "PgUp" - Consts_SmkcPgDn, "PgDn" - Consts_SmkcEnd, "End" - Consts_SmkcHome, "Home" - Consts_SmkcLeft, "Left" - Consts_SmkcUp, "Up" - Consts_SmkcRight, "Right" - Consts_SmkcDown, "Down" - Consts_SmkcIns, "Ins" - Consts_SmkcDel, "Del" - Consts_SmkcShift, "Shift+" - Consts_SmkcCtrl, "Ctrl+" - Consts_SmkcAlt, "Alt+" - Consts_SIconToClipboard, "Clipboard does not support Icons" - Consts_SDuplicateMenus, "Menu '%s' is already being used by another form" - Consts_SMsgDlgConfirm, "Confirm" - Consts_SMsgDlgYes, "&Yes" - Consts_SMsgDlgNo, "&No" - Consts_SMsgDlgOK, "OK" - Consts_SMsgDlgCancel, "Cancel" - Consts_SMsgDlgHelp, "&Help" - Consts_SMsgDlgAbort, "&Abort" - Consts_SMsgDlgRetry, "&Retry" - Consts_SMsgDlgIgnore, "&Ignore" - Consts_SMsgDlgAll, "&All" - Consts_SMsgDlgNoToAll, "N&o to All" - Consts_SMsgDlgYesToAll, "Yes to &All" - Consts_SmkcBkSp, "BkSp" - Consts_SmkcTab, "Tab" - Consts_SmkcEsc, "Esc" - Consts_SmkcEnter, "Enter" - Consts_SNoMDIForm, "Cannot create form. No MDI forms are currently active" - Consts_SControlParentSetToSelf, "A control cannot have itself as its parent" - Consts_SOKButton, "OK" - Consts_SCancelButton, "Cancel" - Consts_SYesButton, "&Yes" - Consts_SNoButton, "&No" - Consts_SHelpButton, "&Help" - Consts_SCloseButton, "&Close" - Consts_SIgnoreButton, "&Ignore" - Consts_SRetryButton, "&Retry" - Consts_SAbortButton, "Abort" - Consts_SAllButton, "&All" - Consts_SCannotDragForm, "Cannot drag a form" - Consts_SMsgDlgWarning, "Warning" - Consts_SMsgDlgError, "Error" - Consts_SMsgDlgInformation, "Information" - Consts_SInvalidImageList, "Invalid ImageList" - Consts_SImageIndexError, "Invalid ImageList Index" - Consts_SImageReadFail, "Failed to read ImageList data from stream" - Consts_SImageWriteFail, "Failed to write ImageList data to stream" - Consts_SWindowDCError, "Error creating window device context" - Consts_SWindowClass, "Error creating window class" - Consts_SCannotFocus, "Cannot focus a disabled or invisible window" - Consts_SParentRequired, "Control '%s' has no parent window" - Consts_SMDIChildNotVisible, "Cannot hide an MDI Child Form" - Consts_SVisibleChanged, "Cannot change Visible in OnShow or OnHide" - Consts_SCannotShowModal, "Cannot make a visible window modal" - Consts_SMenuIndexError, "Menu index out of range" - Consts_SMenuReinserted, "Menu inserted twice" - Consts_SMenuNotFound, "Sub-menu is not in menu" - Consts_SNoTimers, "Not enough timers available" - Consts_SGroupIndexTooLow, "GroupIndex cannot be less than a previous menu item's GroupIndex" - IdResourceStrings_RSSSLGetMethodError, "Error geting SSL method." - IdResourceStrings_RSSSLDataBindingError, "Error binding data to SSL socket." - IdResourceStrings_RSOSSLModeNotSet, "Mode has not been set." - IdResourceStrings_RSOSSLCouldNotLoadSSLLibrary, "Could not load SSL library." - IdResourceStrings_RSOSSLStatusString, "SSL status: \"%s\"" - IdResourceStrings_RSUnevenSizeInDecodeStream, "Uneven size in DecodeToStream." - IdResourceStrings_RSUnevenSizeInEncodeStream, "Uneven size in Encode." - IdResourceStrings_RSURINoProto, "Protocol field is empty" - IdResourceStrings_RSURINoHost, "Host field is empty" - Consts_SInvalidBitmap, "Bitmap image is not valid" - Consts_SInvalidIcon, "Icon image is not valid" - Consts_SChangeIconSize, "Cannot change the size of an icon" - Consts_SUnknownClipboardFormat, "Unsupported clipboard format" - Consts_SOutOfResources, "Out of system resources" - Consts_SNoCanvasHandle, "Canvas does not allow drawing" - Consts_SInvalidImageSize, "Invalid image size" - IdResourceStrings_RSSocksServerGeneralError, "General SOCKS server failure." - IdResourceStrings_RSSocksServerPermissionError, "Connection not allowed by ruleset." - IdResourceStrings_RSSocksServerNetUnreachableError, "Network unreachable." - IdResourceStrings_RSSocksServerHostUnreachableError, "Host unreachable." - IdResourceStrings_RSSocksServerConnectionRefusedError, "Connection refused." - IdResourceStrings_RSSocksServerTTLExpiredError, "TTL expired." - IdResourceStrings_RSSocksServerCommandError, "Command not supported." - IdResourceStrings_RSSocksServerAddressError, "Address type not supported." - IdResourceStrings_RSDestinationFileAlreadyExists, "Destination file already exists." - IdResourceStrings_RSSSLAcceptError, "Error accepting connection with SSL." - IdResourceStrings_RSSSLConnectError, "Error connecting with SSL." - IdResourceStrings_RSSSLSettingCipherError, "SetCipher failed." - IdResourceStrings_RSSSLCreatingContextError, "Error creating SSL context." - IdResourceStrings_RSSSLLoadingRootCertError, "Could not load root certificate." - IdResourceStrings_RSSSLLoadingCertError, "Could not load certificate." - IdResourceStrings_RSSSLLoadingKeyError, "Could not load key, check password." - IdResourceStrings_RSStackETOOMANYREFS, "Too many references, cannot splice." - IdResourceStrings_RSStackETIMEDOUT, "Connection timed out." - IdResourceStrings_RSStackECONNREFUSED, "Connection refused." - IdResourceStrings_RSStackELOOP, "Too many levels of symbolic links." - IdResourceStrings_RSStackENAMETOOLONG, "File name too long." - IdResourceStrings_RSStackEHOSTDOWN, "Host is down." - IdResourceStrings_RSStackEHOSTUNREACH, "No route to host." - IdResourceStrings_RSStackENOTEMPTY, "Directory not empty" - IdResourceStrings_RSStackHOST_NOT_FOUND, "Host not found." - IdResourceStrings_RSSocksRequestFailed, "Request rejected or failed." - IdResourceStrings_RSSocksRequestServerFailed, "Request rejected because SOCKS server cannot connect." - IdResourceStrings_RSSocksRequestIdentFailed, "Request rejected because the client program and identd report different user-ids." - IdResourceStrings_RSSocksUnknownError, "Unknown socks error." - IdResourceStrings_RSSocksServerRespondError, "Socks server did not respond." - IdResourceStrings_RSSocksAuthMethodError, "Invalid socks authentication method." - IdResourceStrings_RSSocksAuthError, "Authentication error to socks server." - IdResourceStrings_RSStackEPROTONOSUPPORT, "Protocol not supported." - IdResourceStrings_RSStackESOCKTNOSUPPORT, "Socket type not supported." - IdResourceStrings_RSStackEOPNOTSUPP, "Operation not supported on socket." - IdResourceStrings_RSStackEPFNOSUPPORT, "Protocol family not supported." - IdResourceStrings_RSStackEAFNOSUPPORT, "Address family not supported by protocol family." - IdResourceStrings_RSStackEADDRINUSE, "Address already in use." - IdResourceStrings_RSStackEADDRNOTAVAIL, "Cannot assign requested address." - IdResourceStrings_RSStackENETDOWN, "Network is down." - IdResourceStrings_RSStackENETUNREACH, "Network is unreachable." - IdResourceStrings_RSStackENETRESET, "Net dropped connection or reset." - IdResourceStrings_RSStackECONNABORTED, "Software caused connection abort." - IdResourceStrings_RSStackECONNRESET, "Connection reset by peer." - IdResourceStrings_RSStackENOBUFS, "No buffer space available." - IdResourceStrings_RSStackEISCONN, "Socket is already connected." - IdResourceStrings_RSStackENOTCONN, "Socket is not connected." - IdResourceStrings_RSStackESHUTDOWN, "Cannot send or receive after socket is closed." - IdResourceStrings_RSInvalidServiceName, "%s is not a valid service." - IdResourceStrings_RSStackError, "Socket Error # %d\r\n%s" - IdResourceStrings_RSStackEINTR, "Interrupted system call." - IdResourceStrings_RSStackEBADF, "Bad file number." - IdResourceStrings_RSStackEACCES, "Access denied." - IdResourceStrings_RSStackEFAULT, "Bad address." - IdResourceStrings_RSStackEINVAL, "Invalid argument." - IdResourceStrings_RSStackEMFILE, "Too many open files." - IdResourceStrings_RSStackEWOULDBLOCK, "Operation would block. " - IdResourceStrings_RSStackEINPROGRESS, "Operation now in progress." - IdResourceStrings_RSStackEALREADY, "Operation already in progress." - IdResourceStrings_RSStackENOTSOCK, "Socket operation on non-socket." - IdResourceStrings_RSStackEDESTADDRREQ, "Destination address required." - IdResourceStrings_RSStackEMSGSIZE, "Message too long." - IdResourceStrings_RSStackEPROTOTYPE, "Protocol wrong type for socket." - IdResourceStrings_RSStackENOPROTOOPT, "Bad protocol option." - IdResourceStrings_RSWS2LoadError, "Error on loading Winsock2 library (%s)" - IdResourceStrings_RSStatusResolving, "Resolving hostname %s." - IdResourceStrings_RSStatusConnecting, "Connecting to %s." - IdResourceStrings_RSStatusConnected, "Connected." - IdResourceStrings_RSStatusDisconnecting, "Disconnecting." - IdResourceStrings_RSStatusDisconnected, "Disconnected." - IdResourceStrings_RSStatusText, "%s" - IdResourceStrings_RSConnectTimeout, "Connect timed out." - IdResourceStrings_RSHTTPChunkStarted, "Chunk Started" - IdResourceStrings_RSHTTPAuthAlreadyRegistered, "This authentication method is already registered with class name %s." - IdResourceStrings_RSFTPUnknownHost, "Unknown" - IdResourceStrings_RSInvalidFTPListingFormat, "Unknown FTP listing format" - IdResourceStrings_RSFTPStatusReady, "Connection established" - IdResourceStrings_RSFTPStatusStartTransfer, "Starting FTP transfer" - IdResourceStrings_RSFTPStatusDoneTransfer, "Transfer complete" - IdResourceStrings_RSFTPStatusAbortTransfer, "Transfer aborted" - IdResourceStrings_RSConnectionClosedGracefully, "Connection Closed Gracefully." - IdResourceStrings_RSCouldNotBindSocket, "Could not bind socket. Address and port are already in use." - IdResourceStrings_RSFailedTimeZoneInfo, "Failed attempting to retrieve time zone information." - IdResourceStrings_RSNotEnoughDataInBuffer, "Not enough data in buffer." - IdResourceStrings_RSWinsockInitializationError, "Winsock Initialization Error." - IdResourceStrings_RSSetSizeExceeded, "Set Size Exceeded." - IdResourceStrings_RSFileNotFound, "File \"%s\" not found" - IdResourceStrings_RSOnlyOneAntiFreeze, "Only one TIdAntiFreeze can exist per application." - IdResourceStrings_RSIOHandlerPropInvalid, "IOHandler value is not valid" - IdResourceStrings_RSNotConnected, "Not Connected" - IdResourceStrings_RSIdNoDataToRead, "No data to read." - IdResourceStrings_RSCanNotBindRange, "Can not bind in port range (%d - %d)" - IdResourceStrings_RSInvalidPortRange, "Invalid Port Range (%d - %d)" - IdResourceStrings_RSReadTimeout, "Read Timeout" - IdResourceStrings_RSReadLnMaxLineLengthExceeded, "Max line length exceeded." - IdResourceStrings_RSWS2CallError, "Error on call Winsock2 library function %s" - JclResources_RsIntelCacheDescrEA, "3rd-level cache: 12 MByte, 24-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrEB, "3rd-level cache: 18 MByte, 24-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrEC, "3rd-level cache: 24 MByte, 24-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrF0, "64-Byte Prefetching" - JclResources_RsIntelCacheDescrF1, "128-Byte Prefetching" - JclResources_RsIntelCacheDescrFF, "CPUID leaf 2 does not report cache descriptor information, use CPUID leaf 4 to query cache parameters" - JclResources_RsInvalidMMFName, "Invalid MMF name \"%s\"" - JclResources_RsInvalidMMFEmpty, "The MMF named \"%s\" cannot be created empty" - JclResources_RsWin32Error, "Win32 error: %s (%u)%s%s" - ComConst_SOleError, "OLE error %.8x" - ComConst_SNoMethod, "Method '%s' not supported by automation object" - ComConst_SVarNotObject, "Variant does not reference an automation object" - ComConst_STooManyParams, "Dispatch methods do not support more than 64 parameters" - ComConst_SDCOMNotInstalled, "DCOM not installed" - IdResourceStrings_RSAlreadyConnected, "Already connected." - IdResourceStrings_RSCannotAllocateSocket, "Cannot allocate socket." - JclResources_RsIntelCacheDescrB4, "Data TLB1: 4 KByte pages, 4-way set associative, 256 entries" - JclResources_RsIntelCacheDescrBA, "Data TLB1: 4 KByte pages, 4-way set associative, 64 entries" - JclResources_RsIntelCacheDescrC0, "Data TLB: 4 KByte and 4 MByte pages, 4-way set associative, 8 entries" - JclResources_RsIntelCacheDescrCA, "Shared 2nd-Level TLB: 4 KByte pages, 4-way associative, 512 entries" - JclResources_RsIntelCacheDescrD0, "3rd-level cache: 512 KByte, 4-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrD1, "3rd-level cache: 1 MByte, 4-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrD2, "3rd-level cache: 2 MByte, 4-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrD6, "3rd-level cache: 1 MByte, 8-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrD7, "3rd-level cache: 2 MByte, 8-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrD8, "3rd-level cache: 4 MByte, 8-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrDC, "3rd-level cache: 1.5 MByte, 12-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrDD, "3rd-level cache: 3 MByte, 12-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrDE, "3rd-level cache: 6 MByte, 12-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrE2, "3rd-level cache: 2 MByte, 16-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrE3, "3rd-level cache: 4 MByte, 16-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrE4, "3rd-level cache: 8 MByte, 16-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr7A, "2nd-level cache: 256 KBytes, 8-way set associative, 64 bytes line size, 2 lines per sector" - JclResources_RsIntelCacheDescr7B, "2nd-level cache: 512 KBytes, 8-way set associative, 64 bytes line size, 2 lines per sector" - JclResources_RsIntelCacheDescr7C, "2nd-level cache: 1 MBytes, 8-way set associative, 64 bytes line size, 2 lines per sector" - JclResources_RsIntelCacheDescr7D, "2nd-level cache: 2 MBytes, 8-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr7F, "2nd-level cache: 512 KBytes, 2-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr80, "2nd-level cache: 512 KBytes, 8-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr82, "2nd-level cache: 256 KBytes, 8-way associative, 32 byte line size" - JclResources_RsIntelCacheDescr83, "2nd-level cache: 512 KBytes, 8-way associative, 32 byte line size" - JclResources_RsIntelCacheDescr84, "2nd-level cache: 1 MBytes, 8-way associative, 32 byte line size" - JclResources_RsIntelCacheDescr85, "2nd-level cache: 2 MBytes, 8-way associative, 32 byte line size" - JclResources_RsIntelCacheDescr86, "2nd-level cache: 512 KByte, 4-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr87, "2nd-level cache: 1 MByte, 8-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescrB0, "Instruction TLB: 4 KByte pages, 4-way set associative, 128 entries" - JclResources_RsIntelCacheDescrB1, "Instruction TLB: 2 MByte pages, 4-way, 8 entries or 4 MByte pages, 4-way, 4 entries" - JclResources_RsIntelCacheDescrB2, "Instruction TLB: 4 KByte pages, 4-way set associative, 64 entries" - JclResources_RsIntelCacheDescrB3, "Data TLB: 4 KByte pages, 4-way set associative, 128 entries" - JclResources_RsIntelCacheDescr59, "Data TLB0: 4 KByte pages, fully associative, 16 entries" - JclResources_RsIntelCacheDescr5A, "Data TLB0: 2 MByte or 4 MByte pages, 4-way set associative, 32 entries" - JclResources_RsIntelCacheDescr5B, "Data TLB: 4 KByte and 4 MByte pages, 64 Entries" - JclResources_RsIntelCacheDescr5C, "Data TLB: 4 KByte and 4 MByte pages, 128 Entries" - JclResources_RsIntelCacheDescr5D, "Data TLB: 4 KByte and 4 MByte pages, 256 Entries" - JclResources_RsIntelCacheDescr60, "1st-level data cache: 16 KByte, 8-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr66, "1st-level data cache: 8 KBytes, 4-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr67, "1st-level data cache: 16 KBytes, 4-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr68, "1st-level data cache: 32 KBytes, 4-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr70, "Trace cache: 12 K-Ops, 8-way set associative" - JclResources_RsIntelCacheDescr71, "Trace cache: 16 K-Ops, 8-way set associative" - JclResources_RsIntelCacheDescr72, "Trace cache: 32 K-Ops, 8-way set associative" - JclResources_RsIntelCacheDescr73, "Trace cache: 64 K-Ops, 8-way set associative" - JclResources_RsIntelCacheDescr76, "Instruction TLB: 2M/4M pages, fully associative, 8 entries" - JclResources_RsIntelCacheDescr78, "2nd-level cache: 1 MBytes, 4-way set associative, 64 bytes line size" - JclResources_RsIntelCacheDescr79, "2nd-level cache: 128 KBytes, 8-way set associative, 64 bytes line size, 2 lines per sector" - JclResources_RsIntelCacheDescr46, "3rd-level cache: 4 MBytes, 4-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr47, "3rd-level cache: 8 MBytes, 4-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr48, "3rd-level cache: 8 MByte, 8-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr49, "2nd-level cache: 4 MBytes, 16-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr4A, "3rd-level cache: 6MByte, 12-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr4B, "3rd-level cache: 8MByte, 16-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr4C, "3rd-level cache: 12MByte, 12-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr4D, "3rd-level cache: 16MByte, 16-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr4E, "2nd-level cache: 6MByte, 24-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr4F, "Instruction TLB: 4 KByte pages, 32 Entries" - JclResources_RsIntelCacheDescr50, "Instruction TLB: 4 KByte and 2 MByte or 4 MByte pages, 64 Entries" - JclResources_RsIntelCacheDescr51, "Instruction TLB: 4 KByte and 2 MByte or 4 MByte pages, 128 Entries" - JclResources_RsIntelCacheDescr52, "Instruction TLB: 4 KByte and 2 MByte or 4 MByte pages, 256 Entries" - JclResources_RsIntelCacheDescr55, "Instruction TLB: 2-MByte or 4-MByte pages, fully associative, 7 entries" - JclResources_RsIntelCacheDescr56, "Data TLB0: 4 MByte pages, 4-way set associative, 16 entries" - JclResources_RsIntelCacheDescr57, "Data TLB0: 4 KByte pages, 4-way associative, 16 entries" - JclResources_RsIntelCacheDescr25, "3rd level cache: 2 MBytes, 8-way set associative, 64 byte line size, 2 lines per sector" - JclResources_RsIntelCacheDescr29, "3rd level cache: 4 MBytes, 8-way set associative, 64 byte line size, 2 lines per sector" - JclResources_RsIntelCacheDescr2C, "1st level data cache: 32 KBytes, 8-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr30, "1st level instruction cache: 32 KBytes, 8-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr39, "2nd-level cache: 128 KBytes, 4-way set associative, sectored cache, 64-byte line size" - JclResources_RsIntelCacheDescr3A, "2nd-level cache: 192 KBytes, 6-way set associative, sectored cache, 64-byte line size" - JclResources_RsIntelCacheDescr3B, "2nd-level cache: 128 KBytes, 2-way set associative, sectored cache, 64-byte line size" - JclResources_RsIntelCacheDescr3C, "2nd-level cache: 256 KBytes, 4-way set associative, sectored cache, 64-byte line size" - JclResources_RsIntelCacheDescr3D, "2nd-level cache: 384 KBytes, 6-way set associative, sectored cache, 64-byte line size" - JclResources_RsIntelCacheDescr3E, "2nd-level cache: 512 KBytes, 4-way set associative, sectored cache, 64-byte line size" - JclResources_RsIntelCacheDescr40, "No 2nd-level cache or, if processor contains a valid 2nd-level cache, no 3rd-level cache" - JclResources_RsIntelCacheDescr41, "2nd-level cache: 128 KBytes, 4-way set associative, 32 byte line size" - JclResources_RsIntelCacheDescr42, "2nd-level cache: 256 KBytes, 4-way set associative, 32 byte line size" - JclResources_RsIntelCacheDescr43, "2nd-level cache: 512 KBytes, 4-way set associative, 32 byte line size" - JclResources_RsIntelCacheDescr44, "2nd-level cache: 1 MBytes, 4-way set associative, 32 byte line size" - JclResources_RsIntelCacheDescr45, "2nd-level cache: 2 MBytes, 4-way set associative, 32 byte line size" - JclResources_RsIntelCacheDescr01, "Instruction TLB: 4 KByte pages, 4-way set associative, 32 entries" - JclResources_RsIntelCacheDescr02, "Instruction TLB: 4 MByte pages, 4-way set associative, 2 entries" - JclResources_RsIntelCacheDescr03, "Data TLB: 4 KByte pages, 4-way set associative, 64 entries" - JclResources_RsIntelCacheDescr04, "Data TLB: 4 MByte pages, 4-way set associative, 8 entries" - JclResources_RsIntelCacheDescr05, "Data TLB1: 4 MByte pages, 4-way set associative, 32 entries" - JclResources_RsIntelCacheDescr06, "1st level instruction cache: 8 KBytes, 4-way set associative, 32 byte line size" - JclResources_RsIntelCacheDescr08, "1st level instruction cache: 16 KBytes, 4-way set associative, 32 byte line size" - JclResources_RsIntelCacheDescr09, "1st level instruction cache: 32 KBytes, 4-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr0A, "1st level data cache: 8 KBytes, 2-way set associative, 32 byte line size" - JclResources_RsIntelCacheDescr0B, "Instruction TLB: 4 MByte pages, 4-way set associative, 4 entries" - JclResources_RsIntelCacheDescr0C, "1st level data cache: 16 KBytes, 4-way set associative, 32 byte line size" - JclResources_RsIntelCacheDescr0D, "1st level data cache: 16 KBytes, 4-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr0E, "1st level data cache: 24 KBytes, 6-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr21, "2nd level cache: 256 KBytes, 8-way set associative, 64 byte line size" - JclResources_RsIntelCacheDescr22, "3rd level cache: 512 KBytes, 4-way set associative, 64 byte line size, 2 lines per sector" - JclResources_RsIntelCacheDescr23, "3rd level cache: 1 MBytes, 8-way set associative, 64 byte line size, 2 lines per sector" - RTLConsts_SSortedListError, "Operation not allowed on sorted list" - RTLConsts_SUnknownGroup, "%s not in a class registration group" - RTLConsts_SUnknownProperty, "Property %s does not exist" - RTLConsts_SWriteError, "Stream write error" - RTLConsts_SThreadCreateError, "Thread creation error: %s" - RTLConsts_SThreadError, "Thread Error: %s (%d)" - JclResources_RsEReplacementChar, "Failed to get ANSI replacement character" - JclResources_RsCannotCreateDir, "Unable to create directory" - JclResources_RsFileUtilsNoVersionInfo, "File contains no version information" - JclResources_RsFileUtilsFileDoesNotExist, "The file %s does not exist" - JclResources_RsUnableToOpenKeyRead, "Unable to open key \"%s\\%s\" for read" - JclResources_RsUnableToAccessValue, "Unable to open key \"%s\\%s\" and access value \"%s\"" - JclResources_RsWrongDataType, "\"%s\\%s\\%s\" is of wrong kind or size" - JclResources_RsInconsistentPath, "\"%s\" does not match RootKey" - JclResources_RsSynchCreateMutex, "Failed to create mutex" - JclResources_RsIntelCacheDescr00, "Null descriptor" - RTLConsts_SInvalidImage, "Invalid stream format" - RTLConsts_SInvalidName, "''%s'' is not a valid component name" - RTLConsts_SInvalidProperty, "Invalid property value" - RTLConsts_SInvalidPropertyPath, "Invalid property path" - RTLConsts_SInvalidPropertyValue, "Invalid property value" - RTLConsts_SInvalidRegType, "Invalid data type for '%s'" - RTLConsts_SListCapacityError, "List capacity out of bounds (%d)" - RTLConsts_SListCountError, "List count out of bounds (%d)" - RTLConsts_SListIndexError, "List index out of bounds (%d)" - RTLConsts_SMemoryStreamError, "Out of memory while expanding memory stream" - RTLConsts_SPropertyException, "Error reading %s%s%s: %s" - RTLConsts_SReadError, "Stream read error" - RTLConsts_SReadOnlyProperty, "Property is read-only" - RTLConsts_SRegGetDataFailed, "Failed to get data for '%s'" - RTLConsts_SResNotFound, "Resource %s not found" - RTLConsts_SSeekNotImplemented, "%s.Seek not implemented" - SysConst_SLongDayNameFri, "Friday" - SysConst_SLongDayNameSat, "Saturday" - SysConst_SCannotCreateDir, "Unable to create directory" - RTLConsts_SAncestorNotFound, "Ancestor for '%s' not found" - RTLConsts_SAssignError, "Cannot assign a %s to a %s" - RTLConsts_SBitsIndexError, "Bits index out of range" - RTLConsts_SCantWriteResourceStreamError, "Can't write to a read-only resource stream" - RTLConsts_SCheckSynchronizeError, "CheckSynchronize called from thread $%x, which is NOT the main thread" - RTLConsts_SClassNotFound, "Class %s not found" - RTLConsts_SDuplicateClass, "A class named %s already exists" - RTLConsts_SDuplicateItem, "List does not allow duplicates ($0%x)" - RTLConsts_SDuplicateName, "A component named %s already exists" - RTLConsts_SDuplicateString, "String list does not allow duplicates" - RTLConsts_SFCreateErrorEx, "Cannot create file \"%s\". %s" - RTLConsts_SFOpenErrorEx, "Cannot open file \"%s\". %s" - RTLConsts_SIniFileWriteError, "Unable to write to %s" - SysConst_SLongMonthNameSep, "September" - SysConst_SLongMonthNameOct, "October" - SysConst_SLongMonthNameNov, "November" - SysConst_SLongMonthNameDec, "December" - SysConst_SShortDayNameSun, "Sun" - SysConst_SShortDayNameMon, "Mon" - SysConst_SShortDayNameTue, "Tue" - SysConst_SShortDayNameWed, "Wed" - SysConst_SShortDayNameThu, "Thu" - SysConst_SShortDayNameFri, "Fri" - SysConst_SShortDayNameSat, "Sat" - SysConst_SLongDayNameSun, "Sunday" - SysConst_SLongDayNameMon, "Monday" - SysConst_SLongDayNameTue, "Tuesday" - SysConst_SLongDayNameWed, "Wednesday" - SysConst_SLongDayNameThu, "Thursday" - SysConst_SShortMonthNameMay, "May" - SysConst_SShortMonthNameJun, "Jun" - SysConst_SShortMonthNameJul, "Jul" - SysConst_SShortMonthNameAug, "Aug" - SysConst_SShortMonthNameSep, "Sep" - SysConst_SShortMonthNameOct, "Oct" - SysConst_SShortMonthNameNov, "Nov" - SysConst_SShortMonthNameDec, "Dec" - SysConst_SLongMonthNameJan, "January" - SysConst_SLongMonthNameFeb, "February" - SysConst_SLongMonthNameMar, "March" - SysConst_SLongMonthNameApr, "April" - SysConst_SLongMonthNameMay, "May" - SysConst_SLongMonthNameJun, "June" - SysConst_SLongMonthNameJul, "July" - SysConst_SLongMonthNameAug, "August" - SysConst_SVarBadType, "Invalid variant type" - SysConst_SVarNotImplemented, "Operation not supported" - SysConst_SVarUnexpected, "Unexpected variant error" - SysConst_SExternalException, "External exception %x" - SysConst_SAssertionFailed, "Assertion failed" - SysConst_SIntfCastError, "Interface not supported" - SysConst_SSafecallException, "Exception in safecall method" - SysConst_SAssertError, "%s (%s, line %d)" - SysConst_SAbstractError, "Abstract Error" - SysConst_SModuleAccessViolation, "Access violation at address %p in module '%s'. %s of address %p" - SysConst_SOSError, "System Error. Code: %d.\r\n%s" - SysConst_SUnkOSError, "A call to an OS function failed" - SysConst_SShortMonthNameJan, "Jan" - SysConst_SShortMonthNameFeb, "Feb" - SysConst_SShortMonthNameMar, "Mar" - SysConst_SShortMonthNameApr, "Apr" - SysConst_SInvalidFormat, "Format '%s' invalid or incompatible with argument" - SysConst_SArgumentMissing, "No argument for format '%s'" - SysConst_SDispatchError, "Variant method calls not supported" - SysConst_SReadAccess, "Read" - SysConst_SWriteAccess, "Write" - SysConst_SFormatTooLong, "Format string too long" - SysConst_SVarArrayCreate, "Error creating variant or safe array" - SysConst_SVarArrayBounds, "Variant or safe array index out of bounds" - SysConst_SVarArrayLocked, "Variant or safe array is locked" - SysConst_SInvalidVarCast, "Invalid variant type conversion" - SysConst_SInvalidVarOp, "Invalid variant operation" - SysConst_SInvalidVarOpWithHResultWithPrefix, "Invalid variant operation (%s%.8x)\n%s" - SysConst_SVarTypeCouldNotConvert, "Could not convert variant of type (%s) into type (%s)" - SysConst_SVarTypeConvertOverflow, "Overflow while converting variant of type (%s) into type (%s)" - SysConst_SVarOverflow, "Variant overflow" - SysConst_SVarInvalid, "Invalid argument" - SysConst_SDivByZero, "Division by zero" - SysConst_SRangeError, "Range check error" - SysConst_SIntOverflow, "Integer overflow" - SysConst_SInvalidOp, "Invalid floating point operation" - SysConst_SZeroDivide, "Floating point division by zero" - SysConst_SOverflow, "Floating point overflow" - SysConst_SUnderflow, "Floating point underflow" - SysConst_SInvalidPointer, "Invalid pointer operation" - SysConst_SInvalidCast, "Invalid class typecast" - SysConst_SAccessViolationArg3, "Access violation at address %p. %s of address %p" - SysConst_SAccessViolationNoArg, "Access violation" - SysConst_SStackOverflow, "Stack overflow" - SysConst_SControlC, "Control-C hit" - SysConst_SPrivilege, "Privileged instruction" - SysConst_SException, "Exception %s in module %s at %p.\r\n%s%s\r\n" - SysConst_SExceptTitle, "Application Error" - SysConst_SInvalidInteger, "'%s' is not a valid integer value" - SysConst_SInvalidFloat, "'%s' is not a valid floating point value" - SysConst_SInvalidDate, "'%s' is not a valid date" - SysConst_SInvalidTime, "'%s' is not a valid time" - SysConst_SInvalidDateTime, "'%s' is not a valid date and time" - SysConst_STimeEncodeError, "Invalid argument to time encode" - SysConst_SDateEncodeError, "Invalid argument to date encode" - SysConst_SOutOfMemory, "Out of memory" - SysConst_SInOutError, "I/O error %d" - SysConst_SFileNotFound, "File not found" - SysConst_SInvalidFilename, "Invalid filename" - SysConst_STooManyOpenFiles, "Too many open files" - SysConst_SAccessDenied, "File access denied" - SysConst_SEndOfFile, "Read beyond end of file" - SysConst_SDiskFull, "Disk full" - SysConst_SInvalidInput, "Invalid numeric input" -END - diff --git a/gercols/gercols.res b/gercols/gercols.res index d0b7623..97ea699 100644 Binary files a/gercols/gercols.res and b/gercols/gercols.res differ diff --git a/installcacic/installcacic.cfg b/installcacic/installcacic.cfg deleted file mode 100644 index 5aa18e5..0000000 --- a/installcacic/installcacic.cfg +++ /dev/null @@ -1,44 +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 --GD --cg --AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; --H+ --W+ --M --$M16384,1048576 --K$00400000 --E"c:\agentes_Windows_BINARIOS" --LE"c:\program files (x86)\borland\delphi7\Projects\Bpl" --LN"c:\program files (x86)\borland\delphi7\Projects\Bpl" --U"C:\agentes_Windows;c:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;c:\vendors_lib\;C:\vendors_lib\MagWMI" --O"C:\agentes_Windows;c:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;c:\vendors_lib\;C:\vendors_lib\MagWMI" --I"C:\agentes_Windows;c:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;c:\vendors_lib\;C:\vendors_lib\MagWMI" --R"C:\agentes_Windows;c:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;c:\vendors_lib\;C:\vendors_lib\MagWMI" --w-UNSAFE_TYPE --w-UNSAFE_CODE --w-UNSAFE_CAST diff --git a/installcacic/installcacic.dproj b/installcacic/installcacic.dproj new file mode 100644 index 0000000..ec0d9b6 --- /dev/null +++ b/installcacic/installcacic.dproj @@ -0,0 +1,51 @@ + + + + {48629bb3-14c1-4811-a084-3cc35997f394} + installcacic.dpr + Release + AnyCPU + DCC32 + ..\..\Agentes_Windows_BINARIOS\installcacic.exe + + + 7.0 + False + False + True + True + 0 + C:\devel\cacic\Agentes_Windows_BINARIOS + DEBUG + + + 7.0 + True + True + C:\devel\cacic\Agentes_Windows_BINARIOS + C:\agentes_Windows;c:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;c:\vendors_lib\;C:\vendors_lib\MagWMI + C:\agentes_Windows;c:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;c:\vendors_lib\;C:\vendors_lib\MagWMI + C:\agentes_Windows;c:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;c:\vendors_lib\;C:\vendors_lib\MagWMI + C:\agentes_Windows;c:\vendors_lib\MD5;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;c:\vendors_lib\;C:\vendors_lib\MagWMI + DEBUG + + + Delphi.Personality + VCLApplication + +FalseTrueFalseTrueFalse2801212FalseFalseFalseFalseFalse10461252Dataprev - Emp. de TI da Prev Social - URES/SESSSistema CACIC - Módulo para Verificação e Instalação de Estrutura Básica do Sistema CACIC2.8.0.12123.0Licença: GNU/LGPLinstallcacic.dpr + + + + + MainSource + + + + + + +
frmInstallCACIC
+
+
+
\ No newline at end of file diff --git a/installcacic/installcacic.drc b/installcacic/installcacic.drc deleted file mode 100644 index f494104..0000000 --- a/installcacic/installcacic.drc +++ /dev/null @@ -1,788 +0,0 @@ -/* VER150 - Generated by the Borland Delphi Pascal Compiler - because -GD or --drc was supplied to the compiler. - - This file contains compiler-generated resources that - were bound to the executable. - If this file is empty, then no compiler-generated - resources were bound to the produced executable. -*/ - -#define IdResourceStrings_RSUnevenSizeInEncodeStream 65136 -#define IdResourceStrings_RSURINoProto 65137 -#define IdResourceStrings_RSURINoHost 65138 -#define IdResourceStrings_RSSocksServerCommandError 65152 -#define IdResourceStrings_RSSocksServerAddressError 65153 -#define IdResourceStrings_RSDestinationFileAlreadyExists 65154 -#define IdResourceStrings_RSSSLAcceptError 65155 -#define IdResourceStrings_RSSSLConnectError 65156 -#define IdResourceStrings_RSSSLSettingCipherError 65157 -#define IdResourceStrings_RSSSLCreatingContextError 65158 -#define IdResourceStrings_RSSSLLoadingRootCertError 65159 -#define IdResourceStrings_RSSSLLoadingCertError 65160 -#define IdResourceStrings_RSSSLLoadingKeyError 65161 -#define IdResourceStrings_RSSSLGetMethodError 65162 -#define IdResourceStrings_RSSSLDataBindingError 65163 -#define IdResourceStrings_RSOSSLModeNotSet 65164 -#define IdResourceStrings_RSOSSLCouldNotLoadSSLLibrary 65165 -#define IdResourceStrings_RSOSSLStatusString 65166 -#define IdResourceStrings_RSUnevenSizeInDecodeStream 65167 -#define IdResourceStrings_RSStackEHOSTUNREACH 65168 -#define IdResourceStrings_RSStackENOTEMPTY 65169 -#define IdResourceStrings_RSStackHOST_NOT_FOUND 65170 -#define IdResourceStrings_RSSocksRequestFailed 65171 -#define IdResourceStrings_RSSocksRequestServerFailed 65172 -#define IdResourceStrings_RSSocksRequestIdentFailed 65173 -#define IdResourceStrings_RSSocksUnknownError 65174 -#define IdResourceStrings_RSSocksServerRespondError 65175 -#define IdResourceStrings_RSSocksAuthMethodError 65176 -#define IdResourceStrings_RSSocksAuthError 65177 -#define IdResourceStrings_RSSocksServerGeneralError 65178 -#define IdResourceStrings_RSSocksServerPermissionError 65179 -#define IdResourceStrings_RSSocksServerNetUnreachableError 65180 -#define IdResourceStrings_RSSocksServerHostUnreachableError 65181 -#define IdResourceStrings_RSSocksServerConnectionRefusedError 65182 -#define IdResourceStrings_RSSocksServerTTLExpiredError 65183 -#define IdResourceStrings_RSStackEADDRNOTAVAIL 65184 -#define IdResourceStrings_RSStackENETDOWN 65185 -#define IdResourceStrings_RSStackENETUNREACH 65186 -#define IdResourceStrings_RSStackENETRESET 65187 -#define IdResourceStrings_RSStackECONNABORTED 65188 -#define IdResourceStrings_RSStackECONNRESET 65189 -#define IdResourceStrings_RSStackENOBUFS 65190 -#define IdResourceStrings_RSStackEISCONN 65191 -#define IdResourceStrings_RSStackENOTCONN 65192 -#define IdResourceStrings_RSStackESHUTDOWN 65193 -#define IdResourceStrings_RSStackETOOMANYREFS 65194 -#define IdResourceStrings_RSStackETIMEDOUT 65195 -#define IdResourceStrings_RSStackECONNREFUSED 65196 -#define IdResourceStrings_RSStackELOOP 65197 -#define IdResourceStrings_RSStackENAMETOOLONG 65198 -#define IdResourceStrings_RSStackEHOSTDOWN 65199 -#define IdResourceStrings_RSStackEINVAL 65200 -#define IdResourceStrings_RSStackEMFILE 65201 -#define IdResourceStrings_RSStackEWOULDBLOCK 65202 -#define IdResourceStrings_RSStackEINPROGRESS 65203 -#define IdResourceStrings_RSStackEALREADY 65204 -#define IdResourceStrings_RSStackENOTSOCK 65205 -#define IdResourceStrings_RSStackEDESTADDRREQ 65206 -#define IdResourceStrings_RSStackEMSGSIZE 65207 -#define IdResourceStrings_RSStackEPROTOTYPE 65208 -#define IdResourceStrings_RSStackENOPROTOOPT 65209 -#define IdResourceStrings_RSStackEPROTONOSUPPORT 65210 -#define IdResourceStrings_RSStackESOCKTNOSUPPORT 65211 -#define IdResourceStrings_RSStackEOPNOTSUPP 65212 -#define IdResourceStrings_RSStackEPFNOSUPPORT 65213 -#define IdResourceStrings_RSStackEAFNOSUPPORT 65214 -#define IdResourceStrings_RSStackEADDRINUSE 65215 -#define IdResourceStrings_RSStatusText 65216 -#define IdResourceStrings_RSConnectTimeout 65217 -#define IdResourceStrings_RSHTTPChunkStarted 65218 -#define IdResourceStrings_RSHTTPAuthAlreadyRegistered 65219 -#define IdResourceStrings_RSFTPUnknownHost 65220 -#define IdResourceStrings_RSInvalidFTPListingFormat 65221 -#define IdResourceStrings_RSFTPStatusReady 65222 -#define IdResourceStrings_RSFTPStatusStartTransfer 65223 -#define IdResourceStrings_RSFTPStatusDoneTransfer 65224 -#define IdResourceStrings_RSFTPStatusAbortTransfer 65225 -#define IdResourceStrings_RSInvalidServiceName 65226 -#define IdResourceStrings_RSStackError 65227 -#define IdResourceStrings_RSStackEINTR 65228 -#define IdResourceStrings_RSStackEBADF 65229 -#define IdResourceStrings_RSStackEACCES 65230 -#define IdResourceStrings_RSStackEFAULT 65231 -#define IdResourceStrings_RSFileNotFound 65232 -#define IdResourceStrings_RSOnlyOneAntiFreeze 65233 -#define IdResourceStrings_RSIOHandlerPropInvalid 65234 -#define IdResourceStrings_RSNotConnected 65235 -#define IdResourceStrings_RSIdNoDataToRead 65236 -#define IdResourceStrings_RSCanNotBindRange 65237 -#define IdResourceStrings_RSInvalidPortRange 65238 -#define IdResourceStrings_RSReadTimeout 65239 -#define IdResourceStrings_RSReadLnMaxLineLengthExceeded 65240 -#define IdResourceStrings_RSWS2CallError 65241 -#define IdResourceStrings_RSWS2LoadError 65242 -#define IdResourceStrings_RSStatusResolving 65243 -#define IdResourceStrings_RSStatusConnecting 65244 -#define IdResourceStrings_RSStatusConnected 65245 -#define IdResourceStrings_RSStatusDisconnecting 65246 -#define IdResourceStrings_RSStatusDisconnected 65247 -#define ComStrs_sRichEditSaveFail 65248 -#define WinHelpViewer_hNoKeyword 65249 -#define ComConst_SOleError 65250 -#define ComConst_SNoMethod 65251 -#define ComConst_SVarNotObject 65252 -#define ComConst_STooManyParams 65253 -#define ComConst_SDCOMNotInstalled 65254 -#define OleConst_sNoRunningObject 65255 -#define IdResourceStrings_RSAlreadyConnected 65256 -#define IdResourceStrings_RSCannotAllocateSocket 65257 -#define IdResourceStrings_RSConnectionClosedGracefully 65258 -#define IdResourceStrings_RSCouldNotBindSocket 65259 -#define IdResourceStrings_RSFailedTimeZoneInfo 65260 -#define IdResourceStrings_RSNotEnoughDataInBuffer 65261 -#define IdResourceStrings_RSWinsockInitializationError 65262 -#define IdResourceStrings_RSSetSizeExceeded 65263 -#define ExtCtrls_clNameInactiveBorder 65264 -#define ExtCtrls_clNameInactiveCaption 65265 -#define ExtCtrls_clNameInactiveCaptionText 65266 -#define ExtCtrls_clNameInfoBk 65267 -#define ExtCtrls_clNameInfoText 65268 -#define ExtCtrls_clNameMenu 65269 -#define ExtCtrls_clNameMenuText 65270 -#define ExtCtrls_clNameNone 65271 -#define ExtCtrls_clNameScrollBar 65272 -#define ExtCtrls_clName3DDkShadow 65273 -#define ExtCtrls_clName3DLight 65274 -#define ExtCtrls_clNameWindow 65275 -#define ExtCtrls_clNameWindowFrame 65276 -#define ExtCtrls_clNameWindowText 65277 -#define ComStrs_sRichEditInsertError 65278 -#define ComStrs_sRichEditLoadFail 65279 -#define ExtCtrls_clNameSkyBlue 65280 -#define ExtCtrls_clNameCream 65281 -#define ExtCtrls_clNameMedGray 65282 -#define ExtCtrls_clNameActiveBorder 65283 -#define ExtCtrls_clNameActiveCaption 65284 -#define ExtCtrls_clNameAppWorkSpace 65285 -#define ExtCtrls_clNameBackground 65286 -#define ExtCtrls_clNameBtnFace 65287 -#define ExtCtrls_clNameBtnHighlight 65288 -#define ExtCtrls_clNameBtnShadow 65289 -#define ExtCtrls_clNameBtnText 65290 -#define ExtCtrls_clNameCaptionText 65291 -#define ExtCtrls_clNameDefault 65292 -#define ExtCtrls_clNameGrayText 65293 -#define ExtCtrls_clNameHighlight 65294 -#define ExtCtrls_clNameHighlightText 65295 -#define ExtCtrls_clNameMaroon 65296 -#define ExtCtrls_clNameGreen 65297 -#define ExtCtrls_clNameOlive 65298 -#define ExtCtrls_clNameNavy 65299 -#define ExtCtrls_clNamePurple 65300 -#define ExtCtrls_clNameTeal 65301 -#define ExtCtrls_clNameGray 65302 -#define ExtCtrls_clNameSilver 65303 -#define ExtCtrls_clNameRed 65304 -#define ExtCtrls_clNameLime 65305 -#define ExtCtrls_clNameYellow 65306 -#define ExtCtrls_clNameBlue 65307 -#define ExtCtrls_clNameFuchsia 65308 -#define ExtCtrls_clNameAqua 65309 -#define ExtCtrls_clNameWhite 65310 -#define ExtCtrls_clNameMoneyGreen 65311 -#define Consts_SmkcCtrl 65312 -#define Consts_SmkcAlt 65313 -#define Consts_SIconToClipboard 65314 -#define Consts_SCannotOpenClipboard 65315 -#define Consts_SInvalidMemoSize 65316 -#define Consts_SNoDefaultPrinter 65317 -#define Consts_SDuplicateMenus 65318 -#define Consts_SDockedCtlNeedsName 65319 -#define Consts_SDockTreeRemoveError 65320 -#define Consts_SDockZoneNotFound 65321 -#define Consts_SDockZoneHasNoCtl 65322 -#define HelpIntfs_hNoTableOfContents 65323 -#define HelpIntfs_hNothingFound 65324 -#define HelpIntfs_hNoContext 65325 -#define HelpIntfs_hNoTopics 65326 -#define ExtCtrls_clNameBlack 65327 -#define Consts_SmkcBkSp 65328 -#define Consts_SmkcTab 65329 -#define Consts_SmkcEsc 65330 -#define Consts_SmkcEnter 65331 -#define Consts_SmkcSpace 65332 -#define Consts_SmkcPgUp 65333 -#define Consts_SmkcPgDn 65334 -#define Consts_SmkcEnd 65335 -#define Consts_SmkcHome 65336 -#define Consts_SmkcLeft 65337 -#define Consts_SmkcUp 65338 -#define Consts_SmkcRight 65339 -#define Consts_SmkcDown 65340 -#define Consts_SmkcIns 65341 -#define Consts_SmkcDel 65342 -#define Consts_SmkcShift 65343 -#define Consts_SVBitmaps 65344 -#define Consts_SMsgDlgWarning 65345 -#define Consts_SMsgDlgError 65346 -#define Consts_SMsgDlgInformation 65347 -#define Consts_SMsgDlgConfirm 65348 -#define Consts_SMsgDlgYes 65349 -#define Consts_SMsgDlgNo 65350 -#define Consts_SMsgDlgOK 65351 -#define Consts_SMsgDlgCancel 65352 -#define Consts_SMsgDlgHelp 65353 -#define Consts_SMsgDlgAbort 65354 -#define Consts_SMsgDlgRetry 65355 -#define Consts_SMsgDlgIgnore 65356 -#define Consts_SMsgDlgAll 65357 -#define Consts_SMsgDlgNoToAll 65358 -#define Consts_SMsgDlgYesToAll 65359 -#define Consts_SNoMDIForm 65360 -#define Consts_SControlParentSetToSelf 65361 -#define Consts_SOKButton 65362 -#define Consts_SCancelButton 65363 -#define Consts_SYesButton 65364 -#define Consts_SNoButton 65365 -#define Consts_SHelpButton 65366 -#define Consts_SCloseButton 65367 -#define Consts_SIgnoreButton 65368 -#define Consts_SRetryButton 65369 -#define Consts_SAbortButton 65370 -#define Consts_SAllButton 65371 -#define Consts_SCannotDragForm 65372 -#define Consts_SVMetafiles 65373 -#define Consts_SVEnhMetafiles 65374 -#define Consts_SVIcons 65375 -#define Consts_SWindowDCError 65376 -#define Consts_SWindowClass 65377 -#define Consts_SCannotFocus 65378 -#define Consts_SParentRequired 65379 -#define Consts_SMDIChildNotVisible 65380 -#define Consts_SVisibleChanged 65381 -#define Consts_SCannotShowModal 65382 -#define Consts_SMenuIndexError 65383 -#define Consts_SMenuReinserted 65384 -#define Consts_SMenuNotFound 65385 -#define Consts_SNoTimers 65386 -#define Consts_SNotPrinting 65387 -#define Consts_SPrinting 65388 -#define Consts_SInvalidPrinter 65389 -#define Consts_SDeviceOnPort 65390 -#define Consts_SGroupIndexTooLow 65391 -#define RTLConsts_SUnknownProperty 65392 -#define RTLConsts_SWriteError 65393 -#define RTLConsts_SThreadCreateError 65394 -#define RTLConsts_SThreadError 65395 -#define Consts_SInvalidBitmap 65396 -#define Consts_SInvalidIcon 65397 -#define Consts_SInvalidMetafile 65398 -#define Consts_SChangeIconSize 65399 -#define Consts_SUnknownClipboardFormat 65400 -#define Consts_SOutOfResources 65401 -#define Consts_SNoCanvasHandle 65402 -#define Consts_SInvalidImageSize 65403 -#define Consts_SInvalidImageList 65404 -#define Consts_SImageIndexError 65405 -#define Consts_SImageReadFail 65406 -#define Consts_SImageWriteFail 65407 -#define RTLConsts_SInvalidName 65408 -#define RTLConsts_SInvalidProperty 65409 -#define RTLConsts_SInvalidPropertyPath 65410 -#define RTLConsts_SInvalidPropertyValue 65411 -#define RTLConsts_SListCapacityError 65412 -#define RTLConsts_SListCountError 65413 -#define RTLConsts_SListIndexError 65414 -#define RTLConsts_SMemoryStreamError 65415 -#define RTLConsts_SPropertyException 65416 -#define RTLConsts_SReadError 65417 -#define RTLConsts_SReadOnlyProperty 65418 -#define RTLConsts_SRegSetDataFailed 65419 -#define RTLConsts_SResNotFound 65420 -#define RTLConsts_SSeekNotImplemented 65421 -#define RTLConsts_SSortedListError 65422 -#define RTLConsts_SUnknownGroup 65423 -#define SysConst_SLongDayNameSat 65424 -#define SysConst_SCannotCreateDir 65425 -#define RTLConsts_SAncestorNotFound 65426 -#define RTLConsts_SAssignError 65427 -#define RTLConsts_SBitsIndexError 65428 -#define RTLConsts_SCantWriteResourceStreamError 65429 -#define RTLConsts_SCheckSynchronizeError 65430 -#define RTLConsts_SClassNotFound 65431 -#define RTLConsts_SDuplicateClass 65432 -#define RTLConsts_SDuplicateItem 65433 -#define RTLConsts_SDuplicateName 65434 -#define RTLConsts_SDuplicateString 65435 -#define RTLConsts_SFCreateErrorEx 65436 -#define RTLConsts_SFOpenErrorEx 65437 -#define RTLConsts_SIniFileWriteError 65438 -#define RTLConsts_SInvalidImage 65439 -#define SysConst_SLongMonthNameOct 65440 -#define SysConst_SLongMonthNameNov 65441 -#define SysConst_SLongMonthNameDec 65442 -#define SysConst_SShortDayNameSun 65443 -#define SysConst_SShortDayNameMon 65444 -#define SysConst_SShortDayNameTue 65445 -#define SysConst_SShortDayNameWed 65446 -#define SysConst_SShortDayNameThu 65447 -#define SysConst_SShortDayNameFri 65448 -#define SysConst_SShortDayNameSat 65449 -#define SysConst_SLongDayNameSun 65450 -#define SysConst_SLongDayNameMon 65451 -#define SysConst_SLongDayNameTue 65452 -#define SysConst_SLongDayNameWed 65453 -#define SysConst_SLongDayNameThu 65454 -#define SysConst_SLongDayNameFri 65455 -#define SysConst_SShortMonthNameJun 65456 -#define SysConst_SShortMonthNameJul 65457 -#define SysConst_SShortMonthNameAug 65458 -#define SysConst_SShortMonthNameSep 65459 -#define SysConst_SShortMonthNameOct 65460 -#define SysConst_SShortMonthNameNov 65461 -#define SysConst_SShortMonthNameDec 65462 -#define SysConst_SLongMonthNameJan 65463 -#define SysConst_SLongMonthNameFeb 65464 -#define SysConst_SLongMonthNameMar 65465 -#define SysConst_SLongMonthNameApr 65466 -#define SysConst_SLongMonthNameMay 65467 -#define SysConst_SLongMonthNameJun 65468 -#define SysConst_SLongMonthNameJul 65469 -#define SysConst_SLongMonthNameAug 65470 -#define SysConst_SLongMonthNameSep 65471 -#define SysConst_SVarNotImplemented 65472 -#define SysConst_SVarUnexpected 65473 -#define SysConst_SExternalException 65474 -#define SysConst_SAssertionFailed 65475 -#define SysConst_SIntfCastError 65476 -#define SysConst_SSafecallException 65477 -#define SysConst_SAssertError 65478 -#define SysConst_SAbstractError 65479 -#define SysConst_SModuleAccessViolation 65480 -#define SysConst_SOSError 65481 -#define SysConst_SUnkOSError 65482 -#define SysConst_SShortMonthNameJan 65483 -#define SysConst_SShortMonthNameFeb 65484 -#define SysConst_SShortMonthNameMar 65485 -#define SysConst_SShortMonthNameApr 65486 -#define SysConst_SShortMonthNameMay 65487 -#define SysConst_SInvalidFormat 65488 -#define SysConst_SArgumentMissing 65489 -#define SysConst_SDispatchError 65490 -#define SysConst_SReadAccess 65491 -#define SysConst_SWriteAccess 65492 -#define SysConst_SVarArrayCreate 65493 -#define SysConst_SVarArrayBounds 65494 -#define SysConst_SVarArrayLocked 65495 -#define SysConst_SInvalidVarCast 65496 -#define SysConst_SInvalidVarOp 65497 -#define SysConst_SInvalidVarOpWithHResultWithPrefix 65498 -#define SysConst_SVarTypeCouldNotConvert 65499 -#define SysConst_SVarTypeConvertOverflow 65500 -#define SysConst_SVarOverflow 65501 -#define SysConst_SVarInvalid 65502 -#define SysConst_SVarBadType 65503 -#define SysConst_SDivByZero 65504 -#define SysConst_SRangeError 65505 -#define SysConst_SIntOverflow 65506 -#define SysConst_SInvalidOp 65507 -#define SysConst_SZeroDivide 65508 -#define SysConst_SOverflow 65509 -#define SysConst_SUnderflow 65510 -#define SysConst_SInvalidPointer 65511 -#define SysConst_SInvalidCast 65512 -#define SysConst_SAccessViolationArg3 65513 -#define SysConst_SAccessViolationNoArg 65514 -#define SysConst_SStackOverflow 65515 -#define SysConst_SControlC 65516 -#define SysConst_SPrivilege 65517 -#define SysConst_SException 65518 -#define SysConst_SExceptTitle 65519 -#define SysConst_SInvalidInteger 65520 -#define SysConst_SInvalidFloat 65521 -#define SysConst_SInvalidDate 65522 -#define SysConst_SInvalidTime 65523 -#define SysConst_SInvalidDateTime 65524 -#define SysConst_STimeEncodeError 65525 -#define SysConst_SDateEncodeError 65526 -#define SysConst_SOutOfMemory 65527 -#define SysConst_SInOutError 65528 -#define SysConst_SFileNotFound 65529 -#define SysConst_SInvalidFilename 65530 -#define SysConst_STooManyOpenFiles 65531 -#define SysConst_SAccessDenied 65532 -#define SysConst_SEndOfFile 65533 -#define SysConst_SDiskFull 65534 -#define SysConst_SInvalidInput 65535 -STRINGTABLE -BEGIN - IdResourceStrings_RSUnevenSizeInEncodeStream, "Uneven size in Encode." - IdResourceStrings_RSURINoProto, "Protocol field is empty" - IdResourceStrings_RSURINoHost, "Host field is empty" - IdResourceStrings_RSSocksServerCommandError, "Command not supported." - IdResourceStrings_RSSocksServerAddressError, "Address type not supported." - IdResourceStrings_RSDestinationFileAlreadyExists, "Destination file already exists." - IdResourceStrings_RSSSLAcceptError, "Error accepting connection with SSL." - IdResourceStrings_RSSSLConnectError, "Error connecting with SSL." - IdResourceStrings_RSSSLSettingCipherError, "SetCipher failed." - IdResourceStrings_RSSSLCreatingContextError, "Error creating SSL context." - IdResourceStrings_RSSSLLoadingRootCertError, "Could not load root certificate." - IdResourceStrings_RSSSLLoadingCertError, "Could not load certificate." - IdResourceStrings_RSSSLLoadingKeyError, "Could not load key, check password." - IdResourceStrings_RSSSLGetMethodError, "Error geting SSL method." - IdResourceStrings_RSSSLDataBindingError, "Error binding data to SSL socket." - IdResourceStrings_RSOSSLModeNotSet, "Mode has not been set." - IdResourceStrings_RSOSSLCouldNotLoadSSLLibrary, "Could not load SSL library." - IdResourceStrings_RSOSSLStatusString, "SSL status: \"%s\"" - IdResourceStrings_RSUnevenSizeInDecodeStream, "Uneven size in DecodeToStream." - IdResourceStrings_RSStackEHOSTUNREACH, "No route to host." - IdResourceStrings_RSStackENOTEMPTY, "Directory not empty" - IdResourceStrings_RSStackHOST_NOT_FOUND, "Host not found." - IdResourceStrings_RSSocksRequestFailed, "Request rejected or failed." - IdResourceStrings_RSSocksRequestServerFailed, "Request rejected because SOCKS server cannot connect." - IdResourceStrings_RSSocksRequestIdentFailed, "Request rejected because the client program and identd report different user-ids." - IdResourceStrings_RSSocksUnknownError, "Unknown socks error." - IdResourceStrings_RSSocksServerRespondError, "Socks server did not respond." - IdResourceStrings_RSSocksAuthMethodError, "Invalid socks authentication method." - IdResourceStrings_RSSocksAuthError, "Authentication error to socks server." - IdResourceStrings_RSSocksServerGeneralError, "General SOCKS server failure." - IdResourceStrings_RSSocksServerPermissionError, "Connection not allowed by ruleset." - IdResourceStrings_RSSocksServerNetUnreachableError, "Network unreachable." - IdResourceStrings_RSSocksServerHostUnreachableError, "Host unreachable." - IdResourceStrings_RSSocksServerConnectionRefusedError, "Connection refused." - IdResourceStrings_RSSocksServerTTLExpiredError, "TTL expired." - IdResourceStrings_RSStackEADDRNOTAVAIL, "Cannot assign requested address." - IdResourceStrings_RSStackENETDOWN, "Network is down." - IdResourceStrings_RSStackENETUNREACH, "Network is unreachable." - IdResourceStrings_RSStackENETRESET, "Net dropped connection or reset." - IdResourceStrings_RSStackECONNABORTED, "Software caused connection abort." - IdResourceStrings_RSStackECONNRESET, "Connection reset by peer." - IdResourceStrings_RSStackENOBUFS, "No buffer space available." - IdResourceStrings_RSStackEISCONN, "Socket is already connected." - IdResourceStrings_RSStackENOTCONN, "Socket is not connected." - IdResourceStrings_RSStackESHUTDOWN, "Cannot send or receive after socket is closed." - IdResourceStrings_RSStackETOOMANYREFS, "Too many references, cannot splice." - IdResourceStrings_RSStackETIMEDOUT, "Connection timed out." - IdResourceStrings_RSStackECONNREFUSED, "Connection refused." - IdResourceStrings_RSStackELOOP, "Too many levels of symbolic links." - IdResourceStrings_RSStackENAMETOOLONG, "File name too long." - IdResourceStrings_RSStackEHOSTDOWN, "Host is down." - IdResourceStrings_RSStackEINVAL, "Invalid argument." - IdResourceStrings_RSStackEMFILE, "Too many open files." - IdResourceStrings_RSStackEWOULDBLOCK, "Operation would block. " - IdResourceStrings_RSStackEINPROGRESS, "Operation now in progress." - IdResourceStrings_RSStackEALREADY, "Operation already in progress." - IdResourceStrings_RSStackENOTSOCK, "Socket operation on non-socket." - IdResourceStrings_RSStackEDESTADDRREQ, "Destination address required." - IdResourceStrings_RSStackEMSGSIZE, "Message too long." - IdResourceStrings_RSStackEPROTOTYPE, "Protocol wrong type for socket." - IdResourceStrings_RSStackENOPROTOOPT, "Bad protocol option." - IdResourceStrings_RSStackEPROTONOSUPPORT, "Protocol not supported." - IdResourceStrings_RSStackESOCKTNOSUPPORT, "Socket type not supported." - IdResourceStrings_RSStackEOPNOTSUPP, "Operation not supported on socket." - IdResourceStrings_RSStackEPFNOSUPPORT, "Protocol family not supported." - IdResourceStrings_RSStackEAFNOSUPPORT, "Address family not supported by protocol family." - IdResourceStrings_RSStackEADDRINUSE, "Address already in use." - IdResourceStrings_RSStatusText, "%s" - IdResourceStrings_RSConnectTimeout, "Connect timed out." - IdResourceStrings_RSHTTPChunkStarted, "Chunk Started" - IdResourceStrings_RSHTTPAuthAlreadyRegistered, "This authentication method is already registered with class name %s." - IdResourceStrings_RSFTPUnknownHost, "Unknown" - IdResourceStrings_RSInvalidFTPListingFormat, "Unknown FTP listing format" - IdResourceStrings_RSFTPStatusReady, "Connection established" - IdResourceStrings_RSFTPStatusStartTransfer, "Starting FTP transfer" - IdResourceStrings_RSFTPStatusDoneTransfer, "Transfer complete" - IdResourceStrings_RSFTPStatusAbortTransfer, "Transfer aborted" - IdResourceStrings_RSInvalidServiceName, "%s is not a valid service." - IdResourceStrings_RSStackError, "Socket Error # %d\r\n%s" - IdResourceStrings_RSStackEINTR, "Interrupted system call." - IdResourceStrings_RSStackEBADF, "Bad file number." - IdResourceStrings_RSStackEACCES, "Access denied." - IdResourceStrings_RSStackEFAULT, "Bad address." - IdResourceStrings_RSFileNotFound, "File \"%s\" not found" - IdResourceStrings_RSOnlyOneAntiFreeze, "Only one TIdAntiFreeze can exist per application." - IdResourceStrings_RSIOHandlerPropInvalid, "IOHandler value is not valid" - IdResourceStrings_RSNotConnected, "Not Connected" - IdResourceStrings_RSIdNoDataToRead, "No data to read." - IdResourceStrings_RSCanNotBindRange, "Can not bind in port range (%d - %d)" - IdResourceStrings_RSInvalidPortRange, "Invalid Port Range (%d - %d)" - IdResourceStrings_RSReadTimeout, "Read Timeout" - IdResourceStrings_RSReadLnMaxLineLengthExceeded, "Max line length exceeded." - IdResourceStrings_RSWS2CallError, "Error on call Winsock2 library function %s" - IdResourceStrings_RSWS2LoadError, "Error on loading Winsock2 library (%s)" - IdResourceStrings_RSStatusResolving, "Resolving hostname %s." - IdResourceStrings_RSStatusConnecting, "Connecting to %s." - IdResourceStrings_RSStatusConnected, "Connected." - IdResourceStrings_RSStatusDisconnecting, "Disconnecting." - IdResourceStrings_RSStatusDisconnected, "Disconnected." - ComStrs_sRichEditSaveFail, "Failed to Save Stream" - WinHelpViewer_hNoKeyword, "No help keyword specified." - ComConst_SOleError, "OLE error %.8x" - ComConst_SNoMethod, "Method '%s' not supported by automation object" - ComConst_SVarNotObject, "Variant does not reference an automation object" - ComConst_STooManyParams, "Dispatch methods do not support more than 64 parameters" - ComConst_SDCOMNotInstalled, "DCOM not installed" - OleConst_sNoRunningObject, "Unable to retrieve a pointer to a running object registered with OLE for %s/%s" - IdResourceStrings_RSAlreadyConnected, "Already connected." - IdResourceStrings_RSCannotAllocateSocket, "Cannot allocate socket." - IdResourceStrings_RSConnectionClosedGracefully, "Connection Closed Gracefully." - IdResourceStrings_RSCouldNotBindSocket, "Could not bind socket. Address and port are already in use." - IdResourceStrings_RSFailedTimeZoneInfo, "Failed attempting to retrieve time zone information." - IdResourceStrings_RSNotEnoughDataInBuffer, "Not enough data in buffer." - IdResourceStrings_RSWinsockInitializationError, "Winsock Initialization Error." - IdResourceStrings_RSSetSizeExceeded, "Set Size Exceeded." - ExtCtrls_clNameInactiveBorder, "Inactive Border" - ExtCtrls_clNameInactiveCaption, "Inactive Caption" - ExtCtrls_clNameInactiveCaptionText, "Inactive Caption Text" - ExtCtrls_clNameInfoBk, "Info Background" - ExtCtrls_clNameInfoText, "Info Text" - ExtCtrls_clNameMenu, "Menu Background" - ExtCtrls_clNameMenuText, "Menu Text" - ExtCtrls_clNameNone, "None" - ExtCtrls_clNameScrollBar, "Scroll Bar" - ExtCtrls_clName3DDkShadow, "3D Dark Shadow" - ExtCtrls_clName3DLight, "3D Light" - ExtCtrls_clNameWindow, "Window Background" - ExtCtrls_clNameWindowFrame, "Window Frame" - ExtCtrls_clNameWindowText, "Window Text" - ComStrs_sRichEditInsertError, "RichEdit line insertion error" - ComStrs_sRichEditLoadFail, "Failed to Load Stream" - ExtCtrls_clNameSkyBlue, "Sky Blue" - ExtCtrls_clNameCream, "Cream" - ExtCtrls_clNameMedGray, "Medium Gray" - ExtCtrls_clNameActiveBorder, "Active Border" - ExtCtrls_clNameActiveCaption, "Active Caption" - ExtCtrls_clNameAppWorkSpace, "Application Workspace" - ExtCtrls_clNameBackground, "Background" - ExtCtrls_clNameBtnFace, "Button Face" - ExtCtrls_clNameBtnHighlight, "Button Highlight" - ExtCtrls_clNameBtnShadow, "Button Shadow" - ExtCtrls_clNameBtnText, "Button Text" - ExtCtrls_clNameCaptionText, "Caption Text" - ExtCtrls_clNameDefault, "Default" - ExtCtrls_clNameGrayText, "Gray Text" - ExtCtrls_clNameHighlight, "Highlight Background" - ExtCtrls_clNameHighlightText, "Highlight Text" - ExtCtrls_clNameMaroon, "Maroon" - ExtCtrls_clNameGreen, "Green" - ExtCtrls_clNameOlive, "Olive" - ExtCtrls_clNameNavy, "Navy" - ExtCtrls_clNamePurple, "Purple" - ExtCtrls_clNameTeal, "Teal" - ExtCtrls_clNameGray, "Gray" - ExtCtrls_clNameSilver, "Silver" - ExtCtrls_clNameRed, "Red" - ExtCtrls_clNameLime, "Lime" - ExtCtrls_clNameYellow, "Yellow" - ExtCtrls_clNameBlue, "Blue" - ExtCtrls_clNameFuchsia, "Fuchsia" - ExtCtrls_clNameAqua, "Aqua" - ExtCtrls_clNameWhite, "White" - ExtCtrls_clNameMoneyGreen, "Money Green" - Consts_SmkcCtrl, "Ctrl+" - Consts_SmkcAlt, "Alt+" - Consts_SIconToClipboard, "Clipboard does not support Icons" - Consts_SCannotOpenClipboard, "Cannot open clipboard" - Consts_SInvalidMemoSize, "Text exceeds memo capacity" - Consts_SNoDefaultPrinter, "There is no default printer currently selected" - Consts_SDuplicateMenus, "Menu '%s' is already being used by another form" - Consts_SDockedCtlNeedsName, "Docked control must have a name" - Consts_SDockTreeRemoveError, "Error removing control from dock tree" - Consts_SDockZoneNotFound, " - Dock zone not found" - Consts_SDockZoneHasNoCtl, " - Dock zone has no control" - HelpIntfs_hNoTableOfContents, "Unable to find a Table of Contents" - HelpIntfs_hNothingFound, "No help found for %s" - HelpIntfs_hNoContext, "No context-sensitive help installed" - HelpIntfs_hNoTopics, "No topic-based help system installed" - ExtCtrls_clNameBlack, "Black" - Consts_SmkcBkSp, "BkSp" - Consts_SmkcTab, "Tab" - Consts_SmkcEsc, "Esc" - Consts_SmkcEnter, "Enter" - Consts_SmkcSpace, "Space" - Consts_SmkcPgUp, "PgUp" - Consts_SmkcPgDn, "PgDn" - Consts_SmkcEnd, "End" - Consts_SmkcHome, "Home" - Consts_SmkcLeft, "Left" - Consts_SmkcUp, "Up" - Consts_SmkcRight, "Right" - Consts_SmkcDown, "Down" - Consts_SmkcIns, "Ins" - Consts_SmkcDel, "Del" - Consts_SmkcShift, "Shift+" - Consts_SVBitmaps, "Bitmaps" - Consts_SMsgDlgWarning, "Warning" - Consts_SMsgDlgError, "Error" - Consts_SMsgDlgInformation, "Information" - Consts_SMsgDlgConfirm, "Confirm" - Consts_SMsgDlgYes, "&Yes" - Consts_SMsgDlgNo, "&No" - Consts_SMsgDlgOK, "OK" - Consts_SMsgDlgCancel, "Cancel" - Consts_SMsgDlgHelp, "&Help" - Consts_SMsgDlgAbort, "&Abort" - Consts_SMsgDlgRetry, "&Retry" - Consts_SMsgDlgIgnore, "&Ignore" - Consts_SMsgDlgAll, "&All" - Consts_SMsgDlgNoToAll, "N&o to All" - Consts_SMsgDlgYesToAll, "Yes to &All" - Consts_SNoMDIForm, "Cannot create form. No MDI forms are currently active" - Consts_SControlParentSetToSelf, "A control cannot have itself as its parent" - Consts_SOKButton, "OK" - Consts_SCancelButton, "Cancel" - Consts_SYesButton, "&Yes" - Consts_SNoButton, "&No" - Consts_SHelpButton, "&Help" - Consts_SCloseButton, "&Close" - Consts_SIgnoreButton, "&Ignore" - Consts_SRetryButton, "&Retry" - Consts_SAbortButton, "Abort" - Consts_SAllButton, "&All" - Consts_SCannotDragForm, "Cannot drag a form" - Consts_SVMetafiles, "Metafiles" - Consts_SVEnhMetafiles, "Enhanced Metafiles" - Consts_SVIcons, "Icons" - Consts_SWindowDCError, "Error creating window device context" - Consts_SWindowClass, "Error creating window class" - Consts_SCannotFocus, "Cannot focus a disabled or invisible window" - Consts_SParentRequired, "Control '%s' has no parent window" - Consts_SMDIChildNotVisible, "Cannot hide an MDI Child Form" - Consts_SVisibleChanged, "Cannot change Visible in OnShow or OnHide" - Consts_SCannotShowModal, "Cannot make a visible window modal" - Consts_SMenuIndexError, "Menu index out of range" - Consts_SMenuReinserted, "Menu inserted twice" - Consts_SMenuNotFound, "Sub-menu is not in menu" - Consts_SNoTimers, "Not enough timers available" - Consts_SNotPrinting, "Printer is not currently printing" - Consts_SPrinting, "Printing in progress" - Consts_SInvalidPrinter, "Printer selected is not valid" - Consts_SDeviceOnPort, "%s on %s" - Consts_SGroupIndexTooLow, "GroupIndex cannot be less than a previous menu item's GroupIndex" - RTLConsts_SUnknownProperty, "Property %s does not exist" - RTLConsts_SWriteError, "Stream write error" - RTLConsts_SThreadCreateError, "Thread creation error: %s" - RTLConsts_SThreadError, "Thread Error: %s (%d)" - Consts_SInvalidBitmap, "Bitmap image is not valid" - Consts_SInvalidIcon, "Icon image is not valid" - Consts_SInvalidMetafile, "Metafile is not valid" - Consts_SChangeIconSize, "Cannot change the size of an icon" - Consts_SUnknownClipboardFormat, "Unsupported clipboard format" - Consts_SOutOfResources, "Out of system resources" - Consts_SNoCanvasHandle, "Canvas does not allow drawing" - Consts_SInvalidImageSize, "Invalid image size" - Consts_SInvalidImageList, "Invalid ImageList" - Consts_SImageIndexError, "Invalid ImageList Index" - Consts_SImageReadFail, "Failed to read ImageList data from stream" - Consts_SImageWriteFail, "Failed to write ImageList data to stream" - RTLConsts_SInvalidName, "''%s'' is not a valid component name" - RTLConsts_SInvalidProperty, "Invalid property value" - RTLConsts_SInvalidPropertyPath, "Invalid property path" - RTLConsts_SInvalidPropertyValue, "Invalid property value" - RTLConsts_SListCapacityError, "List capacity out of bounds (%d)" - RTLConsts_SListCountError, "List count out of bounds (%d)" - RTLConsts_SListIndexError, "List index out of bounds (%d)" - RTLConsts_SMemoryStreamError, "Out of memory while expanding memory stream" - RTLConsts_SPropertyException, "Error reading %s%s%s: %s" - RTLConsts_SReadError, "Stream read error" - RTLConsts_SReadOnlyProperty, "Property is read-only" - RTLConsts_SRegSetDataFailed, "Failed to set data for '%s'" - RTLConsts_SResNotFound, "Resource %s not found" - RTLConsts_SSeekNotImplemented, "%s.Seek not implemented" - RTLConsts_SSortedListError, "Operation not allowed on sorted list" - RTLConsts_SUnknownGroup, "%s not in a class registration group" - SysConst_SLongDayNameSat, "Saturday" - SysConst_SCannotCreateDir, "Unable to create directory" - RTLConsts_SAncestorNotFound, "Ancestor for '%s' not found" - RTLConsts_SAssignError, "Cannot assign a %s to a %s" - RTLConsts_SBitsIndexError, "Bits index out of range" - RTLConsts_SCantWriteResourceStreamError, "Can't write to a read-only resource stream" - RTLConsts_SCheckSynchronizeError, "CheckSynchronize called from thread $%x, which is NOT the main thread" - RTLConsts_SClassNotFound, "Class %s not found" - RTLConsts_SDuplicateClass, "A class named %s already exists" - RTLConsts_SDuplicateItem, "List does not allow duplicates ($0%x)" - RTLConsts_SDuplicateName, "A component named %s already exists" - RTLConsts_SDuplicateString, "String list does not allow duplicates" - RTLConsts_SFCreateErrorEx, "Cannot create file \"%s\". %s" - RTLConsts_SFOpenErrorEx, "Cannot open file \"%s\". %s" - RTLConsts_SIniFileWriteError, "Unable to write to %s" - RTLConsts_SInvalidImage, "Invalid stream format" - SysConst_SLongMonthNameOct, "October" - SysConst_SLongMonthNameNov, "November" - SysConst_SLongMonthNameDec, "December" - SysConst_SShortDayNameSun, "Sun" - SysConst_SShortDayNameMon, "Mon" - SysConst_SShortDayNameTue, "Tue" - SysConst_SShortDayNameWed, "Wed" - SysConst_SShortDayNameThu, "Thu" - SysConst_SShortDayNameFri, "Fri" - SysConst_SShortDayNameSat, "Sat" - SysConst_SLongDayNameSun, "Sunday" - SysConst_SLongDayNameMon, "Monday" - SysConst_SLongDayNameTue, "Tuesday" - SysConst_SLongDayNameWed, "Wednesday" - SysConst_SLongDayNameThu, "Thursday" - SysConst_SLongDayNameFri, "Friday" - SysConst_SShortMonthNameJun, "Jun" - SysConst_SShortMonthNameJul, "Jul" - SysConst_SShortMonthNameAug, "Aug" - SysConst_SShortMonthNameSep, "Sep" - SysConst_SShortMonthNameOct, "Oct" - SysConst_SShortMonthNameNov, "Nov" - SysConst_SShortMonthNameDec, "Dec" - SysConst_SLongMonthNameJan, "January" - SysConst_SLongMonthNameFeb, "February" - SysConst_SLongMonthNameMar, "March" - SysConst_SLongMonthNameApr, "April" - SysConst_SLongMonthNameMay, "May" - SysConst_SLongMonthNameJun, "June" - SysConst_SLongMonthNameJul, "July" - SysConst_SLongMonthNameAug, "August" - SysConst_SLongMonthNameSep, "September" - SysConst_SVarNotImplemented, "Operation not supported" - SysConst_SVarUnexpected, "Unexpected variant error" - SysConst_SExternalException, "External exception %x" - SysConst_SAssertionFailed, "Assertion failed" - SysConst_SIntfCastError, "Interface not supported" - SysConst_SSafecallException, "Exception in safecall method" - SysConst_SAssertError, "%s (%s, line %d)" - SysConst_SAbstractError, "Abstract Error" - SysConst_SModuleAccessViolation, "Access violation at address %p in module '%s'. %s of address %p" - SysConst_SOSError, "System Error. Code: %d.\r\n%s" - SysConst_SUnkOSError, "A call to an OS function failed" - SysConst_SShortMonthNameJan, "Jan" - SysConst_SShortMonthNameFeb, "Feb" - SysConst_SShortMonthNameMar, "Mar" - SysConst_SShortMonthNameApr, "Apr" - SysConst_SShortMonthNameMay, "May" - SysConst_SInvalidFormat, "Format '%s' invalid or incompatible with argument" - SysConst_SArgumentMissing, "No argument for format '%s'" - SysConst_SDispatchError, "Variant method calls not supported" - SysConst_SReadAccess, "Read" - SysConst_SWriteAccess, "Write" - SysConst_SVarArrayCreate, "Error creating variant or safe array" - SysConst_SVarArrayBounds, "Variant or safe array index out of bounds" - SysConst_SVarArrayLocked, "Variant or safe array is locked" - SysConst_SInvalidVarCast, "Invalid variant type conversion" - SysConst_SInvalidVarOp, "Invalid variant operation" - SysConst_SInvalidVarOpWithHResultWithPrefix, "Invalid variant operation (%s%.8x)\n%s" - SysConst_SVarTypeCouldNotConvert, "Could not convert variant of type (%s) into type (%s)" - SysConst_SVarTypeConvertOverflow, "Overflow while converting variant of type (%s) into type (%s)" - SysConst_SVarOverflow, "Variant overflow" - SysConst_SVarInvalid, "Invalid argument" - SysConst_SVarBadType, "Invalid variant type" - SysConst_SDivByZero, "Division by zero" - SysConst_SRangeError, "Range check error" - SysConst_SIntOverflow, "Integer overflow" - SysConst_SInvalidOp, "Invalid floating point operation" - SysConst_SZeroDivide, "Floating point division by zero" - SysConst_SOverflow, "Floating point overflow" - SysConst_SUnderflow, "Floating point underflow" - SysConst_SInvalidPointer, "Invalid pointer operation" - SysConst_SInvalidCast, "Invalid class typecast" - SysConst_SAccessViolationArg3, "Access violation at address %p. %s of address %p" - SysConst_SAccessViolationNoArg, "Access violation" - SysConst_SStackOverflow, "Stack overflow" - SysConst_SControlC, "Control-C hit" - SysConst_SPrivilege, "Privileged instruction" - SysConst_SException, "Exception %s in module %s at %p.\r\n%s%s\r\n" - SysConst_SExceptTitle, "Application Error" - SysConst_SInvalidInteger, "'%s' is not a valid integer value" - SysConst_SInvalidFloat, "'%s' is not a valid floating point value" - SysConst_SInvalidDate, "'%s' is not a valid date" - SysConst_SInvalidTime, "'%s' is not a valid time" - SysConst_SInvalidDateTime, "'%s' is not a valid date and time" - SysConst_STimeEncodeError, "Invalid argument to time encode" - SysConst_SDateEncodeError, "Invalid argument to date encode" - SysConst_SOutOfMemory, "Out of memory" - SysConst_SInOutError, "I/O error %d" - SysConst_SFileNotFound, "File not found" - SysConst_SInvalidFilename, "Invalid filename" - SysConst_STooManyOpenFiles, "Too many open files" - SysConst_SAccessDenied, "File access denied" - SysConst_SEndOfFile, "Read beyond end of file" - SysConst_SDiskFull, "Disk full" - SysConst_SInvalidInput, "Invalid numeric input" -END - diff --git a/installcacic/installcacic.res b/installcacic/installcacic.res index 704c0d7..73358ee 100644 Binary files a/installcacic/installcacic.res and b/installcacic/installcacic.res differ diff --git a/installcacic/uInstallCACIC.dcu b/installcacic/uInstallCACIC.dcu deleted file mode 100644 index a4a89a9..0000000 Binary files a/installcacic/uInstallCACIC.dcu and /dev/null differ diff --git a/mapacacic/MapaCACIC.cfg b/mapacacic/MapaCACIC.cfg deleted file mode 100644 index da046fd..0000000 --- a/mapacacic/MapaCACIC.cfg +++ /dev/null @@ -1,43 +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+ --$Y- --$Z1 --cg --AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; --H+ --W+ --M --$M16384,1048576 --K$00400000 --E"C:\Agentes_Windows_BINARIOS" --LE"c:\program files (x86)\borland\delphi7\Projects\Bpl" --LN"c:\program files (x86)\borland\delphi7\Projects\Bpl" --U"C:\vendors_lib;C:\vendors_lib\MD5;C:\agentes_Windows;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib\MagWMI" --O"C:\vendors_lib;C:\vendors_lib\MD5;C:\agentes_Windows;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib\MagWMI" --I"C:\vendors_lib;C:\vendors_lib\MD5;C:\agentes_Windows;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib\MagWMI" --R"C:\vendors_lib;C:\vendors_lib\MD5;C:\agentes_Windows;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib\MagWMI" --w-UNSAFE_TYPE --w-UNSAFE_CODE --w-UNSAFE_CAST diff --git a/mapacacic/MapaCACIC.dpr b/mapacacic/MapaCACIC.dpr index 4b0a047..ff7ebd2 100644 --- a/mapacacic/MapaCACIC.dpr +++ b/mapacacic/MapaCACIC.dpr @@ -52,7 +52,7 @@ begin begin Application.Initialize; Application.CreateForm(TfrmMapaCacic, frmMapaCacic); - Application.Run; + Application.Run; end; oCacic.Free(); end. diff --git a/mapacacic/MapaCACIC.dproj b/mapacacic/MapaCACIC.dproj new file mode 100644 index 0000000..7a3305b --- /dev/null +++ b/mapacacic/MapaCACIC.dproj @@ -0,0 +1,53 @@ + + + + {bd12cdd9-2bb5-4ae7-9da9-8d9f09bab843} + MapaCACIC.dpr + Release + AnyCPU + DCC32 + ..\..\Agentes_Windows_BINARIOS\MapaCACIC.exe + + + 7.0 + False + False + False + 0 + C:\devel\cacic\Agentes_Windows_BINARIOS + DEBUG + + + 7.0 + False + False + False + 0 + C:\devel\cacic\Agentes_Windows_BINARIOS + C:\vendors_lib;C:\vendors_lib\MD5;C:\agentes_Windows;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib\MagWMI;C:\devel\cacic\agente-windows + C:\vendors_lib;C:\vendors_lib\MD5;C:\agentes_Windows;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib\MagWMI;C:\devel\cacic\agente-windows + C:\vendors_lib;C:\vendors_lib\MD5;C:\agentes_Windows;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib\MagWMI;C:\devel\cacic\agente-windows + C:\vendors_lib;C:\vendors_lib\MD5;C:\agentes_Windows;C:\vendors_lib\CriptografiaDCP;C:\vendors_lib\PJVersion;C:\vendors_lib\MagWMI;C:\devel\cacic\agente-windows + DEBUG + + + Delphi.Personality + VCLApplication + +FalseTrueFalseC:\Arquivos de programas\Borland\Delphi7\Bin\TrueFalse2801212FalseFalseFalseFalseFalse10461252Dataprev - Emp. de TI da Prev.Social - URES/SESSSistema CACIC - Módulo Avulso para Coleta de Informações Patrimoniais2.8.0.1212MapaCACIC3.0Licença: GNU/LGPLMapaCACIC.dpr + + + + + MainSource + + + + +
frmAcesso
+
+ +
frmMapaCacic
+
+
+
\ No newline at end of file diff --git a/mapacacic/MapaCACIC.drc b/mapacacic/MapaCACIC.drc deleted file mode 100644 index a81d7c4..0000000 --- a/mapacacic/MapaCACIC.drc +++ /dev/null @@ -1,10 +0,0 @@ -/* VER150 - Generated by the Borland Delphi Pascal Compiler - because -GD or --drc was supplied to the compiler. - - This file contains compiler-generated resources that - were bound to the executable. - If this file is empty, then no compiler-generated - resources were bound to the produced executable. -*/ - diff --git a/mapacacic/MapaCACIC.res b/mapacacic/MapaCACIC.res index 4ee32f9..4cd4200 100644 Binary files a/mapacacic/MapaCACIC.res and b/mapacacic/MapaCACIC.res differ diff --git a/mapacacic/uAcessoMapa.dcu b/mapacacic/uAcessoMapa.dcu deleted file mode 100644 index dc78fd0..0000000 Binary files a/mapacacic/uAcessoMapa.dcu and /dev/null differ diff --git a/mapacacic/uMainMapa.dcu b/mapacacic/uMainMapa.dcu deleted file mode 100644 index ab05c48..0000000 Binary files a/mapacacic/uMainMapa.dcu and /dev/null differ -- libgit2 0.21.2