| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Текущий Handle [D6, WinXP]

rentgen ©   (2003-10-05 06:41:00) 

Подскажите как? Как узнать Handle, например, текущего Edit"a?
Можно-ли вообще узнать это 1-ой коммандой?

---

KosilkA   (2003-10-07 11:55:00) [1]

> NAlexey © (06.10.03 16:45) [8]
> >KosilkA ©
> Нифигасебеутебяинтересныйстильнаписания...

затоработает

---

rhf   (2003-10-07 04:21:00) [2]

2 rentgen

function GetGlobalFocus:HWND;
var
CurThreadID,
TargetThreadID : DWORD;
Attached : boolean;
begin
Attached:=FALSE;
TargetThreadID:=GetWindowThreadProcessID(GetForegroundWindow,nil);
CurThreadID:=GetCurrentThreadID;
if TargetThreadID<>CurThreadID then Attached:=AttachThreadInput CurThreadID,TargetThreadID,TRUE);
Result:=GetFocus;
if Attached then AttachThreadInput(CurThreadID,TargetThreadID,FALSE);
end;


---

NAlexey   (2003-10-06 16:45:00) [3]

>KosilkA ©
Нифигасебеутебяинтересныйстильнаписания...

---

KosilkA   (2003-10-06 13:27:00) [4]

if attachthreadinput(getwindowthreadprocessid(getforegroundwindow,nil),GetCurrentThreadId,true)
then
begin
.................
работаем с getfocus , postMessage и пр
.................
end;

---

Rentgen   (2003-10-06 09:11:00) [5]

To Song ©
Так ведь в твоём вопросе и речи не было про чужое приложение.
Ты прав.

Поискал по универсальному поиску на этом сайте(и на королевстве). Ничего ненашел по AttachThreadInput. Может кто знает ссылки по этой теме? Или пример работы с этой функцией?

---

Song   (2003-10-05 18:24:00) [6]

2Rentgen ©
Так ведь в твоём вопросе и речи не было про чужое приложение. Откуда же такие круглые глаза?
Вообщем, AttachTreadInput применяй.

---

Opuhshii   (2003-10-05 18:14:00) [7]

2Rentgen © (05.10.03 17:09) [3]
прочесть хелп о GetFocus, особливо секцию Remarks, там найти ответ на свой вопрос.

---

Rentgen   (2003-10-05 17:09:00) [8]

Извиняюсь за " txt[n]" - это у меня в коде так.
Я хочу послать текст, например, Edit"у.
Делаю так:

h:=GetFocus;
SendMessage(h,WM_CHAR,ord("A"),0);Срабатывает только на моей форме. А например в чужой InputBox ничего неприходит :(

Может я чего не так делаю?

---

Rentgen   (2003-10-05 17:07:00) [9]

Я хочу послать текст, например, Edit"у.
Делаю так:

h:=GetFocus;
SendMessage(h,WM_CHAR,ord(txt[n]),0);
Срабатывает только на моей форме. А например в чужой InputBox ничего неприходит :(

Может я чего не так делаю?

---

Song   (2003-10-05 09:43:00) [10]

GetFocus

---

Наверх