IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

> Запуск Bat-файла, и внешних исполняемых фалов
Cygno
сообщение 26.10.2004 10:34
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 10
Пол: Мужской

Репутация: -  0  +


Такой вопросец...

Как средствами Delphi 7 организовать запуск bat-файла (да и вообще любого внешнего файла? Чт оза функция управляет этиим? И нужно ли чего подключать, в Uses
(есть только имя файла с путем к нему, какие еще параметры нужны?)

Когда пишу ShellExecuteEx - мне не выдает параметров, как будто такой функции нет..

Может я опять чего не увидел в хелпе? smile.gif :p2:
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
volvo
сообщение 26.10.2004 13:20
Сообщение #2


Гость






Cygno

Попробуй так:


procedure TfrmPPG.btnRunClick(Sender: TObject);
var
 iDelim: integer;
 sProjSettFile: string
 ss: PAnsiChar;
begin
iDelim := Pos(' ',frmPPG.lstProjects.Items.Strings[frmPPG.lstProjects.ItemIndex]);
sProjSettFile := Copy(frmPPG.lstProjects.Items.Strings[frmPPG.lstProjects.ItemIndex],1,iDelim-1) + '_settings.bat';

ss := PAnsiChar('D:\delphi\' + sProjSettFile);
WinExec(ss,SW_SHOW);

end;

 К началу страницы 
+ Ответить 

Сообщений в этой теме
Cygno   Запуск Bat-файла   26.10.2004 10:34
volvo   Легче всего использовать WinExec. При обращении к ...   26.10.2004 11:18
Cygno   volvo Благодарю, сейчас попробуем. [b]Добавлено ...   26.10.2004 12:25
Atos   Cygno , а не пробовал сразу объявлять не string, a...   26.10.2004 12:44
Cygno   Пробовал. Но мне надо выполнить конкатенацию - соб...   26.10.2004 13:10
volvo   Cygno Попробуй так: procedure TfrmPPG.btnRunCl...   26.10.2004 13:20
Cygno   Спасибо, volvo ! Сработало. Только вот поче...   26.10.2004 13:29
Atos   Ага, я опоздал, volvo уже и текст привёл... :) Кс...   26.10.2004 13:30
Cygno   В продолжение... При выполнение команды WinExec...   26.10.2004 14:01
xds   procedure TMainForm.btLaunchClick(Sender...   26.10.2004 15:57
Cygno   Очередная проблема с этими запусками....... Есть ...   27.10.2004 13:40
volvo   Cygno Ну если у тебя: так почему не сделать т...   27.10.2004 14:05
Atos   Гм... если путь относительный, то почему бы не пр...   27.10.2004 14:28
volvo   Cygno Есть еще один момент - у тебя случайно в п...   27.10.2004 14:32
Cygno   Кириллицы точно нет. Так не хочу, потому что вс...   27.10.2004 15:19
volvo   Cygno А ведь Atos прав - лучше всего запускать ба...   27.10.2004 15:45
Cygno   Ну что ж господа - свершилось чудо! :) Это ...   27.10.2004 16:01
P@sh@   Cygno Только вот почему, когда я пишу функцию в о...   2.11.2004 7:50
Cygno   Я думал, что это функция, отвечающая за преобразов...   2.11.2004 8:15


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 11.07.2025 17:36
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"