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

Вниз

просмотр рабочего стола клиента на сервере   Найти похожие ветки 

 
Morfeus   (2004-01-30 12:56) [0]

Нужно с компа клиента отправить изображение рабочего стола на комп сервера, если у кого пример или ссылка ?


 
Wm.DIGGER ©   (2004-02-03 08:44) [1]

на клиентской машине должна быть установлена прога - клиент, которая будет "воровать" изображение рабочего стола и пересылать его на сервер. Это обычное приложение типа клиент-сервер. т.е. тебе нужно просто передать файл с картинкой по от клиента к серверу ... (как передаются файлы, писать не буду, этого добра и на этом форуме и вообще в нете куча)
// а сграбить экран можно так (мы сохраняем экран в JPEG и потом этот файл пересылаем по сети ...)


uses JPEG;
var DC:HDC;
   BMP:TBitMap;
   JPEG:TJPEGImage;
begin
BMP := TBitMap.Create;
BMP.Width := Screen.Width;
BMP.Height := Screen.Height;
BMP.PixelFormat := pf24bit;
DC := GetDC(0);
BitBlt(BMP.Canvas.Handle,0,0,BMP.Width,BMP.Height,DC,0,0,SRCCOPY);
ReleaseDC(0,DC);
JPEG := TJPEGImage.Create;
JPEG.CompressionQuality := 80; // качество JPEG"а
JPEG.Compress;
JPEG.Assign(BMP);
JPEG.SaveToFile("screen.jpg");
JPEG.Free;
BMP.Free;
end;


вот, что-то типа того :)))



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

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

Наверх




Память: 0.44 MB
Время: 0.042 c
3-1082016968
BAYES
2004-04-15 12:16
2004.04.11
select * from prod order by no


7-1080034578
Goida
2004-03-23 12:36
2004.04.11
Процессы, запущенные на компьютере....


4-1079599813
b0bi
2004-03-18 11:50
2004.04.11
Как получить Handle


3-1081838961
real_nexy
2004-04-13 10:49
2004.04.11
Поиск методом FindKey по нескольким полям


7-1079005742
bg8
2004-03-11 14:49
2004.04.11
Синхронизация приборов с помощью TTL логики





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