Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Компиляция res файла [D6, WinXP]

PIF © (2005-05-30 19:53:00)
Хочу скомпилировать ресурс,при старте приложения, следующим образом:[code=delphi]
assignfile(f2,'1.rc');
rewrite(f2);
write(f2,' STRINGTABLE ');
write(f2,' DISCARDABLE ');
write(f2,'{ 1, "');
write(f2,'Привет');
write(f2,'"}');
closefile(f2);
ShellExecute(Handle, nil, PChar(ExtractFilePath(ParamStr(0))+
'brcc32.exe'), PChar(ExtractFilePath(ParamStr(0))+'1.rc'), nil, SW_HIDE);
[/code]
но ничего не получается. Создается файл 1.rc и все.
Скажите где у меня ошибка??!
Заранее благодарен!!!

Чапаев (2005-05-31 09:42:00) [1]
> нужно было просто написать вместо ExtractFilePath(0)
> ExtractFilePath(1), чтобы путь возвращался с конечным слэшем
Где такую траву брал? :-D

PIF (2005-05-31 00:05:00) [2]
Спасибо Чапаеву, хорошую мысль подкинул, нужно было просто написать вместо ExtractFilePath(0) ExtractFilePath(1), чтобы путь возвращался с конечным слэшем

PIF (2005-05-30 22:36:00) [3]
если запускать не из программы, то все работает без проблем

Чапаев (2005-05-30 21:13:00) [4]
Ой! А ведь ExtractFilePath(), afair, возвращает путь БЕЗ конечного слэша.

Anatoly Podgoretsky (2005-05-30 21:13:00) [5]
Да зачем гадать, пусть выкладывает сначала код ошибки.

Чапаев (2005-05-30 21:12:00) [6]
А brcc32.exe работает из папки твоего приложения, если запускать не из программы?

PIF (2005-05-30 21:07:00) [7]
brcc32.exe находится в папке с приложением, а тот же самый код работает у меня в другой программе.Просто мистикака какая-то???

Чапаев (2005-05-30 21:04:00) [8]
Хмык. 99%, что или brcc32.exe нету в каталоге приложения (а с чего бы ему там быть?), или brcc32.exe для выполнения нужны какие-то ещё файлы...

Семен Сорокин (2005-05-30 20:57:00) [9]
ShellExecute

If the function fails, the return value is an error value that is less than or equal to 32. The following table lists these error values:

Value Meaning
0 The operating system is out of memory or resources.
ERROR_FILE_NOT_FOUND The specified file was not found.
ERROR_PATH_NOT_FOUND The specified path was not found.
ERROR_BAD_FORMAT The .EXE file is invalid (non-Win32 .EXE or error in .EXE image).
SE_ERR_ACCESSDENIED The operating system denied access to the specified file.
SE_ERR_ASSOCINCOMPLETE The filename association is incomplete or invalid.
SE_ERR_DDEBUSY The DDE transaction could not be completed because other DDE transactions were being processed.
SE_ERR_DDEFAIL The DDE transaction failed.
SE_ERR_DDETIMEOUT The DDE transaction could not be completed because the request timed out.
SE_ERR_DLLNOTFOUND The specified dynamic-link library was not found.
SE_ERR_FNF The specified file was not found.
SE_ERR_NOASSOC There is no application associated with the given filename extension.
SE_ERR_OOM There was not enough memory to complete the operation.
SE_ERR_PNF The specified path was not found.
SE_ERR_SHARE A sharing violation occurred.

PIF (2005-05-30 20:53:00) [10]
Чтоже делать если он ошибку никакую не выдает??

Anatoly Podgoretsky (2005-05-30 20:38:00) [11]
Обрати внимания что ShellExecute это функция и это не спроста. Так что гони код ошибки.

PIF (2005-05-30 20:36:00) [12]
ошибку никакую он не выдает,просто создает файл 1.rc и все.

Anatoly Podgoretsky (2005-05-30 19:59:00) [13]
Какую ошибку вощвращает?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »