[prosto_grug]

Внимание! Качать всем! Появились исходники программы WordToHtmlConverter на языке Delphi. Полностью рабочая версия. Нет ограничений на пользование кодом. Очень полезная вещь!!! Рекомендую. Ссылка: http://depositfiles.com/files/1198056.

[4kusNick]

Эн не интересно, там конвертирование через Word сделано, причем как-то слишко навороченно, я в своем продукте делал конвертирование так:

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25

function DocToHTML(const pFileNameFrom, pFileNameTo: TFileName): Boolean; var   WordAppl  : OleVariant;   begin     Result := True;     WordAppl := CreateOleObject('Word.Basic');   if VarIsEmpty(WordAppl) then   begin     Result := False;     Exit;   end;   try     WordAppl.FileOpen(pFileNameFrom);     WordAppl.FileSaveAs(Name := pFileNameTo, Format := 8);   finally     try       WordAppl.AppClose;     except     end;   end;   end;

Вот если бы там конвертирование делалось без ворда, то цены бы этому исходнику не было