![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Текст edit-а из другого приложения.
Sheva © (2003-02-17 15:17:00)Уважаемые мастера, может кто-то сможет мне помочь с моей проблемкой: мне нужно из своего приложения получить текст edit-а, который находится в другом приложении. Спасибо.
Clickmaker (2003-03-12 16:24:00) [1]i:=sendmessage(FindWindowEx(FindWindow(WindowClass, "start"), 0, "TEdit", "Edit1"),wm_gettextlength,0,0);
Sheva (2003-03-12 16:19:00) [2]Пытаюсь так:
var
i: integer;
st: pchar;
begin
i:=sendmessage(FindWindowEx(FindWindow(nil, "start"), 0, nil, "Edit1"),wm_gettextlength,0,0);
getmem(st,i+1);
sendmessage(FindWindowEx(FindWindow(nil, "start"), 0, nil, "Edit1"),wm_gettext,i+1,integer(st));
ShowMessage(st);
что-то делаю не так :-(
Заголовок приложения "start". В edit1 находиться имя пользователя для конекта к базе данных.
Guerrillero (2003-02-17 16:24:00) [3]FindWindow (EnumWindows)
FindWindowEx (EnumChildWindows)
WM_GETTEXTLENGTH
WM_GETTEXT
Sheva (2003-02-17 15:51:00) [4]Вобщем, моя проблема состоит в получении дескриптора edit-a из другого приложения.