Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.02.24;
Скачать: CL | DM;

Вниз

Как получить значение поля Edit в обозревателе Internet Explorer   Найти похожие ветки 

 
DDR2   (2008-01-31 17:40) [0]

Привет!

Подскажите пожалуйста, как можно, зная имя класса окна, получить значение поля Edit в обозревателе Internet Explorer?


 
Dennis I. Komarov ©   (2008-01-31 18:01) [1]

> [0] DDR2   (31.01.08 17:40)

Где же ты умудрился его там отыскать?


 
Palladin ©   (2008-01-31 18:02) [2]

это видимо
<input type="text" name="TEdit">
:)


 
Kolan ©   (2008-01-31 18:05) [3]

> это видимо

А я думаю, что это адресная строка&#133


 
Palladin ©   (2008-01-31 18:06) [4]

та нет, адресная строка это таки более похоже на TComoboBox...


 
Dennis I. Komarov ©   (2008-01-31 18:07) [5]

> [3] Kolan ©   (31.01.08 18:05)

Нее, это по-любому TComboBox :)


 
Kolan ©   (2008-01-31 18:10) [6]

> это по-любому TComboBox

Точно, блин :)


 
DDR2   (2008-01-31 19:10) [7]

А как к нему можно обратиться? К этому TComboBox?


 
Kolan ©   (2008-01-31 19:21) [8]

> А как к нему можно обратиться? К этому TComboBox?

Ага, я угадал! А вы комбо бокс комбо бокс :)

ЗЫ
 Автор &#151; это не комбобокс.


 
DDR2   (2008-01-31 19:28) [9]

коль, не не надо так. хоть объясни что да как. если че не понимаю...


 
Игорь Шевченко ©   (2008-01-31 20:13) [10]

Kolan ©   (31.01.08 19:21) [8]

"Запрещается:
9. Создание пустых сообщений, спама, преднамеренной рекламы, а так же неинформативных сообщений, типа «Здорово», «Я так и знал» или «Full Respect». "
http://www.delphimaster.ru/forums.shtml#rule


 
Compiler ©   (2008-02-01 00:08) [11]

Урлу надо?
function GetText(WindowHandle: hwnd):string;
var
 txtLength : integer;
 buffer: string;
begin
 TxtLength := SendMessage(WindowHandle, WM_GETTEXTLENGTH, 0, 0);
 txtlength := txtlength + 1;
 setlength (buffer, txtlength);
 sendmessage (WindowHandle,wm_gettext, txtlength, longint(@buffer[1]));
 result := buffer;
end;

function GetURL:string;
var
 ie,toolbar,combo,
 comboboxex,edit,
 worker,toolbarwindow:hwnd;
begin
 ie := FindWindow(pchar("IEFrame"),nil);
 worker := FindWindowEx(ie,0,"WorkerW",nil);
 toolbar := FindWindowEx(worker,0,"rebarwindow32",nil);
 comboboxex := FindWindowEx(toolbar, 0, "comboboxex32", nil);
 combo := FindWindowEx(comboboxex,0,"ComboBox",nil);
 edit := FindWindowEx(combo,0,"Edit",nil);
 toolbarwindow := FindWindowEx(comboboxex, 0, "toolbarwindow32", nil);
 result := GetText(edit);
end;


 
homm ©   (2008-02-01 07:40) [12]

> [7] DDR2   (31.01.08 19:10)
> А как к нему можно обратиться?

К кому к нему?



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

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

Наверх




Память: 0.49 MB
Время: 0.026 c
15-1200926297
@!!ex
2008-01-21 17:38
2008.02.24
Помогите оплатить софтину через PayPal


2-1201541016
Inslave
2008-01-28 20:23
2008.02.24
Ini + checbox


2-1201684617
Washington
2008-01-30 12:16
2008.02.24
string <-> TColor


15-1200776703
Riply
2008-01-20 00:05
2008.02.24
Рекурсивная работа с FindFirst/Next


8-1174223850
Ricks
2007-03-18 16:17
2008.02.24
Потестите Media Player