Как управлять PGP [D7, WinXP]
Privet10 © (2004-04-18 18:59:00)
Hi! Необходимо из моей программы управлять PGP (программа
шифрования), а точнее чтобы при подключении зашифрованного файла
подставляла пароль автоматически. Вся проблема в том, что Хандл
окна редактирования я нахожу и передаю ей мессагу WM_SetText, на
которую PGP ни как не реагирует, т.е. текст в него не вставляется.
Плиз, помогите в чем камень, пример кода ниже.
//нашел главное окно PGP
Wnd := FindWindow(nil, 'Enter Passphrase');
//нашел его потомка
Wnd := GetWindow(Wnd, GW_CHILD);
while Wnd>0 do
begin
Wnd:= GetNextWindow(Wnd, GW_HWNDNEXT);
GetClassname(Wnd, Control, SizeOf(Control));
if String(Control)='RichEdit20W' then break;
end;
SendMessage(Wnd, WM_SetText, 0,
LParam(Pchar('11111111')));
Shopot (2004-04-20 22:37:00) [1]
Если хочешь что-нибудь взломать, то бери SoftIce. Забудь про
свою программу подстановки паролей.
Наверх 
ЧАТ |
Орешник |
|
