Вниз
Скачать: CL | DM;

Запретить растягивать картинку   Найти похожие ветки 

 
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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.026 c
15-1149225152
Priest
2006-06-02 09:12
2006.06.25
Хочу поехать в Ялту


15-1149178238
Зм1й
2006-06-01 20:10
2006.06.25
Принтер Epson Photo R800


2-1149678012
Powerslave
2006-06-07 15:00
2006.06.25
Как на Delphi можно выполнить команду ECHO ON/OFF?


15-1149064855
0bsid
2006-05-31 12:40
2006.06.25
Delphi уроки $$


2-1149695691
mr1Andersen
2006-06-07 19:54
2006.06.25
DBGrid




   Наверх