Главная страница
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-11645
Yurko
2003-10-09 17:30
2003.12.04
WNetEnumResource


8-11632
LevAlexander
2003-08-04 11:28
2003.12.04
MediaPlayer


1-11602
greenrul
2003-11-26 03:31
2003.12.04
Проблемы с File of TMyType


6-11691
Manulo
2003-10-01 19:49
2003.12.04
Client/ServerSocket


4-11714
Pavels
2003-10-10 10:16
2003.12.04
помогите с EnumWindows