[Delphi]zmiana

0

Witam mam problem mam 2 Edity i chcĘ że np. jak w pierwszym jest wpisane "A" to żeby w drugim "L" to wiem jak zrobić, ale jak zrobic coś takiego jak np. w 1 edicie było "AS" i żeby zamieniał to w "LK" chodz o to żeby każdą literke z osobna zmieniał i tworzył z tego cały "wyraz"
z góry dzieki źrudłą mile widziane :)

0

AstonMartin napisał:
Witam mam problem mam 2 Edity i chcĘ że np. jak w pierwszym jest wpisane "A" to żeby w drugim "L" to wiem jak zrobić, ale jak zrobic coś takiego jak np. w 1 edicie było "AS" i żeby zamieniał to w "LK" chodz o to żeby każdą literke z osobna zmieniał i tworzył z tego cały "wyraz"
&gtz góry dzieki źrudłą mile widziane :)

uses strutils;

edit2.text:=edit1.text;
edit2.text:=ansireplacetext(edit2.text, 'A', 'L');
edit2.text:=ansireplacetext(edit2.text, 'S', 'K');---------------------------
Delphi 6

Pozdrówka

1 użytkowników online, w tym zalogowanych: 0, gości: 1