Скачать: 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 вся ветка

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



Память: 0.47 MB
Время: 0.012 c