Имитировать код .БАТ файла

@Tornament · Регистрация: 28.10.2010

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

Имитировать код .БАТ файла.

Bash

1 2	set appdata=".\" start "" "Launcher.exe"

Особенность кода БАТ в том что запущенная прога будет думать что appdata находится не стандартной папке, а в указанной нами.

А как в делфе будет, не знаю

Delphi

1 2	????? ShellExecute(Handle, 'Open', pWideChar(HereP+'Launcher.exe'), nil, nil, SW_Normal);

Где HereP:=ExtractFilePath(ParamStr(0));

@cotseec · 13.02.2013, 12:58

CreateProcess (gunsmoker, MSDN)
возможно поможет аргумент

lpCurrentDirectory - текущая директория или NULL, тогда используется текущая директория родителя

@Tornament · 13.02.2013, 14:30 **[ТС]**

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

lpCurrentDirectory

Этот аргумент заставляет думать что программа запущена с этого места, и работает там-же)

А мне надо чтоб программа думала, что appdata находится в указанной мною папке.

@Tornament · 26.02.2013, 22:57 **[ТС]**

У кого есть еще варианты?

@mss · 26.02.2013, 23:40

SetEnvironmentVariable()

@Tornament · 27.02.2013, 11:18 **[ТС]**

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

SetEnvironmentVariable()

хе хе... Суть не в том чтоб объявить новую переменную, или изменить значение существующей, а в том что бы запустить программу, которая будет думать что %appdata% не в стандартной папке, а в указанной мною, при этом значение %appdata% в самой системе остаётся абсолютно неизменным.

Попробуй сделать батник

Bash

@echo off
Echo "%appdata%"
Set appdata="D:\NewPath"
Echo %appdata%
pause

При этом значение "%appdata%" меняется только для сего батника и всего что будет из него запущено.

@mss · 27.02.2013, 11:30

Прежде чем рассуждать о "сути" следует проштудировать документацию.
В ней черным по белому написано:

The SetEnvironmentVariable function sets the value of an environment variable for the current process

@Tornament · 27.02.2013, 17:42 **[ТС]**

Смотрел, от чего и пишу.
блин... я же говорю что буду новый процесс запускать, и уже он будет работать с новой переменной.

Bash

:: изменяем переменную appdata для данного процесса, и для всех которые будут с него запущены, даже если "родительский" будет завершен.
set appdata=".\" 
:: Запускаем программу, для которой хотим применить изменение (на данный запуск) стандартной переменной "appdata"
start "" "Launcher.exe"
:: после чего БАТ файл автоматически закрывается

@cotseec Пишу на Delphi...иногда 1423 / 1278 / 286 Регистрация: 03.12.2012 Сообщений: 3,914 Записей в блоге: 5
	13.02.2013, 12:58	2
	CreateProcess (gunsmoker, MSDN) возможно поможет аргумент lpCurrentDirectory - текущая директория или NULL, тогда используется текущая директория родителя 1

@Tornament 71 / 71 / 2 Регистрация: 28.10.2010 Сообщений: 329
	13.02.2013, 14:30 [ТС]	3
	Сообщение от cotseec lpCurrentDirectory Этот аргумент заставляет думать что программа запущена с этого места, и работает там-же) А мне надо чтоб программа думала, что appdata находится в указанной мною папке. 0

@Tornament 71 / 71 / 2 Регистрация: 28.10.2010 Сообщений: 329
	26.02.2013, 22:57 [ТС]	4
	У кого есть еще варианты? 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	26.02.2013, 23:40	5
	SetEnvironmentVariable() 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.02.2013, 11:30	7
	Прежде чем рассуждать о "сути" следует проштудировать документацию. В ней черным по белому написано: The SetEnvironmentVariable function sets the value of an environment variable for the current process 0

	27.02.2013, 17:42