Pascal script for Hex to dec

PabloM · 2014-02-01 13:34

Please help me

Folder\file
R0000af4d\C00011b1e.jpg
R0000af4e\C00011b29.jpg
R0000af4f\C00011b1d.jpg
R0000af43\C00011b3d.jpg
R0000af44\C00011b23.jpg
R0000af45\C00011b3d.jpg
...

first be removed from the title R,C
second step conversion name of hexadecimal to decimal (Pascal script)

Hex => Dec
0000af4d\00011b1e.jpg => 44877\72478.jpg

den4b · 2014-02-01 14:54

No problem, below is the script to convert Hex in the filename into an Integer:

begin
  FileName := IntToStr(HexToInt(WideStripExtension(FileName))) + 
    WideExtractFileExt(FileName);
end.

Note: Don't forget to remove "R" and "C" at the start with a Replace rule or similar, before applying this script.

PabloM · 2014-02-01 15:25

thanks :D:cool:

PabloM · 2014-02-02 10:05

and for the opposite case

44877\72478.jpg => 0000af4d\00011b1e.jpg

thanks

den4b · 2014-02-02 21:43

For the reverse operation, integer to hex, use this:

const
  DIGITS = 8;
begin
  FileName := IntToHex(StrToInt(WideStripExtension(FileName)), DIGITS) + 
    WideExtractFileExt(FileName);
end.

PabloM · 2014-02-06 22:07

this script rename names to upper case
44877\72478.jpg => 0000AF4D\00011B1E.jpg

I know the rule is to lowercase but I would need it in pascal
44877\72478.jpg => 0000af4d\00011b1e.jpg

thanks

Stefan · 2014-02-07 08:01

PabloM wrote:

lowercase in pascal
44877\72478.jpg => 0000af4d\00011b1e.jpg

Just add another line like:

  FileName := WideLowerCase( FileName );

just above of the line with the "end."

Read more at
http://www.den4b.com/wiki/ReNamer:Pasca … g_Handling
http://www.den4b.com/wiki/ReNamer:Pascal_Script

.

den4b Forum

#1 2014-02-01 13:34

Pascal script for Hex to dec

#2 2014-02-01 14:54

Re: Pascal script for Hex to dec

#3 2014-02-01 15:25

Re: Pascal script for Hex to dec

#4 2014-02-02 10:05

Re: Pascal script for Hex to dec

#5 2014-02-02 21:43

Re: Pascal script for Hex to dec

#6 2014-02-06 22:07

Re: Pascal script for Hex to dec

#7 2014-02-07 08:01

Re: Pascal script for Hex to dec

Board footer