Вверх ↑
Этот топик читают: Гость
Ответов: 1342
Рейтинг: 31
#1: 2022-04-08 11:54:57 ЛС | профиль | цитата
дико не хватает точки doEndInfo (Событие происходит после перечисления информации или списка ID)

или я что то пропустил и эту точку добавили)?
компонент WMI процессы уж очень приелся, хорошая штука, на всех компиляторах работает отлично


открыть исходник, найти строчки:

    _hi_onEvent(_event_onInfo);
objProcess := Unassigned;
end;

добавить после

  _hi_onEvent(_event_onEndInfo);

в public добавить

      _event_onEndInfo: THI_Event;


открыть ini файл, добавить в [Methods]

onEndInfo=Событие происходит всякий раз при заврешении перечисления запущенных процессов|2|0

эти же компоненты по сути как массивы, и обязательно нужно событие при завершении перебора, почему этого не сделали

Редактировалось 1 раз(а), последний 2022-04-08 11:56:59
карма: 2

1
Голосовали:Konst
vip
#1.1контекстная реклама от партнеров
Ответов: 245
Рейтинг: 4
#2: 2022-04-10 15:39:22 ЛС | профиль | цитата
Rysik писал(а):


onEndInfo=Событие происходит всякий раз при заврешении перечисления запущенных процессов2|0


|
Привет провел испытание, у меня посте теста событие происходит ровно столько раз сколько процессов, а не один раз по завершению.

Add(MainForm,2953706,168,49)
{
}
Add(ProcessInfo,1994870,231,168)
{
link(onEndInfo,8652731:doNext,[])
}
Add(Button,1684675,168,168)
{
Left=15
Top=15
Width=40
link(onClick,1994870:doInfo,[])
}
Add(Label,5107833,364,168)
{
Left=85
Top=20
}
Add(CounterEx,8652731,301,168)
{
Max=1000
link(onNext,5107833:doText,[])
}


--- Добавлено в 2022-04-10 15:44:49

Может не мудрить и использовать хаб.

Редактировалось 1 раз(а), последний 2022-04-10 15:44:49
карма: 1

0
Ответов: 1342
Рейтинг: 31
#3: 2022-04-11 12:28:32 ЛС | профиль | цитата
ric писал(а):
Привет провел испытание, у меня посте теста событие происходит ровно столько раз сколько процессов, а не один раз по завершению.


не в том месте стоит событие,

вот так правильно:

  {$endif}
_hi_onEvent(_event_onInfo);
objProcess := Unassigned;
end;
_hi_onEvent(_event_onEndInfo);
end;

а вот так не правильно:

  {$endif}
_hi_onEvent(_event_onInfo);
objProcess := Unassigned;
_hi_onEvent(_event_onEndInfo);
end;
end;

--- Добавлено в 2022-04-11 12:32:53

ric писал(а):
Может не мудрить и использовать хаб.


хаб не всегда работает правильно, было множество моментов на разных OS, когда перечисление завершалось позже чем вторая точка хаба (но это чисто на этой линейке компонентов), это благополучно решалось добавлением таймера на вторую точку, но это колхоз

Редактировалось 2 раз(а), последний 2022-04-11 12:34:13
карма: 2

0
Ответов: 245
Рейтинг: 4
#4: 2022-04-11 19:54:36 ЛС | профиль | цитата

карма: 1

0
4
Сообщение
...
Прикрепленные файлы
(файлы не залиты)