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

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

Наверх




Память: 0.46 MB
Время: 0.029 c
2-1163737455
Steep
2006-11-17 07:24
2006.12.03
Строки


15-1163150916
ASoft
2006-11-10 12:28
2006.12.03
Задуматься...


1-1161800306
MishaL
2006-10-25 22:18
2006.12.03
TListView. Columns не меняет ширину при изменении текста


2-1163329112
redlord
2006-11-12 13:58
2006.12.03
не активный контрол


2-1163530310
Vasiliy
2006-11-14 21:51
2006.12.03
Перекрыл GetClientRect, отрисовывается не весь компонент