Управление чужими программами

← →
MikeZ (2002-08-05 09:45) [0]

Где-то в форуме видел, но не нашел, что управлять прогами можно
посылая сообщения в окно проги, указывая id нужного компонента.
Этот id (вроде бы) можно заранее посмотреть в просмотрщике
ресурсов. Хотелось бы пример этого (была фраза про управление
WinAmp"ом)

← →
Opuhshii (2002-08-05 10:28) [1]

Читай...
http://www.delphikingdom.com/helloworld/Windows.htm
http://www.delphikingdom.com/helloworld/Wininf.htm
http://www.delphikingdom.com/helloworld/Wininf01.htm

← →
MikeZ (2002-08-05 13:05) [2]

Все это я читал и раньше, прочитал еще раз. Не в этом дело. Но основной вопрос - это не как добраться до определенного меню, а что ему говорить, чтобы оно "нажалось". Ищется оно (как я думаю. А правильно ли?) через GetMenu, дальше в SendMessage вставляется нужный id. А вот дальше...?

← →
Proton (2002-08-05 20:00) [3]

да если пеример нужен то иди на freeusoft.hut.ru
там скииновый чат есть с возможностью управления winamp"ом и много чего еще :) (+ естественно сыр на делфях)
называется вроде сталкер

← →
MikeZ (2002-08-06 00:06) [4]

Классный пример. Спасибо. Только вот непонятно: там у него WinAmp начинает играть строкой sendmessage(findwindow("Winamp v1.x",nil),wm_command,40045,0), где 40045 - ID нужной кнопки/менюшки или чего-то еще. Только как этот ID искать? В Restorator"e акселератор клавиши "Х" (меню "воспроизвести") - "-25491". А как искать 40045? Может быть в других просмотрщиках ресурсов?

← →
Proton (2002-08-06 21:39) [5]

MENU
{
POPUP "Main"
{
MENUITEM "Nullsoft &Winamp...", 40041
MENUITEM SEPARATOR
POPUP "&Play"
{
MENUITEM "&File... \tL", 40029
MENUITEM "&Location...\tCtrl+L", 40185
MENUITEM "&Directory...\tShift+L", 40187
MENUITEM SEPARATOR
MENUITEM SEPARATOR
POPUP "&Bookmark"
{
MENUITEM "(no bookmarks)", 40322, GRAYED
}
}
MENUITEM "View &file info\tAlt+3", 40188
POPUP "&Bookmarks"
{
MENUITEM "&Edit bookmarks...\t(Ctrl+Alt+I)", 40320
MENUITEM "&Add current as bookmark\t(Alt+I)", 40321
MENUITEM SEPARATOR
}
MENUITEM SEPARATOR
MENUITEM "Main Window\tAlt+W", 40258
MENUITEM "Playlist &Editor\tAlt+E", 40040
MENUITEM "E&qualizer \tAlt+G", 40036
MENUITEM "Mini&browser\tAlt+T", 40298
MENUITEM SEPARATOR
POPUP "&Options"
{
MENUITEM "&Preferences... \tCtrl+P", 40012
POPUP "Skins"
{
MENUITEM "S&kin Browser...\tAlt+S", 40219
MENUITEM SEPARATOR
MENUITEM "<Base Skin>", 32767
MENUITEM "<< Get more skins! >>", 40316
}
MENUITEM SEPARATOR
MENUITEM "Time &elapsed\t(Ctrl+T toggles)", 40037
MENUITEM "Time re&maining\t(Ctrl+T toggles)", 40038
MENUITEM SEPARATOR
MENUITEM "&Always On Top\tCtrl+A", 40019
MENUITEM "&Double Size\tCtrl+D", 40165
MENUITEM "&EasyMove\tCtrl+E", 40186
MENUITEM SEPARATOR
MENUITEM "&Repeat\tR", 40022
MENUITEM "&Shuffle\tS", 40023
}
POPUP "Play&back"
{
MENUITEM "P&revious\tZ", 40044
MENUITEM "&Play\tX", 40045
MENUITEM "P&ause\tC", 40046
MENUITEM "&Stop\tV", 40047
MENUITEM "&Next \tB", 40048
MENUITEM SEPARATOR
MENUITEM "Stop w/ fa&deout\tShift+V", 40147
MENUITEM "Stop after &current\tCtrl+V", 40157
MENUITEM "&Back 5 seconds\tLeft", 40144
MENUITEM "&Fwd 5 seconds\tRight", 40148
MENUITEM "&Start of list\tCtrl+Z", 40154
MENUITEM "10 t&racks back\tNum. 1", 40197
MENUITEM "10 &tracks fwd\tNum. 3", 40195
MENUITEM SEPARATOR
MENUITEM "&Jump to time\tCtrl+J", 40193
MENUITEM "Ju&mp to file\tJ", 40194
}
POPUP "&Visualization"
{
MENUITEM "Visualization options...\tAlt+O", 40317
MENUITEM SEPARATOR
MENUITEM "Start/Stop &plug-in\tCtrl+Shift+K", 40192
MENUITEM "&Configure plug-in... \tAlt+K", 40221
MENUITEM "&Select plug-in...\tCtrl+K", 40191
}
POPUP "Skins"
{
MENUITEM "S&kin Browser...\tAlt+S", 40219
MENUITEM SEPARATOR
MENUITEM "<Base Skin>", 32767
MENUITEM "<< Get more skins! >>", 40316
}
MENUITEM SEPARATOR
MENUITEM "E&xit", 40001
}
POPUP "EQpresets"
{
POPUP "Load"
{
MENUITEM "&Preset...", 40172
MENUITEM "&Auto-load preset...", 40173
MENUITEM "&Default", 40174
MENUITEM SEPARATOR
MENUITEM "From &EQF...", 40253
}
POPUP "Save"
{
MENUITEM "&Preset...", 40175
MENUITEM "&Auto-load preset...", 40176
MENUITEM "&Default", 40177
MENUITEM SEPARATOR
MENUITEM "To &EQF...", 40254
}
POPUP "Delete"
{
MENUITEM "&Preset...", 40178
MENUITEM "&Auto-load preset...", 40180
}
}
POPUP "PLContextMenu"
{
POPUP "MiscOpt"
{
POPUP "File info"

продолжение следует

← →
Proton (2002-08-06 21:39) [6]

продолжение

{
MENUITEM "F&ile info...\tAlt+3", 40208
MENUITEM "Playlist entry...\tCtrl+E", 40255
}
POPUP "Sort"
{
MENUITEM "Sort list by &title", 40209
MENUITEM "Sort list by &filename", 40210
MENUITEM "Sort list by &path and filename", 40211
MENUITEM SEPARATOR
MENUITEM "R&everse list\tCtrl+R", 40213
MENUITEM "&Randomize list", 40212
}
POPUP "Misc"
{
MENUITEM "&Generate HTML playlist\t(Ctrl+Alt+G)", 40292
MENUITEM SEPARATOR
MENUITEM "&Read extended info on selection\t(Ctrl+Alt+E)", 40293
}
}
POPUP "Add"
{
MENUITEM "Add file(s)\tL", 1032
MENUITEM "Add directory\tShift+L", 1036
MENUITEM "Add location\tCtrl+L", 1039
}
POPUP "Remove"
{
MENUITEM "Remove selected\tDelete", 1034
MENUITEM "Crop selected\tCtrl+Delete", 1035
MENUITEM "Clear playlist\tCtrl+Shift+Delete", 40214
POPUP "Remove..."
{
MENUITEM "Remove all &dead files\tAlt+Delete", 40222
MENUITEM "&Physically remove selected file(s)", 40223
}
}
POPUP "Select"
{
MENUITEM "Select all\tCtrl+Alt+A", 40205
MENUITEM "Select none", 40207
MENUITEM "Invert selection\tCtrl+I", 40171
}
POPUP "Playlist"
{
MENUITEM "Open playlist\tCtrl+O", 40202
MENUITEM "Save playlist\tCtrl+S", 40204
MENUITEM "New playlist (clear)\tCtrl+N", 40214
}
POPUP "Context"
{
MENUITEM "Play item(s)\tEnter", 40184
MENUITEM SEPARATOR
MENUITEM "Remove item(s)\tDelete", 1034
MENUITEM "Crop files\tCtrl+Delete", 1035
MENUITEM SEPARATOR
MENUITEM "File info\tAlt+3", 40208
MENUITEM "Playlist entry\tCtrl+E", 40255
MENUITEM "Bookmark item(s)\tAlt+I", 40319
}
}
POPUP "Context menus"
{
POPUP "Song title"
{
MENUITEM "&File info\tAlt+3 or Dblclick", 40188
MENUITEM "Jump to file...\tJ", 40194
MENUITEM "Jump to time...\tCtrl+J", 40193
MENUITEM "Autoscroll songname", 40189
}
POPUP "Time display"
{
MENUITEM "Time &elapsed\t(Ctrl+T toggles)", 40037
MENUITEM "Time re&maining\t(Ctrl+T toggles)", 40038
}
POPUP "Previous button"
{
MENUITEM "&Previous\t(Click)", 40044
MENUITEM "&Start of list\t(Ctrl+Click)", 40154
MENUITEM "&Rewind 5 seconds\t(Shift+Click)", 40144
}
POPUP "Play Button"
{
MENUITEM "&Play/restart\t(Click)", 40045
MENUITEM "Open &location...\t(Ctrl+Click)", 40155
MENUITEM "Open &file...\t(Shift+Click)", 40145
}
POPUP "Pause button"
{
MENUITEM "&Pause/Unpause\t(Click)", 40046
}
POPUP "Stop button"
{
MENUITEM "&Stop\t(Click)", 40047
MENUITEM "&Stop w/ fadeout\t(Shift+Click)", 40147
MENUITEM "Stop after &current\t(Ctrl+Click)", 40157
}
POPUP "Next button"
{
MENUITEM "&Next\t(Click)", 40048
MENUITEM "&Fastforward 5 seconds\t(Shift+Click)", 40148
MENUITEM "&End of list\t(Ctrl+Click)", 40158
}
POPUP "Eject button"
{
MENUITEM "Open &file...\t(Click)", 40029
MENUITEM "Open &directory...\t(Shift+Click)", 40187
MENUITEM "Open &location...\t(Ctrl+Click)", 40185
}
POPUP "Seek bar"
{
MENUITEM "Jump to time\t(Ctrl+J)", 40193
MENUITEM "Rewind 5 seconds\t(Left Arrow)", 40061
MENUITEM "Forward 5 seconds\t(Right Arrow)", 40060
}
POPUP "Shuffle"
{
MENUITEM "Shuffle\t(S)", 40023
}
POPUP "Repeat"
{
MENUITEM "Repeat\t(R)", 40022
}
POPUP "EQ button"
{
MENUITEM "Graphical Equalizer\t(Alt+G)", 40036
}
POPUP "PE button"
{
MENUITEM "Playlist Editor\t(Alt+E)", 40040
}
}
POPUP "EQContext"
{
POPUP "enbut"
{
MENUITEM "EQ enabled\t(O)", 40244
}
POPUP "albut"
{
MENUITEM "EQ autoloading enabled\t(A)", 40245
}
}
}

Управление чужими программами Найти похожие ветки