Мне нужно найти какой то файл например в папке виндовза и запустить его. Но я не знаю какой винд (вин2000 -> WINNT, Winxp -> Windows и т.д.) и в каком диске установлен. Как решить праблему?

| Сообщение посчитали полезным:

%windir%\filename.exe

| Сообщение посчитали полезным:

А этот трюк с делфи проходит?

| Сообщение посчитали полезным:

этот трюк проходит в винде. называется переменная окружения. язык не причем

| Сообщение посчитали полезным:

GetWindowsDirectory

| Сообщение посчитали полезным:

а можно и вообще "filename.exe"
виндовая папка ведь всегда в переменной окружения PATH прописана. (разве нет?)

| Сообщение посчитали полезным:

2 intty
Ну да, но вряд ли сработает.

2 Asterix
Спасибо, а можно поконкретнее?

| Сообщение посчитали полезным:

n90p
GetWindowsDirectory http://msdn.microsoft.com/library/default.asp?url=/library/en-us/sysinfo/base/getwindowsdirectory.asp -- куда уж конкретнее .

-----
the Power of Reversing team

| Сообщение посчитали полезным:

Есть еще одна функция:
GetSystemDirectory

The GetSystemDirectory function retrieves the path of the system directory. The system directory contains system such files such as dynamic-link libraries, drivers, and font files.

This function is provided primarily for compatibility. Applications should store code in the Program Files folder and persistent data in the Application Data folder in the user's profile. For more information, see ShGetFolderPath.


UINT GetSystemDirectory(
LPTSTR lpBuffer,
UINT uSize
);

Parameters
lpBuffer
[out] Pointer to the buffer to receive the null-terminated string containing the path. This path does not end with a backslash unless the system directory is the root directory. For example, if the system directory is named Windows\System on drive C, the path of the system directory retrieved by this function is C:\Windows\System.
uSize
[in] Maximum size of the buffer, in TCHARs. This value should be set to MAX_PATH.

В винХР вернет что-то типа C:\WINDOWS\system32

-----
Research is my purpose

| Сообщение посчитали полезным:

В Билдере точно было что-то подобное, а вообще глянь доку по реестру. Положение этой папки там если и не в одном и том же месте , то вариантов 2-3, не больше.

try {..} catch рулит

А если совсем не париться,то батник, где, как писали выше:
%windir%\filename.exe

| Сообщение посчитали полезным:

В builder:

char sWinDir[255];
GetWindowsDirectory(sWinDir,sizeof(sWinDir));
... AnsiString(sWinDir)+"\filename.exe" //"..." - необходимая операция
примерно так

| Сообщение посчитали полезным:

Млин, над чем ты мудишься..
В паблике объяви переменные: директория(строка), директория(pchar), результат(кардинал).
директория(pchar) := stralloc(max_path);
результат := GetWindowsDirectory(директория(pchar), max_path);
if результат > 0 then
директория(строка) := strpas(директория(pchar));

| Сообщение посчитали полезным:

еще вот, забыл
если файла там нет, попробуй поискать.
пользуй shellexecute (чтобы найти файл - ключ search, открыть - open)
ну а если тебе и api не поможет , тебе уже ничто не поможет

| Сообщение посчитали полезным:

GetWindowsDirectory + FindFirstFile, FindNextFile, FindClose + ShellExecute

| Сообщение посчитали полезным:

Точно не помню, но на делфях, вроде, есть такая функция которая принимает на вход только ИмяФайла и вохвращает полный путь. А вот назавние забыл =(

-----
Don_t hate the cracker - hate the code.

| Сообщение посчитали полезным:

у мня например при указании только имени файла работало (если файл в папке винды был)

| Сообщение посчитали полезным:

Блин, вот готовый код, ничего сложного.

uses
ShellApi;

var
windir: array [0..255] of char;

begin
GetWindowsDirectory(windir, 255);
ShellExecute(Handle, 'open',
Pchar(windir+'filename.exe'), nil, nil, SW_SHOWNORMAL);
end;

а уж про FindFirst,FindNext,FindClose найти не проблема.

| Сообщение посчитали полезным:

Thanx to all

| Сообщение посчитали полезным: