Форум: "Основная";
Текущий архив: 2006.06.25;
Скачать: [xml.tar.bz2];
Вниз
Запретить растягивать картинку Найти похожие ветки
← →
agaga (2006-05-18 19:57) [0]
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) [1]<img src="...." onclick="event.returnValue=false">
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2006.06.25;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.01 c
