Помощник
 |
|
Разработка бизнес сайтов Нужны клиенты? Тогда сюда быстрее... |
Сообщение сайта
Здравствуйте, гость ( Вход | Регистрация )
 Взаимодействие с Dos приложением |
|
|
 15:02:2008, 20:58
 
|
|
Новенький  Группа: Программист Сообщений: 2 Регистрация: 19:01:2008 Пользователь №: 14 888 Репутация:  0 
 |
трагичность ситуации в следующем:
есть запущенное DOS приложение. Я знаю только имя процесса, как определить hwnd и т.п. я пока не знаю  мне нужно определить считать из этого досовского приложения последнюю строчку и потом послать ему нажатие клавиши Enter. помогите, люди добрые, заранее благодарна. |
 |
Сообщение
#1
|
 |
|
|
15:02:2008, 21:55
|
|
Божественный Группа: Модеры Сообщений: 899 Регистрация: 19:11:2003 Пользователь №: 133 Репутация: 11
|
Если это чисто Досовское приложение, то ничего не получится, а если консольное Win-приложение, тогда можно.
|
|
|
Сообщение
#2
|
|
|
19:03:2008, 05:33
|
|
Продвинутый Группа: Программист Сообщений: 163 Регистрация: 28:08:2007 Из: Алматы Пользователь №: 12 496 Специализация: Программист Репутация: 0
|
Цитата(zubr @ 16:02:2008 - 03:55)  Если это чисто Досовское приложение, то ничего не получится, а если консольное Win-приложение, тогда можно. а как сделать так чтобы программка написанная на дельфи находил уже запущенное консольное окно лотус сервера и там вводил нужную команду и нажал на ентер |
|
|
Сообщение
#3
|
|
|
19:03:2008, 08:17
|
|
Божественный Группа: Модеры Сообщений: 899 Регистрация: 19:11:2003 Пользователь №: 133 Репутация: 11
|
Никак. Твоя программа на Delphi должна запустить процесс лотуса, тогда можно.
|
|
|
Сообщение
#4
|
|
|
19:03:2008, 11:38
|
|
Продвинутый Группа: Программист Сообщений: 163 Регистрация: 28:08:2007 Из: Алматы Пользователь №: 12 496 Специализация: Программист Репутация: 0
|
Цитата(zubr @ 19:03:2008 - 14:17) Никак. Твоя программа на Delphi должна запустить процесс лотуса, тогда можно. такой вариант тоже пойдет а как это сделать Код program Domino_Logon; //{$APPTYPE CONSOLE} uses Windows, Messages; var h: HWND; s:string; begin h:=findwindow(nil, 'DominoServer/KazNPU: Lotus Domino Server'); if h = 0 then Exit; ShowWindow(h, SW_RESTORE); // s:='tell http quit'; SendMessage(h, WM_SETTEXT, 0, longint(Pchar(s))); SendMessage(h, WM_KEYDOWN, VK_RETURN, 0); end. 'tell http quit' печатается в заголовке консольного окна домино а мне нужно оно печатался в самом окне |
|
|
Сообщение
#5
|
|
|
19:03:2008, 11:56
|
|
============== Группа: Модеры Сообщений: 1 740 Регистрация: 11:01:2007 Пользователь №: 8 750 Специализация: specialist Репутация: 27
|
Надо захватывать у этого окна консольный (стандартный) ввод/вывод.
Ну или пробовать использовать виртуальную клавиатуру, если не важно знать что там за сообщения идут. |
|
|
Сообщение
#6
|
|
|
19:03:2008, 12:12
|
|
Продвинутый Группа: Программист Сообщений: 163 Регистрация: 28:08:2007 Из: Алматы Пользователь №: 12 496 Специализация: Программист Репутация: 0
|
Цитата(sax_ol @ 19:03:2008 - 17:56) Надо захватывать у этого окна консольный (стандартный) ввод/вывод. с примером конкретизировать можете вообщем мне надо так сделать чтобы при перезагрузке сервака автоматический набирался пароль для домино и был нажат ентер |
|
|
Сообщение
#7
|
|
|
19:03:2008, 12:19
|
|
Божественный Группа: Модеры Сообщений: 1 817 Регистрация: 4:09:2006 Из: Минск Пользователь №: 6 316 Специализация: C++ Репутация: 31
|
Цитата(yerke @ 19:03:2008 - 15:12) с примером конкретизировать можете Creating a Child Process with Redirected Input and Output |
|
|
Сообщение
#8
|
|
|
19:03:2008, 12:36
|
|
============== Группа: Модеры Сообщений: 1 740 Регистрация: 11:01:2007 Пользователь №: 8 750 Специализация: specialist Репутация: 27
|
European + Пояндексив найдутся и делфевые варианты.
|
|
|
Сообщение
#9
|
|
|
Текстовая версия | Сейчас: 17:05:2008 - 11:05 |
