Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > ОС и железо
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 16.09.2011, 07:15
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию Sendmessage shift+... (keybd_event не предлагать)

Делаю программу управления закачками utorrent: активное окно браузер - на паузу, если нет - на старт.
чтобы все заработало, осталось только выделить все торренты (ctrl+a или home,shift+end), но надо сделать это так, чтобы пользователь ничего не знал - средствами sendmesasge/postmessage
гугл посылает в keybd_event, но тогда придется вытаскивать окно на экран
Есть мысли как это сделать без вытаскивания окна?

Последний раз редактировалось Pyro, 16.09.2011 в 07:18.
Ответить с цитированием
  #2  
Старый 16.09.2011, 08:26
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Большинство клиентов поддерживают web-сервер.
Я бы делал через него, использовав TWebBrawser. Т.е. ты окно с браузером можешь не показывать пользователю и через него общаться с торрент-клиентом.

Ну или надо смотреть какие средства управления (OLE, plugins) есть в самом торрент-клиенте.
Ответить с цитированием
  #3  
Старый 16.09.2011, 09:07
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

есть web ui плагин, но хочется сделать zero-configuration
вобще utorrent спроектирована как крепость, уже незнаю как подступиться
если попробовать выделить через апи:
PHP код:
ListView_SetItemState(ListViewHandle, -1LVIS_SELECTEDLVIS_SELECTED); 
вылетает:
Изображения
Тип файла: png crash.PNG (9.9 Кбайт, 10 просмотров)
Ответить с цитированием
  #4  
Старый 16.09.2011, 09:32
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

отставить)
__________________
Пишу программы за еду.
__________________

Последний раз редактировалось NumLock, 16.09.2011 в 10:25.
Ответить с цитированием
  #5  
Старый 16.09.2011, 10:28
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

на других listview-ах работает, но utorrent крэшится
Ответить с цитированием
  #6  
Старый 17.09.2011, 10:42
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

Альфа во вложении работает через keybd_event, utorrent пока находит по заголовку
по таймеру:
PHP код:
if isActive(['utorrent']) then Exit;
  
BrowserActive := isActive(['opera''iexplore''chrome''firefox''skype''safari']);
  
TorrentActive := ActiveU;  // if Active first torrent in the list

  
if TorrentActive and BrowserActive then
    PauseU
  
else if not TorrentActive and not BrowserActive then
    PauseU 
// pause = unpause 

Осталось только сделать чтобы окно не возникало каждый раз при SetForegroundWindow
Вложения
Тип файла: 7z uTor.7z (181.3 Кбайт, 1 просмотров)

Последний раз редактировалось Pyro, 17.09.2011 в 10:54.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 02:39.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025