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

Вниз

использование метода сервера OLE автомации в цикле ...??   Найти похожие ветки 

 
Yuri I. Bououi   (2003-06-30 17:33) [0]

Имеется OLE Automation server, позволящий запрашивать данные о клиенте по фамилии. Нужно опросить целый список фамилий с контроллера автоматизации. Можно ли один раз создав сервер в цикле вызывать его метод с новым значением параметра? Или нужно каждый раз пересоздавать serv := CreateOleObject("xxx.TestService");. Сервер был создан как Multiple Instance и Apartment.

Пример вызова метода:

var
serv : variant;
sresult : widestring;
curr_nm : string;
...
serv := CreateOleObject("xxx.TestService");
try
if VarType(serv)=VarDispatch then
begin
for i := 0 to Memo1.Lines.Count - 1 do
begin
curr_nm := Memo1.Lines.Strings[i];
sresult := Serv.GetClientInfo(curr_nm);
end;
...


 
[NIKEL] ©   (2003-06-30 17:35) [1]

можно


 
Yuri I. Bououi   (2003-06-30 17:53) [2]

Странно, но он устойчиво падает после 15 итераций цикла ... а вот при пересоздании -- медленно, но верно делает свое дело ... значит дело в сервере ...


 
[NIKEL] ©   (2003-06-30 17:57) [3]

excel же не падает при добавлении 15 строчек в лист :)



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

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

Наверх




Память: 0.47 MB
Время: 0.019 c
1-44742
hawkins
2003-07-01 14:27
2003.07.14
не удается из программы изменить размер листа у TQuickRep


3-44571
Step[B.M.]
2003-06-19 20:35
2003.07.14
Посоветуйте бесплатный генератор отчетов в Excel


14-44857
Дмитрий К.К.
2003-06-27 06:07
2003.07.14
Именинники 27 ИЮНЯ


14-44828
Mike B.
2003-06-26 15:47
2003.07.14
Тест


7-44937
Ал
2003-04-30 15:18
2003.07.14
Как получить список часовых поясов, отсортированный как в 2000,XP