Solved

Change Characters

Posted on 1997-10-20
2
132 Views
Last Modified: 2010-04-04
I'm making an program to hold all my passwords.
Example: I have an word WATCH and I want to change every letter seperated. So letter CHR(W) gives an number + 10 gives another ASCII code how do I get the number back in to an ASCII character. And I need to get the next letters ATCH.
0
Comment
Question by:CyberChild
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
2 Comments
 
LVL 5

Accepted Solution

by:
JimBob091197 earned 10 total points
ID: 1348345
Use the Ord & Chr functions.
Example:
Chr(65) -->  'A'
Ord('A') --> 65

Thus:
for i := 1 to Length(MyString) do
    MyString[i] := Chr(Ord(MyString[i]) + 10);

JB
0
 

Author Comment

by:CyberChild
ID: 1348346
It looks easy if you see the code.

Thanks,
0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

A lot of questions regard threads in Delphi.   One of the more specific questions is how to show progress of the thread.   Updating a progressbar from inside a thread is a mistake. A solution to this would be to send a synchronized message to the…
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…
In an interesting question (https://www.experts-exchange.com/questions/29008360/) here at Experts Exchange, a member asked how to split a single image into multiple images. The primary usage for this is to place many photographs on a flatbed scanner…

752 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