Запуск внешнего exe-файла

17.12.2009, 11:57. **Показов** 9096. **Ответов** 8

Author24 — интернет-сервис помощи студентам

Здравствуйте все, вопрос следующего характера. Есть exe файл написаный на фортране и надо, чтобы он начинал работать при нажатие на определенную кнопку в программе, написанной на delphi. как это сделать ума не приложу. Если кто-нибудь будет вылаживать код, то если можно с комментариями. заранее спасибо.

@Jazon_deenAlt · 17.12.2009, 12:07

Delphi

Uses
  ShellApi,...
----------------
procedure TForm1.{какую хош}(Sender: TObject);
begin
ShellExecute(Application.Handle,'Open','Путь к файлу',Nil,Nil,SW_SHOWDEFAULT);
end;

или

Delphi

1	WinExec('Путь к файлу', SW_SHOW);

@taxo · 12.01.2010, 02:13

а как сделать, чтобы exe файл вызывался, производил например над txt файлом действие какое-нибудь(например, искал строчки нужные) и записать их в другой txt файл!?можно сделать как-нибудь?

@Страдалецъ · 12.01.2010, 02:50

Примерно так:

Delphi

program FileOne;
 
{$APPTYPE CONSOLE}
 
uses
  ShellApi,
  Forms,
  Windows;
 
begin
 ShellExecute(Application.Handle,'Open','FileTwo.exe','Test.txt',Nil,SW_SHOWDEFAULT);
end.

Delphi

program FileTwo;
{$APPTYPE CONSOLE}
uses
  SysUtils;
 
Var
  f: Text;
begin
 if ParamCount < 1 then Exit;
 if not FileExists(ParamStr(1))
 then Exit;
 AssignFile(f, ParamStr(1));
 Reset(f);
 Append(f);
 WriteLn(f,'Припишем что-то');
 Close(f);
end.

@taxo · 12.01.2010, 13:24

спасибо!! примерно такое же вышло!

WriteLn(f,'Припишем что-то');

эт тип чё такое?))

@Страдалецъ · 12.01.2010, 13:31

Вы просили операцию с текстом, я дал добавление новой строчки в конец файла при каждом вызове FileTwo.exe

@Inadequate · 12.01.2010, 15:57

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

эт тип чё такое?))

Заместо 'Припишем что-то' должен быть написан путь к файлу.

@taxo · 12.01.2010, 18:51

ок! thx

@unnameduser · 28.01.2010, 11:27

А почему приложение которое написано в том же Delphi обе процедуры и shellexecute, и winexec открывают в том же окне?

как сделать, чтобы это приложение открывалось в новом окне?

kirillka21
		1
	Запуск внешнего exe-файла 17.12.2009, 11:57. Показов 9096. Ответов 8 Метки нет (Все метки) Здравствуйте все, вопрос следующего характера. Есть exe файл написаный на фортране и надо, чтобы он начинал работать при нажатие на определенную кнопку в программе, написанной на delphi. как это сделать ума не приложу. Если кто-нибудь будет вылаживать код, то если можно с комментариями. заранее спасибо.

@taxo 5 / 5 / 0 Регистрация: 14.09.2009 Сообщений: 80
	12.01.2010, 02:13	3
	а как сделать, чтобы exe файл вызывался, производил например над txt файлом действие какое-нибудь(например, искал строчки нужные) и записать их в другой txt файл!?можно сделать как-нибудь? 0

@taxo 5 / 5 / 0 Регистрация: 14.09.2009 Сообщений: 80
	12.01.2010, 13:24	5
	спасибо!! примерно такое же вышло! WriteLn(f,'Припишем что-то'); эт тип чё такое?)) 0

@Страдалецъ Тимуровец 445 / 285 / 50 Регистрация: 10.09.2009 Сообщений: 963
	12.01.2010, 13:31	6
	Вы просили операцию с текстом, я дал добавление новой строчки в конец файла при каждом вызове FileTwo.exe 0

@Inadequate Retired 7727 / 2559 / 671 Регистрация: 17.10.2009 Сообщений: 5,100
	12.01.2010, 15:57	7
	Сообщение от taxo эт тип чё такое?)) Заместо 'Припишем что-то' должен быть написан путь к файлу. 1

@taxo 5 / 5 / 0 Регистрация: 14.09.2009 Сообщений: 80
	12.01.2010, 18:51	8
	ок! thx 0

@unnameduser 0 / 0 / 0 Регистрация: 19.10.2016 Сообщений: 31
	28.01.2010, 11:27	9
	А почему приложение которое написано в том же Delphi обе процедуры и shellexecute, и winexec открывают в том же окне? как сделать, чтобы это приложение открывалось в новом окне? 0