Спасибо Леонид.
Но тем не менее, если закомментировать строку
78 // procedure _onDblClick(Sender: PControl; var Mouse: TMouseEventData); override;
и соответственно
161 // Control.OnMouseDblClk := _onDblClick;
и
869 // procedure THITextBlok._onDblClick;
870 // begin
871 // // inherited;
872 // EditText := True;
873 // ChangeText;
874 //_hi_OnEvent(_event_onCreateNode,555);
875 // inherited;
876 // end;

Работать полагаю всё равно не будет.
Вернее
строчку 161 // Control.OnMouseDblClk := _onDblClick;