Вверх ↑
Разработчик
Ответов: 26305
Рейтинг: 2146
#1: 2010-01-19 19:30:21 ЛС | профиль | цитата
Cамое большое, что можно сделать, так это только вот так, тогда не будет нарушена совместимость ни с чем, хочешь, используй onError, хочешь -- onEnd. Если руководство не найдет ничего поротиворечивого в коде, то я его добавлю


procedure THIDir._work_doDir;
begin
_hi_onEvent(_event_onError, ord(ForceDirectories(ToString(_Data))));
_hi_CreateEvent(_Data,@_event_onEnd);
end;
карма: 22

1
Голосовали:olDjeka