ďťż

Ładny brzuch

Witam!
Robię translator rosyskich znaków na polskie i na odwrót ;)
Do zamiany znaków używam funkcji StringReplace
Memo1.Text := StringReplace(Memo1.Text,'D','Д',[rfReplaceAll]);
Tyle że w Memo zamiast pokazać się Д wyświetla się ? :kwasny:
Jak sprawić żeby w memo wyświetlić cyrylicę? (dodam że w ustawieniach czcionki po zamianie na RUSSIAN_CHARSET nic nie dało; a komponenty TNT unicode nie chcą się instalować na Delphi w wersji personal :( )
Proszę o pomoc
Użytkownik JaCkObS edytował ten post 14 październik 2006, 16:03

na samym dole masz WIELKIMI LITERAMI Unicode for Delphi 7 Personal http://www.tntware.c...e/downloads.htm

Dzięki :omg:
edit: ok... ale czemu jest cyrylica po wklejeniu, a metodą StringReplace nie działa? :kwasny:
Użytkownik JaCkObS edytował ten post 14 październik 2006, 17:02

Dzięki :omg:
edit: ok... ale czemu jest cyrylica po wklejeniu, a metodą StringReplace nie działa? :kwasny:
bo metoda StringReplace operuje na string a nie WideString


no dobrze... ale jak dam:Memo1.Text := WideString(StringReplace(Memo1.Text,'D','Д',[rfReplaceAll]) );
To też nie działa :(


no dobrze... ale jak dam:Memo1.Text := WideString(StringReplace(Memo1.Text,'D','Д',[rfReplaceAll]) );
To też nie działa :(
bo, jak juz mowile, StringReplace operuje na zwyklych stringach

Dobra, już znalazłem :) ; dziękuję wszystkim :)
Temat do zamknięcia
Użytkownik JaCkObS edytował ten post 15 październik 2006, 19:40
  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
    •