从DBGrid，采用Ole方式导出Word，将纸张设置为横向，无法编译。

Question

delphi 提示“Undeclared identifier:'wdOrientLandscape'”,请高手指教procedure TWordForm.BitBtn2Click(Sender: TObject);
var
  WordApp,WordDoc,WordTable:OleVariant;
begin
  WordApp:=CreateOleObject('Word.Application');
  WordDoc:=WordApp.Documents.Add;
  WordApp.ActiveDocument.PageSetup.Orientation:=wdOrientLandscape;//将纸张调为横向
  WordApp.quit;
  WordApp:=null;
  WordDoc:=null;
  WordTable:=null;
end;

Answer 1

Word是什么版本，你可以导入Word类型库看一下wdOrientLandscape是多少。
我机器上Word 9.0 (Office 2000) 是  wdOrientLandscape = $00000001;
就是常量wdOrientLandscape 相当于1了

Answer 2

导入类型库：主菜单Project,Import Type Library,在列表框中选中类型库（如果是Word2000，应该是 Microsoft Word 9.0 Object Library，别的版本应该名称差不多），点Create Unit按钮就会生成一个就 Word_TLB.pas 的单元。这个就是Delphi根据Word的接口自动产生的Wrapper类了，常量的定义都在里面