Netspirit писал(а):
Кто так обзывает методы? Может и я.... Точно не помню.
Но это было очень давно. Я был крайне мал, я был дитя
--- Добавлено в 2017-12-11 14:08:26
Galkov писал(а):
Что-то мне кажется, что эта технология тоже не защищена от вышеописанной паразитной "обратной отдачи"Если в примере Netspirit-а применить технику TMT:
Add(InlineCode,16037272,518,91)
{
WorkPoints=#6:doWork|
EventPoints=#8:onResult|
Code=#15:unit HiAsmUnit;|0:|9:interface|0:|4:uses|28: Windows, KOL, Share, Debug;|0:|4:type|29: THiAsmClass = class(TDebug)|11: private|0:|10: public|29: onResult: THI_Event; |54: procedure doWork(var _Data: TData; Index: Word);|6: end;|0:|14:implementation|0:|3:var|19: Counter: Integer;|0:|60:procedure THiAsmClass.doWork(var _Data: TData; Index: Word);|3:var|14: OutDT:TData;|9: mt:PMT;|5:begin|15: Inc(Counter);|2: |35: // Хочу выдать в поток 2 элемента|28: dtInteger(OutDT, Counter);|23: mt := mt_make(OutDT);|34: mt_string(mt, Int2Str(Counter));|0:|31: _hi_OnEvent(onResult, OutDT);|2: |14: mt_free(mt);|4:end;|0:|0:|0:|0:|4:end.|
}
И, аналогичным образом, чинится заменой _hi_OnEvent на _hi_OnEvent_.
Т.е., утверждение из разряда "кажется" переходит в разряд экспериментального факта.
Поиск
Друзья
Администрация