Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Запретить растягивать картинку [D7]


agaga ©   (2006-05-18 19:57:00) 

Doc := (HTMLEdit1.DOM as IHTMLDocument2);
EventHandler := THTMLEvent.Create(Doc);
EventHandler.OnEvent := MyEvent;

Doc.onmousedown := EventHandler as IDispatch; // Нажатие мыши в документе
for i:=1 to Doc.all.length do begin
HTMLElement:=Doc.all.item(NULL,i) as IHTMLElement;
HTMLElement.onmousedown:=EventHandler as IDispatch; // Нажатие мыши в элементах
end;

procedure TForm1.KeyEvent(EventObject: IHTMLEventObj;
 EventType: string);
begin
EventObject.cancelBubble:=true; // Отмена "вторичных" событий
EventObject.returnValue:=false; // Отмена действия
end;


Смысл в том, что пользователь нажимает мышкой на картинку, она (по умолчанию) выделяется, и её потом можно растягивать. А я этого не хочу, и пытаюсь блокировать все нажатия...

Но картинка всё равно выделяется... В чём дело?
Кто знает, подскажите!..


TStas   (2006-05-18 22:45:00) [1]

<img src='....' onclick='event.returnValue=false'>


Наверх

Титульная страница Поиск, карта сайта Написать письмо