Deleting Letters in a Delphi Memo

Posted by Dylan

I am making a program that translates everything you say into binary :P.... (A being 1, B being 10, C being 11)... I have 2 Delphi Memo boxes, the first is where you type what you want to translate and the second displays the translation.

I used the KeyDown procedure and said
if Key = Ord('A') then memo2.text := memo2.text + '1'
I did this for every letter so it translates it as you type.

However, if you make a mistake, I want to be able to hit backspace and have the program delete the last translated letter. I would like to know how to delete text in a TMemo using backspace.

Related Articles and Replies