![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как перехватить нажатие... [D7, Win2k]
Гость © (2004-07-30 12:21:00)кнопки PrintScrenn (рядом со scrolllock) или не допустить копирование в буфер моей формы в виде изображения?
Batoon (2004-07-30 20:51:00) [1]Спасибо всем!Получилось!
2Кириешки
ты забыл написать:
Clipboard:=tclipboard.CreateCODE> :)))
Кириешки (2004-07-30 17:47:00) [2]для того чтобы чистить буфер мона сделать так
Uses Clipbrd
....
Clipboard.clear;
....
покрайней мере я делал так, когда писал резидента не позволяющего копировать текст и картинки из моей программы. Работало.
olookin (2004-07-30 14:43:00) [3]procedure TForm1.FormShow(Sender: TObject);
begin
application.OnMessage:=getmsg;
end;
procedure TForm1.Getmsg(var Msg: TMsg; var Handled: Boolean);
begin
if (msg.message=WM_keyup) and
( msg.wParam=vk_snapshot)
then showmessage('gg');
end;
Гость (2004-07-30 14:22:00) [4]так мне надо наоборот - чтоб никто не смог скопировать мою форму в буфер!
olookin (2004-07-30 14:16:00) [5]procedure TForm1.Button1Click(Sender: TObject);
begin
keybd_event(vk_snapshot,0,0,0);
keybd_event(vk_snapshot,0,KEYEVENTF_KEYUP,0);
end;
а потом в Painte картинку вставь из буфера и посмотри что получилось
Гость (2004-07-30 14:08:00) [6]ради прикола пробовал:
keypreview:=true
в onkeydown
if key=VK_SNAPSHOT then showmessage('OK!')
и ничего...
olookin (2004-07-30 14:06:00) [7]не срабатывает значит по другой причине. Код PrintScreen - VK_SNAPSHOT
Гость (2004-07-30 14:02:00) [8]VK_SNAPSHOT - пробовал, не срабатывает
Анонимщик (2004-07-30 14:01:00) [9]В любом случае возможно GetDC(0).
Так что ничег не выйдет.
olookin (2004-07-30 14:01:00) [10]код VK_SNAPSHOT
Анонимщик (2004-07-30 14:01:00) [11]Да ерунду говоришь.
Гость (2004-07-30 13:59:00) [12]я вот думаю, мож при нажатии этой кнопки чистить буфер, но как это сделать (очистка) исам код клавиши я не нашел
Гость (2004-07-30 13:57:00) [13]нет
Анонимщик (2004-07-30 13:56:00) [14]А фотографировать разрешишь?