VPF::В чем ошибка? - Форум программистов

Mikel

Дата 29.9.2002, 20:00 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

hnd:=FindWindowEx(0,0,0,PChar(Options.Cap));
Invalid typecast
(options.cap:string) :notify

Alex

Дата 29.9.2002, 20:54 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 80
Всего: 162

Функции FindWindowEx в качестве первого параметра нужно передать handel окна на котором вы хотите найти.
const
Win = 'Добро пожаловать в FileBox eXtender 1!';
But = 'Использовать';
...
if FindWindow(nil, Win) <> 0 then begin
TrayWnd:=FindWindow(nil, Win);
BtnWnd:=FindWindowEx(TrayWnd,0,nil, But);
SendMessage(BtnWnd, WM_LBUTTONDOWN, 0, 0);
SendMessage(BtnWnd, WM_LBUTTONUP, 0, 0);
Close;
end

--------------------

Написать можно все - главное четко представлять, что ты хочешь получить в конце.

Mikel

Дата 29.9.2002, 21:30 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник Клуба
Сообщений: 882
Регистрация: 30.3.2002
Где: Саратов

Репутация: 1
Всего: 2

Нашел ошибку. В параметрах компиляции.
ЗЫ

писать можно

--------------------

...so remember, it's better to burn out than to fade away

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »