如何才能使用MSHTML Command Identifiers，如IDM_BOLD等命令标识-在线等待

Question

我现在用DHTMLEdit做网页编辑器。我在自己的单元中已经包含了如下单元：
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, StdCtrls, Buttons, ComCtrls, OleCtrls, SHDocVw, ExtCtrls, ToolWin, ImgList, Menus，TMLEDLib_TLB,mshtml_tlb,ActiveX,Mshtml；
但是当我编译时，由于用到了IDM_BOLD之类的命令标识，DELPHI编译器出错，提示IDM_BOLD是一个未定义的标识符,我在MSDN中找到了Mshtmcid.h 头文件，但是在Delphi中我没有发现有此单元文件，急求帮忙

Answer 1

BOLD？可以这样，效果一样的Get／SetProperty（‘BOLD’）；function THTMLEdit.GetProperty(const Name: String): OLEVariant;
var
  V: OleVariant;
begin
  if not DocComplete then exit;
  V := DOMInterface.selection.createRange;
  Result := V.queryCommandValue(Name);
end;procedure THTMLEdit.SetProperty(const Name: String; Value: OleVariant);
var
  V: OleVariant;
  S: OleVariant;
begin
  if not DocComplete then exit;
  if GetProperty(Name) <> Value then begin
    V := DOMInterface.selection.createRange;
    S := Value;
    V.execCommand(Name , False, S);
    UpdateDisplay;
  end;
end;IDM_BOLD = 52;想更多的？看http://www.nssoft.net/showdoc.asp?did=478可以给30分我了：）

Answer 2

查询命令可用否
Result := (QueryStatus(IDM_？？？) and DECMDF_ENABLED) = DECMDF_ENABLED去MSDN下载TriEdit的SDK看了