Последние записи

made in programmersforum 6

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

17th
Сен

Как получить данные с чужой программы в свою?

Posted by Chas under Delphi

Есть программа teamviewer(Portable) мне нужно взять данные id и пароль и передать их в свою программу?Разные способы делал никак не получается

Пепел Феникса

function phGetWindowText(h:THandle):string;

begin

 SetLength(Result,GetWindowTextLength(h));

 SetLength(Result,GetWindowText(h,@Result[1],Length(Result)+1));

end;
var

h,h1:HWND;

begin

h:=FindWindow(PChar('TeamViewer'),nil);

h1:=FindWindowEX(h,0,PChar('Edit'),'');

ID:=phGetWindowText(h1);

h1:=FindWindowEX(h,h1,PChar('Edit'),'');

Pass:=phGetWindowText(h1);

тема на форуме