Запустить программу - Общие вопросы Delphi

foxes · 05.05.2012, 15:39

Ребята подскажите как запустить программу из Edit2.Text

Код:

Так пробувал не запускает
WinExec (PAnsiChar(Edit2.Text), SW_SHOW);

Serge_Bliznykov · 05.05.2012, 16:02

ну так в Edit2.Text должно быть имя программы, которое лежит по путям, либо рядом с exeшников вашего проекта, либо нужно указывать в Edit2.Text - ПОЛНЫЙ ПУТЬ!

Цитата:

Так пробувал не запускает

в чём выражается то, что не запускается? Может это что-то и не должно запускаться в принципе!

foxes · 05.05.2012, 16:14

В Папке находятся Project1.exe, calc.exe в Edit2.Text я прописал calc.exe
Запускаю Project1.exe, жму на кнопку - и ноль реакции

Serge_Bliznykov · 05.05.2012, 17:11

А если в Windows нажать "Пуск" - "Выполнить" (или сочетание клавиш Win+R) - написать "calc.exe", нажать Enter - у Вас запускается калькулятор?!!
А calc.exe Вы без ошибок написали?!

но код абсолютно рабочий. посмотрите в архиве. у меня (Windows XP) работает без проблем!

foxes · 05.05.2012, 17:25

У меня (Windows 7)
У меня так запускается.
WinExec(PAnsiChar('calc.exe'), SW_SHOW);
А так нет.
WinExec (PAnsiChar(Edit2.Text), SW_SHOW);

У меня Delphi xe и я так тут проблема!
Serge_Bliznykov
А какая у ВАС версия?
Спасибо вам

Stilet · 05.05.2012, 18:33

Цитата:

А так нет.

Наверное потому что Edit2.Text - юникодный, а ты его в указатель на AnsiChar пытаешся преобразовать.
Используй ShellExecute для запуска. WinExec морально устарела.

foxes · 05.05.2012, 19:39

Всем спасибо
так запускается

Код:

ShellExecute (Form1.Handle, nil, PChar(Edit2.Text), nil, nil, SW_HIDE);

А пробывал на XE2
Тоже работает

Код:

WinExec (PAnsiChar(Edit2.Text), SW_SHOW);

artemavd · 06.05.2012, 05:58

В Delphi XE лучше вместо PAnsiChar использовать PWideChar.

FaTaL · 06.05.2012, 08:14

Цитата:

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

В Delphi XE лучше вместо PAnsiChar использовать PWideChar.

В Delphi XE PWideChar и PChar идентичны. Так что нет надобности указывать явно PWideChar

05.05.2012, 15:39	#1
foxes Пользователь Регистрация: 14.11.2008 Сообщений: 94	Запустить программу Ребята подскажите как запустить программу из Edit2.Text Код: `Так пробувал не запускает WinExec (PAnsiChar(Edit2.Text), SW_SHOW);` Последний раз редактировалось foxes; 05.05.2012 в 15:41.

05.05.2012, 17:25	#5
foxes Пользователь Регистрация: 14.11.2008 Сообщений: 94	У меня (Windows 7) У меня так запускается. WinExec(PAnsiChar('calc.exe'), SW_SHOW); А так нет. WinExec (PAnsiChar(Edit2.Text), SW_SHOW); У меня Delphi xe и я так тут проблема! Serge_Bliznykov А какая у ВАС версия? Спасибо вам Последний раз редактировалось Stilet; 05.05.2012 в 18:31.

05.05.2012, 19:39	#7
foxes Пользователь Регистрация: 14.11.2008 Сообщений: 94	Всем спасибо так запускается Код: `ShellExecute (Form1.Handle, nil, PChar(Edit2.Text), nil, nil, SW_HIDE);` А пробывал на XE2 Тоже работает Код: `WinExec (PAnsiChar(Edit2.Text), SW_SHOW);` Последний раз редактировалось foxes; 05.05.2012 в 19:50.

06.05.2012, 05:58	#8
artemavd Старожил Регистрация: 05.06.2008 Сообщений: 4,210	В Delphi XE лучше вместо PAnsiChar использовать PWideChar. Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Как запустить программу	Assemblerru	Общие вопросы C/C++	6	23.11.2010 19:34
Не могу запустить программу	Володя22	Общие вопросы C/C++	2	27.03.2010 22:22
Помогите запустить программу	Ellita	Помощь студентам	14	21.12.2009 08:05
Запустить программу от имени...	dr.Chas	Win Api	3	21.08.2009 20:20
Как запустить программу?	egordark	Общие вопросы .NET	4	18.11.2008 18:17

05.05.2012, 16:14	#3
foxes Пользователь Регистрация: 14.11.2008 Сообщений: 94	В Папке находятся Project1.exe, calc.exe в Edit2.Text я прописал calc.exe Запускаю Project1.exe, жму на кнопку - и ноль реакции