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

IHTMLElement и интерфейсы элементов   Найти похожие ветки 

 
mfender ©   (2006-11-14 16:17) [0]

Здравия желаю!

Есть такое:

var
 Sel: IHTMLSelectionObject;
 n: Integer;
begin
   .....
     for n:=0 to (Sel.createRange as IHTMLControlRange).length-1 do
     begin
       (Sel.createRange as IHTMLControlRange).item(n) as ????? ;
     end;


Так вот как узнать, каким интерфейсом далее оперировать с полученным элементом? Можно, конечно, по tagName определить:


TAG := ((Sel.createRange as IHTMLControlRange).item(n) as IHTMLElement).tagName;
if tagName = "IMG" then .... и так далее.


Но, может есть какой-то другой способ?


 
mfender ©   (2006-11-14 16:25) [1]

Заметил грубую ошибку в своих действиях....


var
 Sel: IHTMLSelectionObject;
 Range: IHTMLControlRange;
 n: Integer;
begin
     Range := Sel.createRange as IHTMLControlRange;
     for n:=0 to Range.length-1 do
     begin
       showmessage((Range.item(n) as IHTMLElement).tagName);
     end;


Но вопрос остаётся прежним.



Страницы: 1 вся ветка

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



Память: 0.45 MB
Время: 0.029 c
15-1163710040
Tor
2006-11-16 23:47
2006.12.03
Перестала запускаться Delphi 7


10-1126014043
AlexeyMir
2005-09-06 17:40
2006.12.03
событие в ком-объекте


15-1163246281
SPad
2006-11-11 14:58
2006.12.03
Раскладка клавиатуры.


6-1152557652
VajVajVaj
2006-07-10 22:54
2006.12.03
как отделить аттачмент?


3-1159414596
Frozzen
2006-09-28 07:36
2006.12.03
Список таблиц Access?




   Наверх