Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Программно нажать на кнопку ОК [D6, D7, WinXP]


Volf_555 ©   (2005-10-01 01:25:00) 

procedure TMainForm.Button10Click(Sender: TObject);
var
c:Integer;
begin
ShellExecute(handle, 'open', PChar(ExtractFilePath(Application.ExeName)+('1.key')),nil,nil,sw_Show); //запуск 1.key
c:=FindWindow(nil, PChar(Редактор реестра')); //поиск сообщения после открытия 1.key
sendmessage(c,WM_CLOSE,1,0); //попытка закрытия окна и неудача
end;

Суть в следущем - запускается файл 1.key >> Программа находит заголовок окна "Редактор реестра" >>  Идёт программное нажатие на кнопку ОК или на ОТМЕНА

Как это реализовать?


Германн   (2005-10-02 02:12:00) [1]

2 Volf_555   (02.10.05 02:01) [7]
И опять же TRegistry. Изучай работу с реестрои Windows из своей программы. Это - лучший вариант. Семестр ещё не скоро закончится.


Volf_555   (2005-10-02 02:01:00) [2]

>>Sashka
Пробывал запускать рег-файл твоим образом - сообщения не выскакивают и содержимое рег-файла в реестр не добавляется!


Sashka   (2005-10-01 16:20:00) [3]

Попробуй запустить "regedit.exe -s имя_файла.reg".
А вообще, задача действительно странная...
Насчёт распарсить не согласен, всё-таки геморно несколько разбираться с бинарными значениями и прочей гадостью... Можно, конечно, вот только зачем? Хотя, мне просто в голову не приходит ситуация, чтобы пользователю хотелось вбивать подобное в мемо-поле :)


IceBeerg   (2005-10-01 12:00:00) [4]

Volf_555   (01.10.05 2:14) [4]
Я бы предложил распарсить memo и самому программно внести данные в реестр...
Хотя... если мне не изменяет память... есть ключик к regedit'у который позволяет вносить изменения в реестр пропуская диалог с ОК Отмена... но к сожалению ключа не помню, а справка после поднятия w2k3 почти не работает... google!


Volf_555   (2005-10-01 02:14:00) [5]

А что предложишь тогда?


Adder   (2005-10-01 02:10:00) [6]

имхо - это как гланды удалять через ...


Volf_555   (2005-10-01 01:47:00) [7]

>>Adder
Текст вводится в MEMO >> сохраняется в 1.key >> запускается 1.key >> автоматом нажимается кнопка ОК >> (данные занесены в реестр)


Adder   (2005-10-01 01:36:00) [8]

Позвольте спросить - зачем?


Наверх

Титульная страница Поиск, карта сайта Написать письмо