Скачать: CL | DM;

Отчётность в 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, а дальше , как открыть новую страницу и присвоить туда текст.

---

← →
Palladin ©   (2006-04-04 14:34) [4]

ты не попутал, что ты там открываешь в первых строках "своего" кода... вдруг это 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;

---

← →
asd ©   (2006-04-05 13:30) [5]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.036 c