Отчётность в Worf

← →
asd © (2006-04-03 21:21) [0]

Поскажите, пожалуйста, как отобразить текст с Memo в Word?
Я знаю, как открыть Word, а дальше не знаю.
var
XLApp:Variant;
begin
XLApp:=CreateOleObject("Excel.Application");
XLApp.Visible:=True;

← →
Palladin © (2006-04-03 21:34) [1]

хоть в орешник...

← →
Жуков Олег (2006-04-04 00:45) [2]

Memo.SaveToFile("Отчёт.DOC");
ShellExecute(... , "Отчёт.DOC", ...);
:)

← →
asd © (2006-04-04 14:13) [3]

А как отобразить это в Word? Первые мои строки кода открывают Word, а дальше , как открыть новую страницу и присвоить туда текст.

ты не попутал, что ты там открываешь в первых строках "своего" кода... вдруг это Photoshop? или пасьянс "Косынка"

var
w:Olevariant;
i:Integer;
begin
w:=createoleobject("Word.Application");
w.Documents.Add;
w.Visible:=true;
for i:=0 to memo1.lines.count-1 do
begin
w.Selection.TypeText(Text:=memo1.lines[i]);
w.Selection.TypeParagraph;
end;
end;

Ой, я открыл в этих строчках Excel. Спасибо большое, просто я работал с Excel, а в Word не знал, как работать.

Отчётность в Worf Найти похожие ветки