Вопросы по Delphi 2 - [36] :: Прикладное программирование

Новости • Файловые архивы
Поиск • Активные темы • Топ лист
Правила • Кто в on-line?

Вход • Забыли пароль? • Первый раз на этом сайте? • Регистрация

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi 2

Модерирует : ShIvADeSt
ShIvADeSt (22-03-2007 02:18): http://forum.ru-board.com/topic.cgi?forum=33&topic=8142	Версия для печати • Подписаться • Добавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100

ShIvADeSt

Moderator

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Продолжение темы http://forum.ru-board.com/topic.cgi?forum=33&topic=3647&start=2020#lt
Внимание, все большие куски кода (более 5 строк) оформляем в тег [more] дабы уменьшить размер поста.

Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 01:52 20-04-2006 | Исправлено: ShIvADeSt, 02:02 30-06-2006

kzsergo

Junior Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Есть какие-то ещё варианты?
Подскажите ещё:
Как эмулировать нажатие кнопок чужого приложения, не открывая его?
Как снять какой-нибудь из флажков чужого приложения???????

Всего записей: 36 | Зарегистр. 14-07-2006 | Отправлено: 19:19 22-08-2006

xitsmex

Junior Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:

Пока не опишите задачу - так и будете довольствоваться односложными ответами.

Всего записей: 58 | Зарегистр. 31-08-2005 | Отправлено: 20:38 22-08-2006

kzsergo

Junior Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:

Пока не опишите задачу

К примеру мне нужно написать прогу которая бы позволяла снять (поставить) флажок в чужом приложении. Например я хочу поставить (снять) флажок в приложении Internet Explorer/Сервис/Свойства обозравателя/Дополнительно/отображать рисунки.

С эмулированием нажатием кнопки и клавиши на чужом приложении разобрался. Всё оказалось не, так сложно как я предполагал.

Всего записей: 36 | Зарегистр. 14-07-2006 | Отправлено: 21:33 22-08-2006

ShIvADeSt

Moderator

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:

Например я хочу поставить (снять) флажок в приложении Internet Explorer/Сервис/Свойства обозравателя/Дополнительно/отображать рисунки.

В реестре если мне не изменяет память все это хранится, где имено - ищи сам, в любом случае чекбоксы просто отображают состояние флагов в реестре, после изменния реестра не забудь послать что реестр изменился, хотя возможно ИЕ и пофигу на это будет.

----------
И создал Бог женщину... Существо получилось злобное, но забавное...

Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 01:39 23-08-2006

dmit000 Full Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору напишите пожалуйсто код на АПИ для перезагрузки и выключения WINXP
	Всего записей: 483 \| Зарегистр. 07-06-2004 \| Отправлено: 06:02 23-08-2006

SERGE_BLIZNUK

Silver Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

dmit000

Цитата:

пожалуйсто код на АПИ для перезагрузки и выключения WINXP

выдернул из DelphiWorld Как выключить компьютер с любой версией Windows

ещё, там же Выключить или перезагрузить компьютер

Всего записей: 2014 | Зарегистр. 12-09-2002 | Отправлено: 07:06 23-08-2006

dmit000 Full Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору SERGE_BLIZNUK спасибо за ответ
	Всего записей: 483 \| Зарегистр. 07-06-2004 \| Отправлено: 19:42 23-08-2006

sunduk4

Junior Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Подскажите, можно ли как-то определить, что курсор находится на последней видимой записи выпадающего спика комбобокса и перехватить попытку скрола этого выпадающего спика? Задача - сыпать в комбобокс единовременно только видимое кол-во записей и, при попытке переместиться ниже, добавлять такое же количество записей.

Всего записей: 177 | Зарегистр. 03-04-2004 | Отправлено: 11:45 24-08-2006

kzsergo

Junior Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Подскажите, как можно задержать посылку сообщения? Например я написал прогу, которая открывает какое-нибудь чужое приложение, затем посылается ему сообщение, но всегда получается так, что сообщение посылается раньше запуска программы, хотя должено происходить наоборот - запускаться приложение затем посылаться ему сообщение. Вот как временно приостановить посылку сообщения до запуска программы, не используя таймер?

Всего записей: 36 | Зарегистр. 14-07-2006 | Отправлено: 13:45 24-08-2006

sunduk4 Junior Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору kzsergo в цикле ищи через FindWindow окно своей программы, если не найдено - sleep.
	Всего записей: 177 \| Зарегистр. 03-04-2004 \| Отправлено: 13:51 24-08-2006

kzsergo

Junior Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Что такое Sleep?

Цитата:

Подскажите, как можно задержать посылку сообщения?

