Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> добраться до меню ATT 
:(
    Опции темы
ozzii
  Дата 29.8.2010, 22:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 33
Регистрация: 1.7.2009

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



здраствуйте, задача след.:
запустить ati tray tools (может кто имеет у себя)), потом вызвать клик в меню. через меню последовательно
надо добраться до окна Overclocking, конечная цель - вкладка Fan, там пару кнопок нажать (ну это думаю , сделаю)

наваял это:

Код

procedure TForm1.Button1Click(Sender: TObject);
var s: string;
p: pchar;
h, h2: hwnd;
begin
s :=  'c:\Program Files\Ray Adams\ATI Tray Tools\atitray.exe';
p := pchar(s);
 shellexecute(handle, 'open', p, nil, nil, sw_restore);
sleep(1000);
h := findwindow(nil, 'ATI Tray Tools');
if h <= 0 then begin
showmessage('No ATI window found');
exit;
end;
h2 := findwindowex(h, 0, 'TfrmOver', nil);
if h2 <= 0 then begin
showmessage('No child window found'); // это окно уже не находит
exit;
end;
end;


подскажите пож, куда дальше копать?


Присоединённый файл ( Кол-во скачиваний: 21 )
Присоединённый файл  att.jpg 128,55 Kb
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

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


 




[ Время генерации скрипта: 0.0878 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.