[Delphi] ISO-8859-2

[evil]

Cześć jestem tu nowy więc prosze się nie smiac z mojego banalnego problemu. Chodzi mi o to że pisze edytor html i nie wiem jak zrobić kodowanie ISO-8859-2 bo mi [b]kżaczkiwyskakują jak zapisują?

[Jason]

Poszukaj sobię programu Notesik, chyba jest na stronie http://windows.online.pl
Ma konwersję znaków z Win do ISO, właśnie tak jak chcesz

A tak na serio, to musisz zrobić tak aby przelatywał cały tekst i jeśli napotka na znaki takie jak ą, ś itp. to żeby je zamieniał,
ą na ±,
ś na ¶
itd.

Powodzenia.

[KKKas]

To jest zamiana ISO -> Win. A T chcesz na odwrót, więc już sobie zamień miejscami.

[code=Delphi] function set_pl_chars(S: String): String;
var i: Integer;
Y[BHHH[
ĘHTÓISBR5ś`6\"c5śŁ6\"cR6\"cbMmt
Ą4(
ĄMmt
Ą4(Chr(177): S[i] := Chr(185);
Chr(182): S[i] := Chr(156NBN
NWHHMNJNB[BB[3ŚVćC [/code]

[evil]

Wielkie dzieki. Pisałem na innych forach ale nigdzie nie znalazłem odpowiedzi.

Thx.


A żeby tego użyć to trzeba: SynEdit1.Text := set_pl_chars(SynEdit1.Text); - bo nie mam teraz delphi przy sobie?

[KKKas]

[quote] A żeby tego użyć to trzeba: SynEdit1.Text := set_pl_chars(SynEdit1.Text); - bo nie mam teraz delphi przy sobie? [/quote]Pewnie tak. Tylko jak pisałem, popraw sobie tą funkcję, bo ona konwertuje z ISO na Win.

[evil]

jasne, to już pestka. Jeszcze raz dzieki