Re: [Lazarus] How can I increment/decrement a alphanumeric value?

[silvioprog]

 Em 21/08/2010 09:51, Alberto Narduzzi escreveu:

Antônio,

why reinvent the wheel...?

as already pointed out by Henry yesterday:

http://freepascal.org/docs-html/rtl/strutils/dec2numb.html
http://freepascal.org/docs-html/rtl/strutils/numb2dec.html

it is as easy as:

Uses strutils;

Procedure IncrementHex(Var HexS:String);
Begin
  HexS := dec2numb(numb2dec(HexS) + 1);
End;


Cheers, A.

Hi,

This does not solve my problem, I need to use characters from A to Z.

Thanks,

Silvio Clécio

--
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus