Konwertowanie w SynEdit

Jak skonwertować tekst w SynEdit do formatu np ISO-8859-2 przy zapisie do pliku HTML.

var
s: string;
i: Integer;
f: TextFile;
begin
s:=SynEdit1.Lines.Text;
for i:=1 to Length(s) do
case Ord(s) of
100: s[i]:=Chr(101);
...
end;
AssignFile(f, nazwa_pliku);
Rewrite(f);
Write(f, s);
CloseFile(f)
end;

Daj po prostu odpowienie warunki w case dla zamiany liter w win-1250 na iso latin 2.