我想用delphi向word中固定的位置输出字符串（例：7行14列）
还有不限定“行”只限定“列”该怎么实现。
高手指点一下

憑空想像，沒有測過，希望沒有錯誤。
[code delphi]
use comobj;
var
S: array[0..6] of char;
i: integer;
begin
Wordapp := CreateOleObject('Word.application');
{ Set to all spaces }
FillChar(S, SizeOf(S), Ord(' '));
{ Press 14 Enter }
for i := 0 to 14 -1 do begin
wordapp.selection.TypeParagraph;
end;
{ Press 7 Spaces }
WordApp.Selection.TypeText(s);
end;
[/code]

------
努力會更接近成功

你的办法可以用，前提整个文档都是空的，要不都会错位。

OLE里没有像：表格中cell这样方法可以用吗？

編輯記錄

１．不空的字元移動用法
[code delphi]
procedure TForm1.Button29Click(Sender: TObject);
var
Charcount,Linecount, _Unit, _Extend: OleVariant;
begin
// 注意：如果該文檔沒有你要移的數量，它會移到最後一行（字元）
// 移到第14列(向下移13行)
Linecount:=14-1;
_Unit:=wdLine;
_Extend:=wdMove; //wdExtend
Wordapp.Selection.MoveDown(_Unit,LineCount,_Extend);
// 右移7個字元
_Unit:=wdCharacter;
Charcount:=7;
_Extend:=wdMove; //wdExtend
WordApp.Selection.MoveRight(_Unit,Charcount,_Extend);
end;
[/code]
２．Cell的用法，前提要真的有表格
// item 表示第幾個表格
// i j 表示第幾行第幾列
// SetRange表示Start,End字元
WordDoc.Tables.Item(1).Cell(i,j).Range.SetRange(0,0);

------
努力會更接近成功