Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.09.11;
Скачать: CL | DM;

Вниз

Копирование содержимого экрана в буфер, не нажимая PrintScrn.   Найти похожие ветки 

 
coin   (2003-08-30 15:44) [0]

Здравствуйте, уважаемые спецы!

У меня к Вам следующий вопрос. Каким образом
программно можно осуществить нажатие клавиши PrintScrn?
Т.е. скопировать содержимое экрана в буфер, не
нажимая самой клавиши?
Спасибо.


 
TButton   (2003-08-30 15:55) [1]

я с буфером не работал, но чуствую ето BitBlt+Clipboard.


 
Song   (2003-08-30 16:54) [2]

WM_PRINT
keybd_event + VK_SNAPSHOT


 
coin   (2003-08-30 18:16) [3]

2Song
Спасибо, конечно, но можно немного подробнее - с буфером никогда не работал...


 
Song   (2003-08-30 18:22) [4]

keybd_event(VK_SNAPSHOT,0,0,0);
keybd_event(VK_SNAPSHOT,0,KEYEVENTF_KEYUP,0);


 
xman   (2003-08-30 19:00) [5]

var
bmp: TBitmap;
DC: HDC;

begin

bmp:=TBitmap.Create;

bmp.Height:=Screen.Height;
bmp.Width:=Screen.Width;

DC:=GetDC(0); //Дескpиптоp экpана

bitblt(bmp.Canvas.Handle, 0, 0, Screen.Width, Screen.Height,
DC, 0, 0, SRCCOPY);

bmp.SaveToFile("Screen.bmp");

ReleaseDC(0, DC);
end;


 
TButton   (2003-08-30 19:03) [6]

только не SaveToFile, а сэйв в клип боард


 
xman   (2003-08-30 19:05) [7]

это мелочи



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

Текущий архив: 2003.09.11;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.008 c
11-33530
officeman
2003-01-03 20:30
2003.09.11
Как копировать файл занятый системой.


6-33700
s.ts
2003-07-11 16:49
2003.09.11
получение курсов валют центробанка


3-33448
clickmaker
2003-08-21 15:42
2003.09.11
TTable.FindKey находит то, что не находит Locate


1-33632
tgdgdfg
2003-08-30 20:05
2003.09.11
Сортировка в TreeView


7-33825
Vladislav
2003-06-27 13:33
2003.09.11
Какие права у текущего пользователя?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский