Solved

Hex Converter

Posted on 1999-01-25
9
408 Views
Last Modified: 2010-05-18
I would like to know, if someone could help me with, converting a say, exe-file into a hex number file. Sort of like Ultra Edit.
0
Comment
Question by:inkognito
  • 3
  • 3
  • 2
  • +1
9 Comments
 
LVL 13

Expert Comment

by:Mirkwood
Comment Utility
Take a look at
http://www.csd.net/~cgadd/knowbase/maincat.htm
You find all the examples you need
Hex to bin,
bin to hex.
dec to bin

0
 
LVL 1

Expert Comment

by:Smilly
Comment Utility
Hello Inkognito,

First run thrue your text file, and get all the chars, then send them thrue this
converter.

function Dec2Hex(Dec: byte): string;
var Hi: byte;
    Low: byte;
begin
     Hi:=Dec div 16;
     result:=inttostr(Hi);
     Low:=Dec mod 16;
     case Low of
          10: result:=result+'A';
          11: result:=result+'B';
          12: result:=result+'C';
          13: result:=result+'D';
          14: result:=result+'E';
          15: result:=result+'F';
     else result:=result+inttostr(Low);
     end;
end;

I hope this helps, otherwise, giv me a comment.

Smilly
0
 

Author Comment

by:inkognito
Comment Utility
The link you posted, seems to be very good, for future looking, though at writing time, I haven't had the time to look through the whole page, but I'll just hope for the best. Cuz the problems, is more or less, (problably due to my insufficent detailed question), that I need a fast converter from ASCII(string, dec) to Hex. I've used a BlockRead function, that could barley convert 1 Kb large Txt-filez, but it went so slow, that the program crashed, so I neede a simple / or not, version that won't hang it self, when filez up to a meg are read...
     I hope you understand my prolem, somehow better so that you can help me...?!
0
 
LVL 13

Expert Comment

by:Mirkwood
Comment Utility
Here is a very fast conversion function, is that what you need?

Function Byte2Hex(Number: Byte) : String;
Begin    
    Ch1 := Number SHR 4;
    Ch2 := Number - (Ch1 SHL 4);    Byte2Hex := Hexa[Ch1]+Hexa[Ch2];
End;


0
IT, Stop Being Called Into Every Meeting

Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

 

Author Comment

by:inkognito
Comment Utility
Could you please implement (is it spelled this way?), this function in a little for ... loop, which would go through the whole file. Not that I'm totally bonkers, just don't have the time to try and wait for a result taht could work without too much trouble. And since you're obviously not a new-beginner which I'm Please Help Me!!!!!!!(Am I deperate?)
0
 
LVL 13

Expert Comment

by:Mirkwood
Comment Utility
Sounds like a assignment to me. But OK

Download hexview from http://www.belhard.minsk.by/delphi/D20F5.HTM

Last answer...

0
 
LVL 3

Expert Comment

by:rickpet
Comment Utility
You can find one ...\Borland\Delphi #\Demos\RESXPLOR

look at hexdump.pas


Rick
0
 

Author Comment

by:inkognito
Comment Utility
Well I just have to start by thanking Mirkwood, for the suggestions on my problem, however, I visited the site,
http://www.belhard.minsk.by/delphi/D20F5.HTM, which had a perfect
HexViewer for my purposes, but it didn't have a complete code. Cuz it requested a THexDump component that I didn't find in the Zip-archive, so I'm getting desperate! Please someone out there...
0
 
LVL 3

Accepted Solution

by:
rickpet earned 200 total points
Comment Utility
I guess you didn't read my comment...Thexdump can be found at

You can find one ...\Borland\Delphi #\Demos\RESXPLOR

Rick
0

Featured Post

Do You Know the 4 Main Threat Actor Types?

Do you know the main threat actor types? Most attackers fall into one of four categories, each with their own favored tactics, techniques, and procedures.

Join & Write a Comment

Objective: - This article will help user in how to convert their numeric value become words. How to use 1. You can copy this code in your Unit as function 2. than you can perform your function by type this code The Code   (CODE) The Im…
Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…
Sending a Secure fax is easy with eFax Corporate (http://www.enterprise.efax.com). First, Just open a new email message.  In the To field, type your recipient's fax number @efaxsend.com. You can even send a secure international fax — just include t…
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…

771 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

12 Experts available now in Live!

Get 1:1 Help Now