[Delphi] Delphi: Automatyczna zamiana znaków w pliku tekstowym z użyciem Replace i RichEdit

Witam. Chciałbym zrobić automatyczny Replace, żeby zamieniał automatycznie litery na zamienniki. Mogło by to działać w ten sposób:

RichEdit1.Lines.SaveToFile('aa.txt'); // to co wpiszę w RichEdit1 po kilknięciu w przycisk zapisuje do pliku aa.txt
<< formułka dla ReplaceDialog by podmieniał w aa.txt np. ze stringów 'a' na 'b', 'c' na 'd' etc. >>
RichEdit2.Lines.LoadFromFile('aa.txt'); // wkleja zmieniony tekst do RichEdit2

Pomóżcie, pls!

Mętne to trochę.
Chcesz używać do tego standardowego ReplaceDialog, czy po prostu chcesz zamieniać w tekście jedne litery na inne w z góry ustalony sposób?
Z tego co napisałeś, wynika, że nie potrzebujesz żadnych operacji na plikach a jedynie zrobić jakąś formę prostego szyfrowania, przesuwając ASCII znaków o jeden w górę (a->b, b->c, c->d, itd).
Możesz to spokojnie zrobić wczytując plik do dowolnej kontrolki np. TMemo, pozmieniać tekst i zapisać go tą samą metodą.

Ta procka ci zamieni od razu tekst z Rich1 do Rich2 {z "a" na "b"} itp

Sorki, źle się wyraziłem. Nie chcę zmieniać znaków o jeden dalej, tylko na różne inne, tylko chcę uzyskać coś takiego, żeby nie wyświetlało się okienko od Replace i nie pytało jaki znak zamienić na co, tylko żeby po kliknięciu buttona po prostu zamieniło dany znak z np. RichEdit1 i pokazało go w RichEdit2 (Tudzież Memo).

Jestem początkujacym programistą i po prostu nic innego mi do głowy nie przyszło niż użycie Replace Dialog do podmiany literek. Uczę się programowania wymyślając różne śmieszne programy, ten będzie "szyfrował" literki (podmieniał na inne). Bardziej tu chodzi, żeby zdobyć doświadczenie, dlatego nie robię tego XORem etc.

A więc z braku doswiadczenia, pomyslalem ze wszystko sie bedzie robic recznie. Napisalem stałe, że 'a' to będzie np. 'd' i myslalem ze bedzie dało radę to "szyfrować" za pomocą podmiany, bo na początku to mi działało na 1 literce "ręcznie"

if Edit1.Text='b' then Memo1.Lines.Add(b);

z czego b to był string w stałych.

Metoda szyfrowania poprzez zamianę jest bardzo prosta do zrealizowania.
Tworzysz na formie 3 komponenty :
1. Edit1 - zawiera literkę którą chcesz zmienić.
2. Edit2 - zawiera literkę na która chcesz zmienić.
3. Memo1 - zawiera tekst na którym operujesz.

Cały tekst można przerobić, właściwie, jedną komendą:

Musisz jednak uważać z tego typu transformacjami. Aby móc to potem odkodować trzeba zachować odpowiednią kolejność kodowania i dekodowania, oraz trzeba uważać aby nie następowały po sobie np. takie kombinacje. a->s , s->b. Nie będziesz miał, w takim przypadku, najmniejszej szansy na odkodowanie tekstu z powrotem.

Jeżeli chcesz się pobawić w proste kodowanie tekstu, to pomyśl nad przeprowadzaniem operacji matematycznych na kodach ASCII poszczególnych znaków w tekście.

Dzieki wielkie, mam nadzieję, że to ogarnę.

Mój poprzedni "szyfrer" cyferek kodował, można powiedzieć, matematycznie.

Składał się z 3 części: długość_liczba zaszyfrowana_koniec(zero)
i liczba zaszyfrowana była podnoszona do 3 potegi, a długość to była długość liczby. np. 11 = 213310, ale nie umiałem robić odszyfrowywania, więc zmieniłem koncepcję.

Ok idę próbować, jeszcze raz dzięki.

Rychło w czas (ta zmiana koncepcji).
Zakodować to można bardzo prosto w ten twój sposób, ale rozkodowanie nie jest możliwe, niestety.
Zainteresuj się może tą stroną, są tam opisy kilku bardzo prostych metod szyfrowania.
W sam raz na początek.
Co prawda w/w strona operuje raczej C++, ale same opisy algorytmów mogą Cię zainteresować.

Wypas stronka Szczególnie mi się podoba szyfrowanie na kwadracie Genialne w swojej prostocie

A co do StringReplace, mogę zrobić powiedzmy:
richedit2.Text:=StringReplace(memo1.Text, baza_literek_a-z , baza_literek_na_które_zostaną_podmienione, [rfReplaceAll]);
?
Tak to by podmieniało od razu wszystkie litery w tekście, a nie tylko jedną?

Mivan napisał:

A co do StringReplace, mogę zrobić powiedzmy:
richedit2.Text:=StringReplace(memo1.Text, baza_literek_a-z , baza_literek_na_które_zostaną_podmienione, [rfReplaceAll]);
?
Tak to by podmieniało od razu wszystkie litery w tekście, a nie tylko jedną?

Niestety nie.
Nie ma tak łatwo. StringReplace może zmienić wszystkie ciągi znaków na inne, wiele razy w tym samym tekście, ale ciąg startowy i wynikowy musi być ustalony.
Możesz się zainteresować mało znaną funkcją WrapText :
Działa ona podobnie jak opisana przez Ciebie, ale podstawia tylko jeden, podany, ciąg znaków w miejsce szukanego.

Procedurę, która robiłaby to dokładnie w opisany przez Ciebie sposób trzeba napisać samodzielnie.

Ok, dzieki wielkie Pokombinuję, może mi wyjdzie

Proszę pamiętać o używaniu znaczników code. - arnoldziq