--- C:/Comps/jvcl/run/JvRichEditToHtml.pas	Âò àâã  4 16:27:32 2009
+++ C:/Users/U7/Documents/RAD Studio/Projects/JvRichEditToHtml.pas	Âò àâã  4 16:43:00 2009
@@ -391,7 +391,7 @@
           end
           else
           begin
-            if CharInSet(Text[J], ['A'..'Z', 'a'..'z', '0'..'9']) then
+            if CharIsAlphaNum(Text[J]) then
               St.Append(Text[J])
             else
               St.Append(CharToHtml(Text[J]));
@@ -501,7 +501,7 @@
           end
           else
           begin
-            if CharInSet(Text[J], ['A'..'Z', 'a'..'z', '0'..'9']) then
+            if CharIsAlphaNum(Text[J]) then
               St.Append(Text[J])
             else
               St.Append(CharToHtml(Text[J]));
@@ -561,11 +561,11 @@
 begin
   case Value.Alignment of
     Classes.taLeftJustify:
-      Result := 'ALIGN="LEFT"';
+      Result := 'STYLE="text-align: left;"';
     Classes.taRightJustify:
-      Result := 'ALIGN="RIGHT"';
+      Result := 'STYLE="text-align: right;"';
     Classes.taCenter:
-      Result := 'ALIGN="CENTER"';
+      Result := 'STYLE="text-align: center;"';
   end;
   if Value.Numbering = ComCtrls.nsBullet then
   begin