![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Снова KOLWord [Delphi, Windows]
max727 © (2007-07-18 10:41:00)Добрый день всем!
Похожая ветка была, но ка-то заглохла.
Итак
не могу разобраться почему не работает простенькая программка
program HelloWorld;
uses
KOL, KOLWord;
var W:PWordDocument;
begin
W:=NewWordDocument;
W.ObjInvoke( 'Add', [], nil );
W.ObjName := 'Selection';
W.ObjInvoke( 'TypeText', [ sParam('Hello, Wor(L)d!') ], nil );
W.ObjName := 'Application';
W.ObjPropBool['Visible']:=True;
MsgOK('По идее должен показаться ворд, но его нет!');
W.Free;
end.
а вопрос заключается в следующем:
почему Word-то видимым не становится?
max727 (2007-07-20 11:02:00) [1]да, согласен
вариант с ComObj лучше (гораздо удобнее и работоспособнее)
но мне не дает покоя вопрос:
Почему этот вариант не работает? (хочу много знать)
Знал бы - сам подправил бы модуль
но я не шибко разбираюсь в интерфейсах
поэтому без посторонней помощи мне не обойтись
ANTPro (2007-07-19 22:34:00) [2]Вариант с CreateOleObject('Word.Application') будет лучше(но размер больше), примеров с ним больше да и с VCL совместимо.
ЗЫ ИМХО
max727 (2007-07-19 09:27:00) [3]2Jon
OleInit вызывается уже в функции
NewWordDocument
так что такая программа:
program HelloWorld;
uses
KOL, KOLWord;
var W:PWordDocument;
begin
OleInit;
W:=NewWordDocument;
W.ObjInvoke( 'Add', [], nil );
W.ObjName := 'Selection';
W.ObjInvoke( 'TypeText', [ sParam('Hello, Wor(L)d!') ], nil );
W.ObjName := 'Application';
W.ObjPropBool['Visible']:=True;
MsgOK('По идее должен показаться ворд, но его нет!');
W.Free;
OleUnInit;
end.
Вдет себя так же
Я так и не понял, в чем ошибка-то?
Jon (2007-07-18 19:14:00) [4]You must add OleInitbefore using the object.
max727 (2007-07-18 18:39:00) [5]2ANTPro
да знаю я про эту ветку
и про эту тоже знаю
http://www.delphimaster.ru/cgi-bin/forum.pl?id=1161608565&n=10
но ответа на вопрос так и не увидел
(почему ворд видимым не становится?)
ANTPro (2007-07-18 17:55:00) [6]> [0] max727 (18.07.07 10:41)
Пользваться поиском научись:
http://www.delphimaster.ru/cgi-bin/forum.pl?n=10&id=1182779412