Вопрос по Delphi
Пользователи, просматривающие топик: none
|
Зашли как: Guest
|
Имя  |
| Сообщение |
<< Старые топики Новые топики >> |
|
|
Вопрос по Delphi - 2010-01-02 03:23:20.630000
|
|
|
r4klm
Сообщений: 28
Оценки: 0
Присоединился: 2010-01-02 02:49:33.476666
|
Вообщем при запуске выдает тут ошибку.. не могу понять что не так..
..на форме имеется только тимер
procedure TForm1.Timer1Timer(Sender: TObject);
var
s:string;
begin
s:=Clipboard.asText;
if Length(s) = 13 then
… продолжение кода
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 07:54:38.413333
|
|
|
Akapel
Сообщений: 224
Оценки: 0
Присоединился: 2008-12-15 10:37:58.030000
|
Попробуй добавить
quote:
Uses clipbrd
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 18:00:53.380000
|
|
|
r4klm
Сообщений: 28
Оценки: 0
Присоединился: 2010-01-02 02:49:33.476666
|
кул, помогло ! Спасиб !
Хотел ещё спросить вопросик :
Как сделать так, чтобы при запуске моей программы, создавалась её копия и скрытно помещалась в автозапуск ?!
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 18:07:10.723333
|
|
|
Akapel
Сообщений: 224
Оценки: 0
Присоединился: 2008-12-15 10:37:58.030000
|
CopyFile('c:\1.exe','d:\2.exe',true);копия программы
И пропиши в реестр HKLM-SOFTWARE-MICROSOFT-WINDOWS NT-CURRENTVERSION-WINLOGON-USERINIR
Допиши через запятую свой файл.
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 18:21:11.623333
|
|
|
r4klm
Сообщений: 28
Оценки: 0
Присоединился: 2010-01-02 02:49:33.476666
|
я только учусь в delphi , так что не ругайтесь..
я вот в конце кода, перед end; вставляю вот это :
…
CopyFile('c:\1.exe','d:\2.exe',true);
end;
end;
end;
end.
end.
.. и что то ничего не происходит((( что делать ? ..мож не так что то делаю ?
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 18:21:27.286666
|
|
|
Login_hochu
Сообщений: 1471
Оценки: 0
Присоединился: 2007-07-15 14:19:23.423333
|
quote:
ORIGINAL: r4klm
if Length(s) = 13 then
Точно WM трой.
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 18:30:59.360000
|
|
|
r4klm
Сообщений: 28
Оценки: 0
Присоединился: 2010-01-02 02:49:33.476666
|
quote:
ORIGINAL: Login_hochu
quote:
ORIGINAL: r4klm
if Length(s) = 13 then
Точно WM трой.
с чего ты взял ?
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 19:15:47.343333
|
|
|
r4klm
Сообщений: 28
Оценки: 0
Присоединился: 2010-01-02 02:49:33.476666
|
Akapel помогай, я знаю ты можешь :)
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 19:19:17.393333
|
|
|
Akapel
Сообщений: 224
Оценки: 0
Присоединился: 2008-12-15 10:37:58.030000
|
Cкинь код и ошибки. Иногда надо бы в гугл заходить, там есть все ответы на твои вопросы.
P/S если трой пишешь то сразу говорю - будет палиться всем чем только можно!
Если подмена кошелька в буфере, то она в паблике есть, поищи.
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 19:54:50.203333
|
|
|
r4klm
Сообщений: 28
Оценки: 0
Присоединился: 2010-01-02 02:49:33.476666
|
да у меня нету ошибки.. прост при запуске ничего не копируется.. (сделал всё как в 5 посте)
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 21:23:53.263333
|
|
|
Akapel
Сообщений: 224
Оценки: 0
Присоединился: 2008-12-15 10:37:58.030000
|
В кореневой каталог диска C: перенеси, назови 1.exe. Запусти программу, потом посмотри на диcк D: там будет копия. Чтобы копировалась из любого места, то нужно для начало это место определить.
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 21:28:48.603333
|
|
|
r4klm
Сообщений: 28
Оценки: 0
Присоединился: 2010-01-02 02:49:33.476666
|
а можно ли сделать автоопределение места.. т.к. будет неизвестно куда сохранит файл жертва
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 21:33:33.770000
|
|
|
Akapel
Сообщений: 224
Оценки: 0
Присоединился: 2008-12-15 10:37:58.030000
|
Можно в гугле найдешь это.
Еще можно sfx архив создать.
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 21:40:15.360000
|
|
|
r4klm
Сообщений: 28
Оценки: 0
Присоединился: 2010-01-02 02:49:33.476666
|
причем тут sfx архив ? я чот вообще не вдупляю.. ты понимаешь о чем речь идет или нет ? о_О я тебе объясняю, что будет неизвестно от куда и куда жертва сохранит и запустит этот трой, а в sfx архиве можно будет самому указать путь установки.. так что жертва сама укажет путь куда ей надо установить.. я откуда его узнаю ???
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 21:44:28.613333
|
|
|
Akapel
Сообщений: 224
Оценки: 0
Присоединился: 2008-12-15 10:37:58.030000
|
Я то, понимаю о чем идет. Но видно голова у тебя пустая, поэтому я откланяюсь.Удачи.
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 21:46:06.290000
|
|
|
Flint_ta
Сообщений: 3720
Оценки: 1120
Присоединился: 2007-01-26 15:49:18.323333
|
quote:
ORIGINAL: r4klm
а можно ли сделать автоопределение места.. т.к. будет неизвестно куда сохранит файл жертва
GetModuleFileNameA
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 21:49:49.310000
|
|
|
Sunzer
Сообщений: 253
Оценки: 31190
Присоединился: 2007-06-15 19:23:32.436666
|
2 r4klm только попробуй в купле\продаже свой вм трой продавать)
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 21:50:27.303333
|
|
|
Sunzer
Сообщений: 253
Оценки: 31190
Присоединился: 2007-06-15 19:23:32.436666
|
Flint_ta с новым годом)
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 21:51:15.296666
|
|
|
VaZoNeZ
Сообщений: -6758
Оценки: 0
Присоединился: 2008-10-31 14:38:43.796666
|
quote:
2 r4klm только попробуй в купле\продаже свой вм трой продавать)
Будет кого в блек перенести и з0банить)
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 21:52:46.106666
|
|
|
Sunzer
Сообщений: 253
Оценки: 31190
Присоединился: 2007-06-15 19:23:32.436666
|
Ога…
quote:
ORIGINAL: r4klm
а можно ли сделать автоопределение места.. т.к. будет неизвестно куда сохранит файл жертва
ShowMessage(ParamStr(0));
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 21:58:10.673333
|
|
|
Akapel
Сообщений: 224
Оценки: 0
Присоединился: 2008-12-15 10:37:58.030000
|
Ну и на последок
quote:
var nuzhnaya_papka_usera_dlya_troja:string
begin
nuzhnaya_papka_usera_dlya_troja:= GetCurrentDir;
end;
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 22:00:13.493333
|
|
|
r4klm
Сообщений: 28
Оценки: 0
Присоединился: 2010-01-02 02:49:33.476666
|
спасиб всем за подсказаньки (особенно Flint_ta) продавать я ничего не собираюсь, всё делаю исключительно в учебных-позновательных целях..
..вопросик ещё такой : как сдалать так, чтобы скрыть свой трой в диспетчере задач ?
з.ы. Akapel в тебе я разочаровался, сначало помогал, я думал норм поможешь а ты..
(я сразу сказал что я только учусь!)
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 22:01:49.580000
|
|
|
Akapel
Сообщений: 224
Оценки: 0
Присоединился: 2008-12-15 10:37:58.030000
|
Мир обманчив.
|
|
|
|
|
RE: Вопрос по Delphi - 2010-01-02 22:03:25.896666
|
|
|
r4klm
Сообщений: 28
Оценки: 0
Присоединился: 2010-01-02 02:49:33.476666
|
quote:
ORIGINAL: Akapel
Я то, понимаю о чем идет. Но видно голова у тебя пустая, поэтому я откланяюсь.Удачи.
или ты имеешь ввиду настроить его на самораспоковку в определенное место ? (без возможности указания пути пользователем ?!)
|
|
|
|
|
|
