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

Вниз

Текущий Handle   Найти похожие ветки 

 
rentgen ©   (2003-10-05 06:41) [0]

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


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

GetFocus


 
Rentgen ©   (2003-10-05 17:07) [2]

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

h:=GetFocus;
SendMessage(h,WM_CHAR,ord(txt[n]),0);

Срабатывает только на моей форме. А например в чужой InputBox ничего неприходит :(

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


 
Rentgen ©   (2003-10-05 17:09) [3]

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

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

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


 
Opuhshii ©   (2003-10-05 18:14) [4]

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


 
Song ©   (2003-10-05 18:24) [5]

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


 
Rentgen ©   (2003-10-06 09:11) [6]

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

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


 
KosilkA ©   (2003-10-06 13:27) [7]

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


 
NAlexey ©   (2003-10-06 16:45) [8]

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


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

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;


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


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

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



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

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

Наверх




Память: 0.49 MB
Время: 0.007 c
6-11664
Stas
2003-10-08 09:26
2003.12.04
Документация по TCP/IP


1-11607
Big Error
2003-11-25 21:14
2003.12.04
Что вместо TMemo и TRichEdit?


9-11577
Vin_Ghost
2003-05-20 23:18
2003.12.04
алгоритм поиска пути


6-11651
Verg
2003-10-09 13:37
2003.12.04
closesocket


4-11735
Chris
2003-10-05 06:23
2003.12.04
Заголовок окна