При печати выделенного фрагмента (selection) из TWebBrowser на принтер идут кракодяблы. В остальных случаях печатается нормально. Документ загружен из стринга следующим образом:



var
v: Variant;
HTMLDocument: IHTMLDocument2;
begin
HTMLDocument := WebBrowser1.Document as IHTMLDocument2;
v := VarArrayCreate([0, 0], varVariant);
v[0] := HTMLString;
HTMLDocument.Write(PSafeArray(TVarData(v).VArray));
HTMLDocument.Close;
...
end;

Заранее благодарен.