как еще можно сделать?

Всего записей: 36 | Зарегистр. 14-07-2006 | Отправлено: 18:59 24-08-2006

FireZone

Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

kzsergo
Цитата:

Что такое Sleep?

Функция windows, которая приостанавливает выполнение потока на указанное количество миллисекунд.
Цитата:

как еще можно сделать?

Извращаться можно всяко. Я вижу только два общих способа задержки: крутить холостой цикл, что есть нагрузка на процессор; блокировать поток (например, функцией Sleep). Можно крутить Sleep в цикле с проверкой существования окна на каждом проходе, как было предложено выше. Метод хорош тем, что не создаёт лишней нагрузки на процессор и позволяет не ждать лишнего.

Всего записей: 293 | Зарегистр. 28-01-2004 | Отправлено: 19:32 24-08-2006

dmit000

Full Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

SERGE_BLIZNUK

ExitWindowsEx(EWX_REBOOT or ewx_force,0); - для перезагрузки компютера
ExitWindowsEx(EWX_POWEROFF or ewx_force,0); - для выключения компютера

команды в Win XP не работают. вероятно я чтото не то пишу в разделе Uses. я там записал ShellApi

что нужно писать в разделе Uses

Всего записей: 483 | Зарегистр. 07-06-2004 | Отправлено: 08:51 25-08-2006

FireZone

Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

dmit000
Из справки
Цитата:

To shut down or restart the system, the calling process must use the AdjustTokenPrivileges function to enable the SE_SHUTDOWN_NAME privilege

Короче говоря, права надо заиметь на перезагрузку или выключение. Если прога компилируется, то Uses здесь совершенно не виноват.

Всего записей: 293 | Зарегистр. 28-01-2004 | Отправлено: 10:03 25-08-2006

dmit000 Full Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору FireZone а вот пример, но конкретный можно
	Всего записей: 483 \| Зарегистр. 07-06-2004 \| Отправлено: 13:14 25-08-2006

SERGE_BLIZNUK

Silver Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

dmit000

Цитата:

выдернул из DelphiWorld Как выключить компьютер с любой версией Windows

скажите, а тот пример, который под катом (выше на этой же странице) вы смотрели?
а запускали?

Всего записей: 2014 | Зарегистр. 12-09-2002 | Отправлено: 13:49 25-08-2006

qwedr

Junior Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

У меня дома есть рабочий пример под XP. Действительно команда на перезагрузку не работает без установки соответствующей привилегии. А как сделать - подумайте лучше сами, больше пользы будет. Я в свое время его сам с нуля написал юзая один дельфийский хелп (по WinAPI) и свои мозги.

Всего записей: 110 | Зарегистр. 12-07-2006 | Отправлено: 14:08 25-08-2006

kzsergo

Junior Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Написал прогу, которая изменяет определенный ключ в реестре, который принадлежит нужной мне программы, но эти изменения вступают с силу только после перезагрузки этой программы. Можно ли как-нибудь сделать так, чтобы изменения вступали в силу сразу после изменения ключа?

Всего записей: 36 | Зарегистр. 14-07-2006 | Отправлено: 19:20 26-08-2006

SERGE_BLIZNUK

Silver Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

kzsergo

Цитата:

как-нибудь сделать так, чтобы изменения вступали в силу сразу после изменения ключа

Имхо, если вы не имеете возможность изменять исходники этой чужой программы - то нет ;-(
это ПОЛНОСТЬЮ зависит от того, по какому алгоритму эта программа работает с реестром, чаще всего, если речь идёт о чтении конфигурации - на запуске читается реестр и потом не обращается туда...

Всего записей: 2014 | Зарегистр. 12-09-2002 | Отправлено: 20:31 26-08-2006

GTA3

Junior Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

есть такой вопросик по delphi

procedure xxx.runclick(sender: Tojbect);
var stS,stSS: string;

begin
stS:= 'Строка символов';
stSS:= stS;
stS := 'Это -' + stS;
stS[7]:= 'c'; // символы в строке нумеруются, начиная с 1
label.caption:= stS; // выводится Это- строка символов
end;

теперь вопрос зачем присваивать stSS:= stS; если вместо этой строки stS := 'Это -' + stS; мы могли написать такую stS := 'Это -' + stSS; перед эти определив что stSS:= 'Это-'
есть от такого кода какой нить выйгрыш перед моим...?

Всего записей: 114 | Зарегистр. 22-07-2004 | Отправлено: 22:33 27-08-2006

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi 2
ShIvADeSt (22-03-2007 02:18): http://forum.ru-board.com/topic.cgi?forum=33&topic=8142

Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC