Add(InlineCode,12717386,357,497) { WorkPoints=#63:doGetDoubleClickTime=Получает максимальное время двойного клика|68:doSetDoubleClickTime=Устонавливает максимальное время двойного клика| EventPoints=#5:onGet|5:onSet| DataPoints=#59:count=Количество милисекунд для метода doSetDoubleClickTime| Code=#15:unit HiAsmUnit;|0:|9:interface|0:|29:uses kol,windows,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10: private|0:|9: public|20: count:THI_Event;|20: onGet:THI_Event;|20: onSet:THI_Event;|64: procedure doGetDoubleClickTime(var _data:TData; Index:Word);|64: procedure doSetDoubleClickTime(var _data:TData; Index:Word);|5: end;|0:|14:implementation|0:|43:procedure THiAsmClass.doGetDoubleClickTime;|5:begin|39:_hi_OnEvent(onSet, GetDoubleClickTime);|4:end;|0:|43:procedure THiAsmClass.doSetDoubleClickTime;|6: begin|48: SetDoubleClickTime(ReadInteger(_data, count));|21: _hi_OnEvent(onSet);|5: end;|0:|4:end.| }