Главная страница
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.009 c
6-11696
Elisa
2003-10-10 14:00
2003.12.04
при использовании NMHTTP выдает ошибку


8-11621
ram2003
2003-08-04 17:28
2003.12.04
OpenGL


6-11650
Alexx_AI
2003-10-10 16:34
2003.12.04
Программно в сеть W2000 XP


3-11585
Nick-From
2003-11-16 01:06
2003.12.04
Переменные TpFibDataSet и TpFibTransaction


1-11606
Seldon
2003-11-25 17:19
2003.12.04
TCheckListBox и lbVirtual