A small utility (indent prg)

[brunellopulix]

Hi,

is a small utility that I use in my programs.
It is not as sophisticated and complete as the
others but it is useful to me. You can change
it and still do what you want with it.

Usage:

cString := MyIndent('Test.Prg')
FRename('Test.Prg','Test.Bak')
hb_MemoWrit('Test.Prg',cString)
execute file ('Test.Prg') or msginfo('ok')

Brunello

XIndent.zip

(1.94 KiB) Downloaded 104 times

[brunellopulix]

Usage:

cString := XIndent('Test.Prg') (not myindent)
FRename('Test.Prg','Test.Bak')
hb_MemoWrit('Test.Prg',cString)
execute file ('Test.Prg') or msginfo('ok')

Brunello

[brunellopulix]

XIndent.zip

(2.05 KiB) Downloaded 147 times

a small update for better error handling

Brunello

[ASESORMIX]

Muchas Gracias por compartir.

[luisvasquezcl]

Gracias por compartir.
Saludos

[fabiantoro]

Buenos Dias
Alguien tiene la utilidad compilada (.exe)
Gracias

[AUGE_OHR]

hi

nice !

do you know CLICK
http://www.hmgforum.com/viewtopic.php?f=5&t=6223