Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.06.25;
Скачать: 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 вся ветка

Текущий архив: 2006.06.25;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.027 c
2-1149704397
Mr tray
2006-06-07 22:19
2006.06.25
в каком модуле содержится MAKELANGID?


2-1149587403
Fiallo4ka
2006-06-06 13:50
2006.06.25
Базы данных Delphi


3-1146076512
makvell
2006-04-26 22:35
2006.06.25
Исключения


2-1149363520
Adios
2006-06-03 23:38
2006.06.25
TreeView и ShellTreeView


1-1147934077
Damager
2006-05-18 10:34
2006.06.25
Градиентные цвета компонентов