Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.16;
Скачать: CL | DM;

Вниз

Интересный факт...   Найти похожие ветки 

 
kull ©   (2003-05-29 15:43) [0]

Вот написал ActiveX library, в которой есть интерфейс для преобразования документа Word в свой формат...

Вызываю метод ConvertDocument из ActiveX библиотеки двумя способами:

1. из макроса word-a

Public Sub RunConvert()
Dim aa As Object
Set aa = CreateObject("MyConvertors.MyConvertor")
aa.ConvertDocument(ActiveDocument)
End Sub


2. из Дельфовского приложения:
procedure TTestCase_MyConvertors.TestMyConvertion;
var
itfMyConvertor: IMyConvertor;
itfWordApplication: Word2000._Application;
itfDocument: Word2000._Document;
vrntFileName: OleVariant;
begin
itfMyConvertor := CoMyConvertor.Create;
itfWordApplication := CoWordApplication.Create;
try
vrntFileName := "c:\testconvertor.doc";
itfDocument := itfWordApplication.Documents.AddOld(vrntFileName, EmptyParam);

itfMyConvertor.ConvertDocument(itfDocument);
finally
itfWordApplication.Quit(EmptyParam, EmptyParam, EmptyParam);
end;
finally
CoUninitialize;
end;
end;


так вот в варианте 1 метод ConvertDocument работает 0.5 сек, а в варианте 2 - 12 сек.

Откуда такая разница? Я понимаю, конечно что в (1) идет обмен данными внутри одного процесса, а в (2) между процессами, но неужели скорость этого обмена отличается более чем в 20 раз?

Как это объяснить?


 
Skier ©   (2003-05-29 15:45) [1]


> Как это объяснить?

Ты сам себе уже всё объяснил... :)


 
Sandman25 ©   (2003-05-29 15:54) [2]

Я думаю, бОльшая часть времени уходит на загрузку Ворда.


 
kull ©   (2003-05-29 16:10) [3]


> Sandman25 © (29.05.03 15:54)

Нет, в том то и дело, что я говорю именно о времени выполнения метода ConvertDocument. приего выполнении появляется окно с Progress bar-ом. И разницу видно невооруженным глазом...


> Skier © (29.05.03 15:45)

Ну неужели такая разница? Больше чем на порядок.


 
DiamondShark ©   (2003-05-29 16:48) [4]

Да, такая разница.
Представте себе, пусть приблизительно, сколько нужно действий, чтобы передать вызовы между процессами.


 
kull ©   (2003-05-29 17:39) [5]


> DiamondShark © (29.05.03 16:48)

То есть, я понимаю так, что действий этих в 20 раз больше?!
Так что ли?



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

Текущий архив: 2003.06.16;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
14-50446
kull
2003-05-29 15:43
2003.06.16
Интересный факт...


1-50331
TCrash
2003-06-03 14:43
2003.06.16
Как бороться с AV


14-50459
Tomkat
2003-05-29 09:40
2003.06.16
APRO Delphi6


3-50262
Rocker
2003-05-25 03:45
2003.06.16
Независимость от регистра


14-50451
Jumbo
2003-05-29 18:31
2003.06.16
PDF file