发布网友 发布时间:2022-06-08 14:34
共1个回答
热心网友 时间:2024-11-24 19:45
以下示例代码将光标向右移动lCount个字符:procere TControlWord.MoveToRight(Selected: Boolean; lCount: Integer);var aUnit, aExtend, aCount : OleVariant;begin With FWordApp Do Begin aUnit := wdCharacter; aExtend := wdExtend; aCount := lCount; If Selected Then Selection.MoveRight(aUnit, aCount, aExtend) Else Selection.MoveRight(aUnit, aCount, EmptyParam); End;end;