Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Текст 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 из другого приложения.


Наверх

Титульная страница Поиск, карта сайта Написать письмо