Копировать в буфер обмена?Ну уж нет!

Motorcode, 2009
Uraniumcode@gmail.com

Копировать в буфер обмена?Ну уж нет!

Многие программы перед полем гду надо ввести защитный код, пишут «В целях Вашей безопасности, скопируйти и вставьте код в регистрационное поле». И пользователи верят, что если так сделать, то действительно будет безопаснее и не какие кейлоггеры не смогут стянуть пароль. Кейлоггеры то не смогут, только те кому нужен ваш пароль всё — равно до него добирутся. А заявления типа «В целях вашей безопасности...», кроме смеха ничего не вызывают. Ну довольно пустозвонить — перейдём к делу. Напишем код, который будет доставать данные из буфера(код на Паскале).

Var //Объявляем переменные
hg:HGLOBAL;
bo,fo:BOOL;
len:Integer;
sz:PChar;
begin
bo:= OpenClipboard(0); //Открываем буфер обмена
if not(bo) then //Если не смогли открыть
TerminateProcess(GetCurrentProcess(),1); //то сворачиваемся

len:= CountClipboardFormats(); //Формат буфера обмена
if len > 4 then
Writeln('Buffer full')
else
Writeln('Buffer empty');

fo:= IsClipboardFormatAvailable(CF_TEXT); //Проверяем есть ли текст
if not(fo) then //Если текста нет
writeln('Text is out'); //Выводим сообщение

hg := GetClipboardData(CF_OEMTEXT); // Получаем данные
sz := PChar(GlobalLock(hg)); // из буфера обмена
writeln(sz); //Выводим эти данные на экран
end.

Всё описано в комментариях. Проверим работает ли эта программа. Копируем этот текст и запускаем прогу, на экране должен появиться этот самый текст. Теперь все пароли прошедшие буфер обмена — будут в наших руках.


Автор: Motorcode | Добавлено: 12.10.2009, 12:14 | Просмотров: 13730
Добавить комментарий


Лучшие программы
Будильник
Lim BurnDisc
Радио плеер
Lim BackUp
Календарь праздников
Телефонный справочник
Аудио конвертер
LimNote
Стикеры
Таймер выключения
Женский календарь
Клавиатурный тренажер
Lim Block Folder
Lim Screenshot
Lim Tree Note
Lim Soft Catalog
Lim Quick Panel
Lim Frame Photo
Lim Image Marker
Lim Flash Security
Lim Launcher
Lim Mosaic Draw
Рисовалка для детей (Котики)
Школьный звонок
Lim Catalog Articles
Lim Anti Boss
Рисовалка для детей (Машинки)
...

Игры
Пасьянс Паганини
Игра_2048
Игра Cursor Run
Пасьянс Косынка
Пасьянс Паук
Игра Server War
Server War History AI
Складское дело
Крестики - Нолики 5 в линию
Сапер
Точки и квадраты
Судоку

Программы
Блог
Комментарии
Ужасно неудобная гос...
Согласен трансляция ...
P.s. Практически каж...
...
Добрый день! Как исп...
День добрый! недавно...
Все исправлено. Спас...
Добрый день! Исправь...
Добрый день на 10ке,...
Ошибку про срабатыва...
Группа VK
Поделиться





Копилка MaxLim.

Если Вам понравилась наша программа, Вы можете купить нам кофе (или кофемашину) или пивка для поднятия настроения и ускорения написания новых программ и обновлений :), Пополните копилку и разработка программ ускорится :)...
Пополнить копилку можно несколькими способами:

1. Переводом через Сбербанк Онлайн - Платежи, Перевод клиенту сбербанка по номеру телефона "Номер телефона - +79284741288" -сумма перевода в рублях.
2. Кошелек Яндекс Деньги - 41001737394948
3. Через донаты...

Контакты для связи:
Skype - go_ramalex
mail - maxlim_soft@mail.ru

Яндекс.Метрика PR-CY.ru Яндекс цитирования
MaxLim.org - Сайт Компании MaxLim http://vsofte.biz MaxLim.org - Сайт programs.lv SoftOut.ru - Сайт SoftOut.ru  

Copyright MaxLim © 2007-2023