Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.08.22;
Скачать: [xml.tar.bz2];

Вниз

Непонимаю, помогите пожайлуста   Найти похожие ветки 

 
F1 rulezz   (2002-08-09 06:12) [0]

Вот просидел два дня, так и ничего не вышло. Может потому-что я в Delphi не долго...
Обьясните мне пожайлуста следующее:
вообщем есть форма, на ней "TMeme" в который заносяться координаты мыши как она передвигаеться (типа "208 1018").
Так вот, я балбес, немогу догнать как заставить мышак по этим
координатам бегать и клик имитировать читая следующую строчку
после предидущей. Если вам не в нагруз расказать как запрятать такую прогу, чтобы нельзя было определить что она запущена ни с моего компа и главное с и-нета но чтоб она продолжала исполнять все свои функции нормально, да и по возможности имитировать клик так, чтоб неразчехлились что это програмный клик, а обычный.
Большущее спасибо тем, кто поможет, а то справочник весь перелистал и нифига (может я читать разучился). Вообщем будтье снесходителны ко мне :))


 
MBo   (2002-08-09 06:37) [1]

Ну вот...
Первая часть вопроса нормальная и несложно реализуемая, а вот вторая настораживает....


 
ZORRO   (2002-08-09 07:16) [2]

Что-то я немного не врубаюсь! Тебе что именно нужно? Выделять текст и работать с ним? Так тогда используй такую штучку:
memo1.sellsart:=100;
memo1.sellength:=2;
memo1.text:=memo1.seltext;
memo1.savetofile("1.txt");
Пример демонистрирует сохранение текста между символами 100 до 102. Вобщем как уже всем стало понятно я просто выделяю в наглядном виде два символа, затем тексту memo1 присваиваю значение выделенных символов, ну а потом уже с ними можно делать что угодно!
а прочитать всю строку можно так:
edit1.text:=memo1.lines.strings[1]; //прочитает вторую строку.
А нафиг тебе ещё мышкой двигать, я не понимаю, наверно какое-то злостное издевательство делаешь! ну удачи тебе! :)

Автор сайт: www.delphi.ok.ru


 
ZORRO   (2002-08-09 07:32) [3]

Кстате на счёт скрытия твоего приложения, если что-то можное и злостное пишешь, то формы вообще использовать не советую, без формы приложение само скроется, ну а если всё же хочешь с формой, то я могу поискать, у меня на сайте (www.delphi.ok.ru) есть много чего интересного на счёт этого, есть даже исходник ворования паролей из системы, но это уже отдельный вопрос, правда щас он у меня сломалься немного, но в скором времени постараюсь исправить. Вобщем если тебе лень копаться на сайте в поисках ответа (хотя очень даже было бы полезно там порыться), то я могу сам покапаться, у меня весь сайт на винте лежит и потом на форуме у себя на сайте оставлю для тебя ответ. Я сам занимался нехорошими вещами, так потом ещё и пользовался, так что на счёт этого обращайся до меня! :) Кстате я писал и прогу ворующую пароли, и отправляющую их мне на почту, причём скрывалась оп полной программе (хрен в процессах найдёшь :)(но она была без формы, прогу с формой так не скроешь)).

Автор сайта: www.delphi.ok.ru


 
Poirot   (2002-08-10 01:42) [4]

Ну по кординатам бегать - это просто... Что-то вроде SetCursorPos и сохраняешь тока перед этим координаты...
А вот спрятать так что бы никто и никогда - это сложнее... ИМХО, вам надо драйверок писать или что-то в этом роде чтобы процесс был невиден ни в одном сканере.... Такие бараны...
Я разделяю опасения MBo... Оно вам зачем... таккая прога уже была и помоему в кладовке лежит или на софтодроме....
ZORRO :)



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.08.22;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.012 c
6-71290
Monak
2002-05-21 22:26
2002.08.22
Клавиатура и мыши


1-71258
oguz
2002-08-12 10:12
2002.08.22
Как сделать ссылку на сайт(e-mail) в Delphi


14-71303
IlyaA
2002-07-25 08:35
2002.08.22
Учение Свет; Неучение Тьма


1-71229
Администратор
2002-08-11 16:25
2002.08.22
ListView


1-71138
delta
2002-08-13 14:10
2002.08.22
Hooks





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский