Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];




Вниз

Запуск word 


jenbond   (2002-01-24 10:08) [0]

Подскажите как попроще реализовать запуск Word и сразуже предачу в него текста с активной формы!



MetallAdm   (2002-01-24 11:18) [1]

А как енто проше ?!!

implementation

uses OleAuto;
var
V : Variant ;
..
V := 0; // at some point just to initialise

if V = 0 then
begin
V := CreateOLEObject("Word.Application");
V.WordBasic.AppShow;
end;

V.WordBasic.Fileopen("Your Word Doc name");
V.WordBasic.EditBookmark("Title",0,0,0,1);
V.WordBasic.Insert(Title);
....

Можно Так а можно и так ...


var
Word: Variant;
begin
Word := CreateOleObject("Word.Basic");
with Word do
begin {Pure WordBASIC commands follow...}
FileNew("Normal");
Insert("This is the first line"#13);
Insert("This is the second line"#13);
FileSaveAs("c:\temp\test.txt", 3);
end;
end;






Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.017 c
3-18781           Radix                 2002-01-09 10:34  2002.02.07  
Инфа не удаляется в таблицах InterBase, что делаю неправильно?


3-18715           Dup                   2002-01-04 17:03  2002.02.07  
Поиск записи


3-18717           vano1                 2002-01-10 10:56  2002.02.07  
Как создать стандартный файл базы данных MS Access ?


3-18773           Laimer                2002-01-14 13:14  2002.02.07  
Запрос


1-18848           Eraser                2002-01-21 15:38  2002.02.07  
Погибаю в пучине потоков (уже давно)