Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 22.12.2007, 14:47
Аватар для Oleg
Oleg Oleg вне форума
Активный
 
Регистрация: 29.11.2007
Адрес: Оренбургская обл., Россия
Сообщения: 261
Репутация: 15
Вопрос Вопрос о запуке с аргументами

Как передать аргументы в запускаемую программу в ВИДЕ ПЕРЕМЕННОЙ.
например:
1 аргумент String
2 аргумент переменая (в виде переменной типа String)
3 аргумент String
4 аргумент переменая (в виде переменной типа String)
пробовал WinExec, но не знаю как передать аргумент в виде переменной
нужно что-то типа:
WinExec('"D:\test.exe" "arg1" "D:\file2.txt", "arg4"',SW_SHOW);
ShellExecute вообще не компилирует, я брал пример из справки:
ShellExecute(Handle,'open','Calc',nil,nil,SW_RESTO RE);

Смысл в том, что одна программа часто обращается к другой и передает её разные аргументы, а их невозможно точно предугадать, например время.
Как это сделать подскажите...
например:
arg1:=DateToStr(Today);
arg2:=IntToStr(hour);
WinExec("D:\test.exe", arg1, "D:\file2.txt", arg4,SW_SHOW);
Помогити плизз
Ответить с цитированием
  #2  
Старый 22.12.2007, 16:51
Аватар для Oleg
Oleg Oleg вне форума
Активный
 
Регистрация: 29.11.2007
Адрес: Оренбургская обл., Россия
Сообщения: 261
Репутация: 15
Восклицание Ещё пример

WinExec("c:\progra~1\winrar\rar.exe a -o+ -r -s -y c:\\arch\\arch1.rar c:\\dir1");

Прочитал с одного сайта, но не работает .
Тоже относится к моей теме.
Ответить с цитированием
  #3  
Старый 22.12.2007, 17:06
Аватар для moo2k
moo2k moo2k вне форума
Активный
 
Регистрация: 05.12.2006
Адрес: где-то там...
Сообщения: 321
Репутация: 35
По умолчанию

Цитата:
Сообщение от Oleg
ShellExecute вообще не компилирует
Добавь в uses ShellAPI.
__________________
Программирование - это искусство и наш смысл жизни.
Ответить с цитированием
  #4  
Старый 22.12.2007, 17:35
Аватар для Oleg
Oleg Oleg вне форума
Активный
 
Регистрация: 29.11.2007
Адрес: Оренбургская обл., Россия
Сообщения: 261
Репутация: 15
Вопрос

Почему это не компилируется:
WinExec("c:\progra~1\winrar\rar.exe a -o+ -r -s -y c:\\arch\\arch1.rar c:\\dir1");
А на счет запуска что делать ?

Последний раз редактировалось Oleg, 22.12.2007 в 18:04.
Ответить с цитированием
  #5  
Старый 22.12.2007, 19:57
Аватар для Oleg
Oleg Oleg вне форума
Активный
 
Регистрация: 29.11.2007
Адрес: Оренбургская обл., Россия
Сообщения: 261
Репутация: 15
Вопрос

Что не ужели никто не знает и не может помочь ?
Ответить с цитированием
  #6  
Старый 23.12.2007, 01:59
aleksnine aleksnine вне форума
Начинающий
 
Регистрация: 08.03.2007
Сообщения: 151
Репутация: 12
По умолчанию

Код:
shellexecute(application.Handle,'open','c:\progra~1\winrar\rar.exe',' a -o+ -r -s -y c:\arch\arch1.rar c:\dir1',nil,sw_shownormal);
Ответить с цитированием
  #7  
Старый 23.12.2007, 12:28
Аватар для Oleg
Oleg Oleg вне форума
Активный
 
Регистрация: 29.11.2007
Адрес: Оренбургская обл., Россия
Сообщения: 261
Репутация: 15
Вопрос

За пример :
shellexecute(application.Handle,'open','c:\progra~ 1\winrar\rar.exe',' a -o+ -r -s -y c:\arch\arch1.rar c:\dir1',nil,sw_shownormal);
Спасибо, но как мне сделать с переменными, которые заранее невозможно узнать, но нужно передать для запуска ?
Ответить с цитированием
  #8  
Старый 23.12.2007, 13:37
Аватар для Oleg
Oleg Oleg вне форума
Активный
 
Регистрация: 29.11.2007
Адрес: Оренбургская обл., Россия
Сообщения: 261
Репутация: 15
Печаль Помогите

Ну кто-нибудь может помочь ?
Ответить с цитированием
  #9  
Старый 23.12.2007, 17:28
aleksnine aleksnine вне форума
Начинающий
 
Регистрация: 08.03.2007
Сообщения: 151
Репутация: 12
По умолчанию

Код:
Var
S,SP:string;
begin
s:='c:\progra~1\winrar\rar.exe'; // путь к проге , которую надо запустить
sp:=' a -o+ -r -s -y c:\arch\arch1.rar c:\dir1'; // параметры с которыми запустить
shellexecute(application.Handle,'open',pchar(s),pchar(sp),nil,sw_shownormal);
Ответить с цитированием
  #10  
Старый 23.12.2007, 17:35
Аватар для Oleg
Oleg Oleg вне форума
Активный
 
Регистрация: 29.11.2007
Адрес: Оренбургская обл., Россия
Сообщения: 261
Репутация: 15
По умолчанию БОльшое Спасибо

БОльшое Спасибо !!! а я уже начал разочарововаться , но тут возикла помощь, большое спасибо. Я не знал про pchar(String), а то бы догадался.
Ещё раз большое спасибо !
Ответить с цитированием
  #11  
Старый 23.12.2007, 18:51
Аватар для Oleg
Oleg Oleg вне форума
Активный
 
Регистрация: 29.11.2007
Адрес: Оренбургская обл., Россия
Сообщения: 261
Репутация: 15
Печаль Можно вопрос ?

Как мне передать 3 аргумента для запуска файла, которые тоже невозможно предугадать ?.
Ответить с цитированием
  #12  
Старый 23.12.2007, 19:41
aleksnine aleksnine вне форума
Начинающий
 
Регистрация: 08.03.2007
Сообщения: 151
Репутация: 12
По умолчанию

А в чем проблема ? Почему их не записать , используя мой пример , в переменную sp ?
Ответить с цитированием
  #13  
Старый 23.12.2007, 19:55
Аватар для Oleg
Oleg Oleg вне форума
Активный
 
Регистрация: 29.11.2007
Адрес: Оренбургская обл., Россия
Сообщения: 261
Репутация: 15
Хорошо Спасибо !!!

Спасибо !!! Я что-то сразу не догодался !!!
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 11:02.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter