Главная страница
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.008 c
6-11647
bushmen
2003-10-03 13:21
2003.12.04
Webconnection


4-11705
nika_ufc
2003-09-16 22:22
2003.12.04
программа в Sys Tray-е


4-11738
AndreyS
2003-10-06 15:46
2003.12.04
Блокировка окна запускаемого консольного приложения


4-11736
mOOx_
2003-10-06 19:16
2003.12.04
Как я могу нарисовать рамку выделения


6-11666
Ahmad K
2003-10-05 15:04
2003.12.04
Работа в паутине.