|
#16
|
|||
|
|||
сохранилось щас протестирую саму работу
|
#17
|
|||
|
|||
*BRAVO* работает!
|
#18
|
|||
|
|||
а закрыть командную строку я думаю так можно
begin PostMessage(FindWindow(Nil, 'cmd.exe'), WM_QUIT, 0, 0); end; вот только он ругается на WM_QUIT цитирую Undexlared identifier: 'WM_QUIT' |
#19
|
||||
|
||||
ээээ.... у командной строки хэндл и есть "Командная строка"...
вроде... Код:
PostMessage(FindWindow(Nil, 'Командная строка'), WM_QUIT, 0, 0); |
#20
|
|||
|
|||
мне проблему с
Undexlared identifier: 'WM_QUIT решить бы кажется там модуль не добавлен |
#21
|
|||
|
|||
а окно то вот http://s003.radikal.ru/i202/1009/f8/359e7c1401f9.jpg
|
#22
|
|||
|
|||
модуль ShellApi есть не пойму что не так
|
#23
|
||||
|
||||
блин у меня всё работает... напиши какие у тебя модули подключены...
у тебя есть? Windows, Messages, StdCtrls ? |
#24
|
|||
|
|||
Messages, StdCtrls небыло
|
#25
|
||||
|
||||
вроде Messages надо
|
#26
|
|||
|
|||
Postmessage(findwindow(nil,'C:\Window\system32\cmd .exe'),wm_quit,0,0);
эх жаль не закрывает |
#27
|
|||
|
|||
а это и ненадо Вобщем спасибо огромное eXplorer, работает
|
#28
|
|||
|
|||
А почему вот так нельзя было сделать:?
Код:
begin ShellExecute(0,'open','cmd.exe','/c '+copy(mess,1,length(mess)),'C:\Windows\system32\',SW_SHOW); result:=Pchar(' Выполненно! '); exit; end; |
#29
|
||||
|
||||
ааа... незнаю у меня не хочет... ошибка:
Цитата:
|
#30
|
|||
|
|||
не верный пример плюс зачемто и вобще чтото вроде функци в функцию
|