在Delphi中怎么读取USB接口中的数据

1. 在Delphi中怎么读取USB接口中的数据

根据GUID ->CreateFile->ReadFile

2. 如何用delphi调用word打开一个文档

delphi 调用 word 打开一个文档，兼容性比较好的办法，是使用 oleObject 来调用本机安装的 word，示例代码如下：

procedure TForm1.Button1Click(Sender: TObject);var MSWord: Variant;begin  MSWord := CreateOLEObject('Word.Application');//连接Word  MSWord.Documents.Open(FileName:='D:\Temp\temp.doc', ReadOnly:=True);  //打开外部Word文档  MSWord.Visible := 1;//是否显示文件编辑  MSWord.ActiveDocument.Range(Start:=0, End:=0);//开始改变的启止位置  MSWord.ActiveDocument.Range.InsertAfter(Text:='myvc');//在Word中增加字符'myvc'  MSWord.ActiveDocument.Range.InsertParagraphAfter;  MSWord.ActiveDocument.Range.Font.Size := 72;//字体大小  MSWord.ActiveDocument.Range.Font.Name := 'Arial';//字体名称end;

3. VBA中BuiltinDocumentProperties(index)属性,里面的index参数有哪些,各代表的中文意思是什么?

wdPropertyAppName应用程序名
wdPropertyAuthor作者
wdPropertyBytes字节数
wdPropertyCategory类别
wdPropertyCharacters字符数
wdPropertyCharsWSpaces
wdPropertyComments备注
wdPropertyCompany单位
wdPropertyFormat格式
wdPropertyHiddenSlides隐藏幻灯片数
wdPropertyHyperlinkBase
wdPropertyKeywords关键词
wdPropertyLastAuthor上一个作者
wdPropertyLines行数
wdPropertyManager经理
wdPropertyMMClips  媒体剪辑数
wdPropertyNotes备注数
wdPropertyPages页数
wdPropertyParas段落数
wdPropertyRevision修订次数
wdPropertySecurity安全性
wdPropertySlides幻灯片数
wdPropertySubject主题
wdPropertyTemplate模板
wdPropertyTimeCreated创建时间
wdPropertyTimeLastPrinted上次打印时间
wdPropertyTimeLastSaved上次保存时间
wdPropertyTitle标题 
wdPropertyVBATotalEdit
wdPropertyWords

4. 在delphi中，如何设置TWordDocument的页码？拜托各位大神

先在MSDN里参考有关Word的PageNumbers和PageNumber两个对象若何应用，然后再到Delphi里写法度榜样。  查看原帖>>

麻烦采纳，谢谢!

5. 我想在 Delphi 程序中直接调用 Word 文档并使用 Word 的功能，这个程序该怎样编? 该用什么控件呢?

方法一： 
　 1) 从 WORD.EXE 中导入 WORD 的 Type Library 
　 2) var　wd : _Application; 
　　　wdt : Table; 
　　　dot1,FileName: OleVariant; 
　 begin 
　　 dot1　:= 'c:\abc.dot'; 
　　 wd := coApplication_.Create; 
　　 wd.Documents.Add(dot1, EmptyParam); 
　　 wdt := wd.ActiveDocument.Tables.Item(1); 
　　 wdt.Cell(1,3).Range.Text := 'Hello!'; 
　　 //以下是保存和关闭文档及 Word, 可以不关，下面两个例程略过此步。 
　　 //EmptyParam 用来代替不使用的参数。 
　　 FileName := 'c:\test.doc'; 
　　 wd.ActiveDocument.SaveAs(FileName,EmptyParam,EmptyParam, 
　　 EmptyParam, 
　　　　 EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam, 
　　　　 EmptyParam, 
　　　　 EmptyParam); 
　　 wd.ActiveDocument.Close(EmptyParam,EmptyParam,EmptyParam); 
　　 wd.Quit(EmptyParam,EmptyParam,EmptyParam); 
　 end; 

　 方法二： 
　 var 
　　 Ole: Variant; 
　　 NewDoc: Variant; 
　　 DocTable: Variant; 
　 begin 
　 //方法二的参数可以直接使用 Delphi 的数据类型。其它方法只能使用 OleVariant 类型. 
　　　 Ole := CreateOleObject('Word.Application'); 
　　　 Ole.Application.Visible := true; 
　　　 NewDoc := Ole.Documents.Add('C:\abc.dot'); 
　　　 DocTable := NewDoc.Tables.Item(1); 
　　　 DocTable.Cell(1,3).Range.Text := 'Hello!'; 
　 //设置Variant对象为UnAssigned来释放该对象的引用。 
　　　 NewDoc := UnAssigned; 
　　　 DocTable := UnAssigned; 
　　　 Ole := UnAssigned; 
　 end; 

　 方法三：使用 Server 页的 TWordApplication 控件，同理，你可以用里头的所有控件。Ole 为TWordApplication控件名称。
　 var 
　　 NewDoc: Variant; 
　　 DocTable: Variant; 
　 o: OleVariant; 
　 begin 
　　 o := 'c:\abc.dot'; 
　　 NewDoc := Ole.Documents.Add(o,EmptyParam); 
　　 DocTable := NewDoc.Tables.Item(1); 
　　 DocTable.Cell(1,3).Range.Text := 'Hello!'; 
　　 NewDoc := UnAssigned; 
　　 DocTable := UnAssigned; 
　 end;

    推荐用方法一和方法三。因为方法二不提供类型参数检查，也因为方法二的接口调用效率低。程序中所使用的属性和方法资料可以在 Office 的 VBA 帮助中查到。需要者请在安装 Office 时选择安装 VBA 编程帮助。