ram_bh Posted February 20, 2018 Report Share Posted February 20, 2018 Prezados(as), Alguém conhece algum aplicativo que faça a indentação em programas? Vou converter programas antigos e com a indentação fica melhor o entendimento da lógica de execução... Obrigado! Rodrigo Melo BH / MG Quote Link to comment Share on other sites More sharing options...
Wellington Vieira Posted February 20, 2018 Report Share Posted February 20, 2018 bom dia Eu uso com muita frequencia o NOTEPAD++ https://notepad-plus-plus.org/download/v7.5.4.html Quote Link to comment Share on other sites More sharing options...
cnavarro Posted February 20, 2018 Report Share Posted February 20, 2018 La utilidad hb_format.exe de Harbour Quote Link to comment Share on other sites More sharing options...
kapiaba Posted February 20, 2018 Report Share Posted February 20, 2018 La utilidad hb_format.exe de Harbour Master, donde se encuentra BCC.DLL de 32 bits del Harbour? Gracias, saludos. Quote Link to comment Share on other sites More sharing options...
cnavarro Posted February 20, 2018 Report Share Posted February 20, 2018 Disculpa, es hbformat.exe Normalmente esa DLL está en la carpeta Bin, si no la tienes, dime para qué compilador ( version ) la necesitas kapiaba 1 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted February 20, 2018 Report Share Posted February 20, 2018 Gracias master, Resuelto con esta versión de Antonio Liñares. Funciona perfecto. Saludos. http://forums.fivetechsupport.com/viewtopic.php?f=16&t=32074&p=196894&hilit=bcc.dll#p196894 Quote Link to comment Share on other sites More sharing options...
ram_bh Posted February 20, 2018 Author Report Share Posted February 20, 2018 La utilidad hb_format.exe de Harbour Navarro, gracias. Mas onde encontro as opções e parametros para realizar nova indentação? Quote Link to comment Share on other sites More sharing options...
cnavarro Posted February 20, 2018 Report Share Posted February 20, 2018 En el fichero hbformat.ini # If true, convert file name to lower case lFCaseLow = no # If yes, converts all tabs to spaces #lNoTabs = yes # If yes, indent code lIndent = yes # If yes, make case conversion lCase = yes # If yes, reformat spaces lSpaces = yes # If yes, indent "Function", "Procedure", "Class", "Method" lIndFunc = no # If yes, indent "Local", "Private", etc. in a function beginning lIndVar = yes # If yes, indent directives lIndDrt = no # If yes, indent "Return" lIndRet = yes # If yes, convert asterisk '*' to '//' lCnvAst = yes # If yes, convert '&&' to '//' lCnvAmp = yes # If yes, convert .NOT. TO ! lCnvNot = yes # Eol: -1 - no change, 0 - OS default, 1 - DOS, 2 - UNIX nEol = 0 # Leftmost indent - amount of spaces nIndLeft = 3 # indent - amount of spaces nIndNext = 3 # Indent for continuation ( after ';' ) lines - amount of spaces nIndCont = 3 # Number of spaces after /* and // comments ( -1 - no change ) nSpaceComment = 1 # Case of commands ( -1 - no change, 1 - upper, 2 - lower, 3 - title ) nCaseCmd = 1 # Case of boolean operators ( -1 - no change, 1 - upper, 2 - lower, 3 - title ) nCaseBoo = 1 # Case of functions ( -1 - no change, 1 - upper, 2 - lower, 3 - title, 4 - as in pattern ) nCaseFnc = 4 # Case of functions ( -1 - no change, 1 - upper, 2 - lower, 3 - title ) nCaseUnk = -1 # Case of directives ( -1 - no change, 1 - upper, 2 - lower, 3 - title ) nCaseDrt = 2 # Number of spaces after # in directives ( -1 - no change ) nSpaceDrt = 0 # -1 - no change, 1 - insert empty line before a function ( procedure,class ) declaration, 2 - remove it nLineFnc = 1 # -1 - no change, 1 - insert empty line before return, 2 - remove it nLineRet = 1 # -1 - no change, 1 - insert empty line before variables declaration, 2 - remove it nLineVar = 1 # -1 - no change, 1 - insert empty line before code in function, 2 - remove it nLineCode = 1 # Max level of nesting in brackets, while space is added after a comma nBr4Comma = 8 # Max level of nesting in brackets, while space is added after/before a bracket nBr4Brac = 8 # Extension for a formatted file ( if empty - replace original ) cExtSave = # Extension for a backup file cExtBack = .bak # List of space separated .hbx files for specifying proper casing of function names cHBXList = Quote Link to comment Share on other sites More sharing options...
kapiaba Posted February 20, 2018 Report Share Posted February 20, 2018 Perfecto Master. HBFORMT CLIENTES.PRG hace automático. Muy bueno. Muchas gracias. Quote Link to comment Share on other sites More sharing options...
cnavarro Posted February 20, 2018 Report Share Posted February 20, 2018 Yo lo uso en FivEdit Quote Link to comment Share on other sites More sharing options...
sistem Posted February 20, 2018 Report Share Posted February 20, 2018 tem um post meu das antiga justamente procurando isto. mais não indenta tendo END TRY? ....todos meus prg tem TRY cnavarro tem como resolver, ver imagem abaixo: Quote Link to comment Share on other sites More sharing options...
kapiaba Posted February 21, 2018 Report Share Posted February 21, 2018 Sputnik, tente com o hbformat.exe do xHarbour, pode ser que funcione, veja a diferença de tamanho: Pasta de C:\XHBBCC72\bin 18/02/2017 00:12 922.112 hbformat.exe Quote Link to comment Share on other sites More sharing options...
kapiaba Posted February 21, 2018 Report Share Posted February 21, 2018 Master Cristobal, también no acepta: DO WHIL Quote Link to comment Share on other sites More sharing options...
kapiaba Posted February 21, 2018 Report Share Posted February 21, 2018 hbformat.ini para o xHarbour 7.2 e funciona TRY... END TRY. # $Id: hbformat.ini 18847 2013-02-13 22:33:19Z vszakats $ # # Eol: -1 - no change, 0 - OS default, 1 - DOS, 2 - UNIX nEol = -1 # If true, convert file name to lower case lFCaseLow = no # If yes, converts all tabs to spaces lNoTabs = yes # If yes, indent code lIndent = yes # If yes, make case conversion lCase = yes # If yes, reformat spaces lSpaces = yes # If yes, indent "Function", "Procedure", "Class", "Method" lIndFunc = no # If yes, indent "Local", "Private", etc. in a function beginning lIndVar = yes # If yes, indent directives lIndDrt = no # If yes, indent "Return" lIndRet = yes # Leftmost indent - amount of spaces nIndLeft = 3 # indent - amount of spaces nIndNext = 3 # Indent for continuation ( after ';' ) lines - amount of spaces nIndCont = 3 # If yes, convert asterisk '*' to '//' lCnvAst = yes # If yes, convert '&&' to '//' lCnvAmp = yes # Number of spaces after /* and // comments ( -1 - no change ) #nSpaceComment = 1 # If yes, convert .NOT. TO ! lCnvNot = yes # Case of commands ( -1 - no change, 1 - upper, 2 - lower, 3 - title ) nCaseCmd = 1 # Case of boolean operators ( -1 - no change, 1 - upper, 2 - lower, 3 - title ) nCaseBoo = 1 # Case of functions ( -1 - no change, 1 - upper, 2 - lower, 3 - title, 4 - as in pattern ) nCaseFnc = 4 # Case of functions ( -1 - no change, 1 - upper, 2 - lower, 3 - title ) nCaseUnk = -1 # Case of directives ( -1 - no change, 1 - upper, 2 - lower, 3 - title ) nCaseDrt = 2 # Number of spaces after # in directives ( -1 - no change ) nSpaceDrt = 0 # -1 - no change, 1 - insert empty line before a function ( procedure,class ) declaration, 2 - remove it nLineFnc = 1 # -1 - no change, 1 - insert empty line before return, 2 - remove it nLineRet = 1 # -1 - no change, 1 - insert empty line before variables declaration, 2 - remove it nLineVar = 1 # -1 - no change, 1 - insert empty line before code in function, 2 - remove it nLineCode = 1 # Max level of nesting in brackets, while space is added after a comma nBr4Comma = 1 # Max level of nesting in brackets, while space is added after/before a bracket nBr4Brac = 2 # Extension for a formatted file ( if empty - replace original ) cExtSave = # Extension for a backup file cExtBack = bak # List of space separated .hbx files for specifying proper casing of function names #cHBXList = sistem 1 Quote Link to comment Share on other sites More sharing options...
cnavarro Posted February 21, 2018 Report Share Posted February 21, 2018 2 hours ago, kapiaba said: Master Cristobal, también no acepta: DO WHIL Hay que modificar el codigo para que ese tipo de expresiones las pueda reconocer ( retu, do whil, etc ) kapiaba 1 Quote Link to comment Share on other sites More sharing options...
sistem Posted February 22, 2018 Report Share Posted February 22, 2018 Sputnik, tente com o hbformat.exe do xHarbour, pode ser que funcione, veja a diferença de tamanho: Pasta de C:\XHBBCC72\bin 18/02/2017 00:12 922.112 hbformat.exe trabalhou perfeito kabiaba vlw kapiaba 1 Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.