ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.

16.05.2010, 09:40
|
|
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
Провел на форуме: 188563
Репутация:
52
|
|
Сообщение от iGlass
=) Эт я ошибся.. Но не из-за этого трабл.. всё равно не хочет копироваться..
Другие версии будут?)
В этом куске кода кроме той ошибки, я не нашел. Так что проверяй:
get(CSIDL_APPDATA) - Вот это от куда и что дает?
tmp:=SRC.Strings[6]; - что тут получается.
В общем делай трассировку кода или проверки (MessageBox). Вот кусок добавил если скажет, что файла нет, значит где то в получении пути дело.
PHP код:
...
fullPath:=get(CSIDL_APPDATA)+tmppath+tmp3+'\'+tmp+ '\'+key3;
if not FileExists(fullPath) then
MessageBox(0,PAnsiChar('Путь до файла не существует:' +#13#10+fullPath),'Not File',0);
CopyFile(PAnsiChar(fullPath),PAnsiChar('C:\key3.db'),false);
|
|
|

16.05.2010, 10:56
|
|
Познающий
Регистрация: 14.05.2009
Сообщений: 92
Провел на форуме: 299447
Репутация:
5
|
|
Всё, впорос исчерпан =) В константе ошибка была.. =))
|
|
|

16.05.2010, 16:02
|
|
Новичок
Регистрация: 05.11.2008
Сообщений: 11
Провел на форуме: 93930
Репутация:
0
|
|
помогите, нужно что бы при нажатии по бутону открываласть программа, пробывал функцию shellexecute но получается ошибка т.к в папке находятся еще и файлы к программе... как можно открыть программу как через проводник, что бы вместе с программой открылись все файлы.. надеюсь объяснил понятно.. спасибо
Пробывал ShellExecute(Handle, 'open', PChar('c:\glob\file.exe'),nil,nil,S W_SHOWNORMAL); не катит, открывает только exe а конфиг который лежит в папке с программой не открывается...
|
|
|

16.05.2010, 16:10
|
|
Познающий
Регистрация: 26.02.2010
Сообщений: 76
Провел на форуме: 522804
Репутация:
16
|
|
niva622,
Попробуй запускать с параметрами.
|
|
|

16.05.2010, 16:12
|
|
Новичок
Регистрация: 05.11.2008
Сообщений: 11
Провел на форуме: 93930
Репутация:
0
|
|
по конкретнее с какими именно есть мысли ?
|
|
|

16.05.2010, 16:29
|
|
Познающий
Регистрация: 14.05.2009
Сообщений: 92
Провел на форуме: 299447
Репутация:
5
|
|
Ну например так
ShellExecute(Handle, 'open', PChar('c:\glob\file.exe -config.ini'),nil,nil,S W_SHOWNORMAL);
|
|
|

16.05.2010, 16:48
|
|
Новичок
Регистрация: 05.11.2008
Сообщений: 11
Провел на форуме: 93930
Репутация:
0
|
|
не получается вообще не открывается программа... может есть еще варианты, да и еще видимо дело в том что в папке файл не один конфиг + еще 4 файла. Есть вариант создать ярлык и запустить с ярлыка, но это не выход, нужно придумать что бы можно было открывать без ссылки.
|
|
|

16.05.2010, 16:52
|
|
Познающий
Регистрация: 14.05.2009
Сообщений: 92
Провел на форуме: 299447
Репутация:
5
|
|
Вот так:
ShellExecute(Application.Handle,'open','hl.exe','-nomaster -game cstrike',nil,SW_SHOW);
Жирным шрифтом параметры идут.. CS открывается на 5...
|
|
|

16.05.2010, 17:03
|
|
Новичок
Регистрация: 05.11.2008
Сообщений: 11
Провел на форуме: 93930
Репутация:
0
|
|
неа не получается... ошибка, грит что конфиг не найдет... не пойму в чем дело...
|
|
|

16.05.2010, 17:11
|
|
Познающий
Регистрация: 14.05.2009
Сообщений: 92
Провел на форуме: 299447
Репутация:
5
|
|
Что за программа?
Вот можно ещё так...
ShellExecute(Application.Handle,'open','NOTEPAD.ex e','test.log',nil,SW_SHOW);
Блокнот прекрасно файл загружает... главное чтобы не было "-"...
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|