[prosto_grug]

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

[4kusNick]

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

Код:

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;

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