![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Здравствуйте.
Собственно сабж. Получить нужно доступ ко второму полю. Дополнительно: Первое поле всегда type="hidden" и value="0", а второе поле всегда без разрыва следуюет за первым и всегда имеет value="1" Код HTML:
Код:
function GetFieldValue(fromForm: IHTMLFormElement; const fieldName: string): string; var field: IHTMLElement; begin field := fromForm.Item(fieldName,'') as IHTMLElement; (...) Последний раз редактировалось 41stNocker, 22.01.2011 в 03:46. |
|
#2
|
|||
|
|||
|
Вопрос снят.
Проблему решил так: Код:
var
items: IHTMLElementCollection;
b:boolean;
begin
field := theForm.Item(fieldName,instance) as IHTMLElement;
if Assigned(field) then
if field.tagName = 'INPUT' then
begin
inputField := field as IHTMLInputElement;
if inputField.type_='hidden' then begin
items:=(fromForm.tags('INPUT') as IHTMLElementCollection);
b:=false;
for i:=0 to items.length-1 do
if (items.item(i,0) as IHTMLInputElement).name=fieldName then
if b then begin
inputField:=(items.item(i,0) as IHTMLInputElement);
break
end
else b:=true;
end;
end;
(...) |