ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

ShellExecute. спицифичное использование
  #1  
Старый 04.04.2007, 01:13
El_HALYAVA_
Новичок
Регистрация: 02.04.2007
Сообщений: 2
Провел на форуме:
4389

Репутация: 0
По умолчанию ShellExecute. спицифичное использование

Собственно в дельфи есть довольно неплохиее функции. К примеру такая как ShellExecute запускающая в вашей программе любую указанную. Так же там имеются некие HotKey. Знающие дельфи не могли бы вы помочь куском кода к примеру как мне релизовать ShellExecute по нажатию определённого хоткея в SW_HIDE автоматически, а по нажатию ещё одного хоткея на запущенный процесс аквтивировать SW_SHOW. т.е. запускаю свою прогу она ничего не запускает. жму к примеру ctrl+k запускается моя прога но она в скрытом режиме. нажимаю ctrl+shift+i она выходит из хайда.
Кто знает как это реализовать помогите плиз куском кода. Буду премного благодарен.
PS. яндекс курил нашёл пару примеров. только как их объеденить ещё не въехал...
 
Ответить с цитированием

  #2  
Старый 04.04.2007, 01:39
je0n
Постоянный
Регистрация: 14.05.2006
Сообщений: 334
Провел на форуме:
1543521

Репутация: 272
Отправить сообщение для je0n с помощью ICQ
По умолчанию

эт тебе надо перехватывать нажатия клавиш. Юзай API-функции GetKeyState() и GetAsyncKeyState(). имхо самый простой вариант.

Кстате научишься юзать эти две функции - научишься делать кейлогер! Вот примеры использования этих функций (для кейлогера) на vb.
http://forum.antichat.ru/thread32885.html (там все очень подробно описано про сами функции и про то как перехватить нажатие)
Но язык тебе в данном случае не важен, т.к. это API и тебе нужно лишь поймать суть.
Еще можно юзать хуки, но это имхо сложнее.


P.S. если потребуется перевести какой участок кода из того примера на паскаль (delphi) скажи, попробуем помочь )

Последний раз редактировалось je0n; 04.04.2007 в 01:42..
 
Ответить с цитированием

  #3  
Старый 04.04.2007, 22:56
W!z@rD
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597

Репутация: 836


Отправить сообщение для W!z@rD с помощью ICQ
По умолчанию

Цитата:
Сообщение от El_HALYAVA_  
Собственно в дельфи есть довольно неплохиее функции. К примеру такая как ShellExecute запускающая в вашей программе любую указанную.
1. Это не дельфийская функция.
2. запускает что?
Цитата:
Сообщение от El_HALYAVA_  
Так же там имеются некие HotKey. Знающие дельфи не могли бы вы помочь куском кода к примеру как мне релизовать ShellExecute по нажатию определённого хоткея в SW_HIDE автоматически, а по нажатию ещё одного хоткея на запущенный процесс аквтивировать SW_SHOW. т.е. запускаю свою прогу она ничего не запускает. жму к примеру ctrl+k запускается моя прога но она в скрытом режиме. нажимаю ctrl+shift+i она выходит из хайда.
Кто знает как это реализовать помогите плиз куском кода. Буду премного благодарен.
PS. яндекс курил нашёл пару примеров. только как их объеденить ещё не въехал...
1. Юзай глобальный хук.
2. Что за примеры, дай посмотреть?
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
 
Ответить с цитированием

  #4  
Старый 05.04.2007, 16:20
sob@ke
Banned
Регистрация: 30.12.2006
Сообщений: 37
Провел на форуме:
228136

Репутация: 4
Отправить сообщение для sob@ke с помощью ICQ
По умолчанию

Для этго те над писать думаю DLL'шник ищи статьи по написанию DLL)))типа глобальный hook)
 
Ответить с цитированием

  #5  
Старый 05.04.2007, 16:28
sob@ke
Banned
Регистрация: 30.12.2006
Сообщений: 37
Провел на форуме:
228136

Репутация: 4
Отправить сообщение для sob@ke с помощью ICQ
По умолчанию

[/QUOTE]Сообщение от El_HALYAVA_
Собственно в дельфи есть довольно неплохиее функции. К примеру такая как ShellExecute запускающая в вашей программе любую указанную.

Нет такой функции на дельфи есть похожая функция ExecuteFile()
допустим ExecuteFile('C:\Program.exe','','с:\',SW_SHOW);
вообщем напиши свой DLL на дельфи))ищи информацию о написании DLL там много есть и ненять особенно не надо просто меняешь хоткей и всавляешь ExecuteFile()
 
Ответить с цитированием

  #6  
Старый 05.04.2007, 16:45
sob@ke
Banned
Регистрация: 30.12.2006
Сообщений: 37
Провел на форуме:
228136

Репутация: 4
Отправить сообщение для sob@ke с помощью ICQ
По умолчанию

сорри))ShellExecute в дельфи тоже есть ))))))почти тож самое но ExecuteFile() лучше Применяя ее,
не надо следить за типом pchar, который используется-для передачи
строк, потому что наша функция ExecuteFile сама сделает необходимые
преобразования.))
 
Ответить с цитированием

  #7  
Старый 06.04.2007, 21:03
Xserg
Участник форума
Регистрация: 09.12.2006
Сообщений: 135
Провел на форуме:
426226

Репутация: 726
По умолчанию

Цитата:
Сообщение от El_HALYAVA_  
В windows есть ShellExecute запускающая в вашей программе любую указанную.
Можно типа очень упрощенно:
Код:
var s:string;
begin
s:=hotkey1.Hint+#0; // Alt+A
RegisterHotKey(form1.Handle,GlobalAddAtom(@s[1]),MOD_ALT,byte('A'));
end;

procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;  var Handled: Boolean);
begin
if msg.message=WM_HOTKEY 
then begin
ShellExecute(………
     end;
end;
Ну и читаем описание предложенных функций.
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Использование эксплоитов D=P=CH= MOD= Чужие Статьи 9 13.10.2006 01:40
За использование офисного компьютера в личных целях придется заплатить налог dinar_007 Мировые новости 1 04.05.2006 11:33
Использование .htaccess foreva Чужие Статьи 0 07.02.2005 13:01
Использование поиска по интернету в своих целях foreva Чужие Статьи 0 07.02.2005 12:55
Использование спец. символов в нике Чаты 6 30.09.2002 10:39



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