Delphiben írtam egy programot ami lement egy html-t majd a html-ből a szöveget bemásolja egy memoba. Csak az baj, hogy az ékezetes betűk nem jelennek meg megfelelően. Ilyenkor mit kellene tennem? Nem ártana, rendesen megjelenne a szöveg.

Szia.

UTF to Ansi konvertálás kell :

function UTF8ToString(const S: string): string;

begin

{$IFDEF UNICODE}

Result := UTF8ToUnicodeString(S);

{$ELSE}

Result := UTf8ToAnsi(S);

{$ENDIF}

end;

Illetve d-t igy is meghatározhatod és akkor nem kell a while-s rész :

d:=UTF8ToString(copy (S,eleje+1,vege-eleje-1));

Sok sikert.

Üdv.