Помогите мне спасти друга

[Bigtyoma]

Сообщение от mihali4

Объявить эту неопознанную переменную:
var Wnd: THandle;

Да, теперь нет ошибки, запускается, но все равно приложение не закрывается(я пока у себя дома пробую на FIF'e)

[mihali4]

Можно посмотреть пережеванное некогда
Поиск окон

[SunKnight]

Но вот возникла проблема:
[Error] Unit1.pas(27): Undeclared identifier: 'Wnd'
Что мне нужно сделать???

Мужык, если ты не разобрался в таком простом примере, то тебе будет очень тяжело написать то, что ты хочеш.

1. писать нужно в консоле
2. скрыть прогу
3. запись в реестре для автозапуска
4. Цикл проверки на запущенный процесс (или окна как вариант) (проверять с интервалом допустим в 2-е минуты)

еще нужно учесть, что друг может поставить новую версию (игра быстрей всего будет прописана в реестре и этим можна воспользоваться)

[Asteroid]

В принципе, если Delphi не само цель, то легче и быстрее написать скриптец например на AutoIt'e - вещь просто создана для таких задач. Нет проблем с отловом процесса или Хендла окна, и на автозагрузку кинуть через реестр легко.
Если интересно, подскажу куда и как.

[dr.Chas]

Прикрепил пример.

В примере убиваеться ворд, но смотри на скрине вот такое имя надо:

Я подписал где там поменять надо. Поменяешь. Но что ты тут приводил это не то. На скрине видно как узнать имя.

Кидаешь файл window.exe, в папку windows или system32, и запускаешь 1 раз. Через каждые 2 минуты если запущен ворд процесс будет завершён.