Ответ: Пикнуть объект
cam_pick=camerapickmode(cam,MX,MY)
if cam_pick<>0 then (подсветка и прочие эффекты)
if LMH then pick_obj=cam_pick (передали хендл объекта в друг переменную)
select pick_obj
case перечисляешь все обьекты через запятульку
If LMD=1 then
здесь реакция на реакция на нажатую кнопку (покрасить обьект)
присвоение тригов и переключалок событий
endif
default
возврат цветов если ниче не пикнуто
endselect
както так
|