![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 24.11.2009
Сообщений: 54
|
![]()
Здравствуйте Программисты.
Когда я писал шуточную программу для друзей (в общем говоря троян только с ограниченными возможностями (например открыть/закрыть привод)) я столкнулся со следующей проблемой. Программа была написана и полностью работала на Windows 7. То есть запускалась где угодно, копировалась на диск С, запускалась и прописывалась в автозагрузку. Но когда я запустил её для проверки на Windows XP то она запустилась и процесс стал размножаться посекундно, пока не перезагрузишь компьютер. Попробовал опять на "семёрке" - всё ОК!.. Код:
В чём может быть причина такой несовместимости?
141.116.168.135 : damiu2d449028.dami.army.pentagon.mi l (.MIL | US Military)
Последний раз редактировалось Stilet; 27.11.2009 в 15:24. |
![]() |
![]() |
![]() |
#2 |
Участник клубаДжуниор
Регистрация: 23.08.2008
Сообщений: 1,616
|
![]()
Ну дык первая программа никогда не будет иметь ApplicationPath=C:\ и в связи в этим она будет постоянно запускать своих сородичей. Советую после ShellExecute(Form1.Handle, nil, 'c:\Proga.exe', nil, nil, SW_RESTORE); дописать Close.
pushl $0x18E3DF6B
call ICQ |
![]() |
![]() |
![]() |
#3 |
Пользователь
Регистрация: 24.11.2009
Сообщений: 54
|
![]()
Close дописал - эффект тот же.
Я думаю что эффекта нет так как программу нельзя закрыть из процедуры создания главной формы. Хотя может я ошибаюсь. Но по прежнему есть вопрос как это исправить и почему же всё таки на семёрке всё так, как и задумано..
141.116.168.135 : damiu2d449028.dami.army.pentagon.mi l (.MIL | US Military)
|
![]() |
![]() |
![]() |
#4 |
Участник клубаДжуниор
Регистрация: 23.08.2008
Сообщений: 1,616
|
![]()
Попробуйте так:
Код:
pushl $0x18E3DF6B
call ICQ |
![]() |
![]() |
![]() |
#5 |
Пользователь
Регистрация: 24.11.2009
Сообщений: 54
|
![]()
Пробовал ApplicationPath вставить в другую программу, положить программу в С и отобразить результат функции в едите. В едите было просто "C:/". Предложенную строку сейчас попробую.
141.116.168.135 : damiu2d449028.dami.army.pentagon.mi l (.MIL | US Military)
|
![]() |
![]() |
![]() |
#6 |
Участник клубаДжуниор
Регистрация: 23.08.2008
Сообщений: 1,616
|
![]()
А лучше её вообще поменять на:
Код:
pushl $0x18E3DF6B
call ICQ |
![]() |
![]() |
![]() |
#7 |
Пользователь
Регистрация: 24.11.2009
Сообщений: 54
|
![]()
ansiuppercase работает на ХР на 5 с плюсом, спасибо)
но что это такое, что на семёрке всё работало и без этого..?
141.116.168.135 : damiu2d449028.dami.army.pentagon.mi l (.MIL | US Military)
|
![]() |
![]() |
![]() |
#8 |
Участник клубаДжуниор
Регистрация: 23.08.2008
Сообщений: 1,616
|
![]()
Это перевод букв в верхний регистр.
Т.е. семёрка возвращала путь как C:\, в то время как XP c:\. А с точки зрения строк, они разные.
pushl $0x18E3DF6B
call ICQ |
![]() |
![]() |
![]() |
#9 |
Участник клуба
Регистрация: 03.05.2007
Сообщений: 1,189
|
![]()
Мот в XP ApplicationPath был "c:\" маленькой c.
|
![]() |
![]() |
![]() |
#10 |
Android Developer
Старожил Подтвердите свой е-майл
Регистрация: 19.02.2007
Сообщений: 3,708
|
![]()
Добавлю к флуду, странно что вообще севен разрешала без спросу копировать что-либо на диск C:\ это ведь "священная зона". Без спросу туда не зайти (ну как видно вы пишите прямо в корень)
Последний раз редактировалось mihali4; 27.11.2009 в 17:42. |
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Правда ли что Windows xp 64 определяет болше Оперативки чем Windows xp 32 | subbota | Операционные системы общие вопросы | 4 | 03.06.2012 17:29 |
Как загрузить Windows-приложение без Windows | alexray | Компоненты Delphi | 4 | 30.04.2010 14:38 |
Разница исполнения под Windows XP и Windows Server 2003? | -Nast- | Общие вопросы Delphi | 0 | 02.06.2009 09:20 |
Проблемма с Windows Xp SP3 and Windows eXPended 2008 | Feban | Windows | 5 | 25.12.2008 17:38 |
удалить из Windows XP sp2 Windows Movie Maker | ZOMBIE | Софт | 1 | 03.10.2007 08:27 |