Форум: "Сети";
Текущий архив: 2007.01.21;
Скачать: [xml.tar.bz2];
Вниз
Скриншот по сети Найти похожие ветки
← →
nordic3 (2006-08-20 20:40) [0]У меня два компа в локальной сети. Реально ли (и как) сделать скриншот экрана с одного компа, а отобразить на втором (в Image например)?
← →
Virgo_Style © (2006-08-20 21:02) [1]это реально. Надо получить скриншот, передать его, отобразить. Что именно вызывает затруднения?
← →
nordic3 (2006-08-21 14:31) [2]Все! Как получить скриншот? Как его передать? Ну, если он есть, то отобразить легко...
Пожалуйста, помогите!
Желательно подробный пример!
Please...
← →
DevilDevil © (2006-08-21 15:15) [3]Скриншоты делаются примерно так (я правда, не проверял):
function GetScreenShot : TBitmap;
var
ScreenDC : HDC;
begin
Result := TBitmap.Create;
Result.PixelFormat := pf24bit;
Result.Width := Screen.Width;
Result.Height := Screen.Height;
ScreenDC := GetDC(0);
BitBlt(Result.Canvas.Handle, 0, 0, Result.Width, Result.Height, 0, 0, ScreenDC, SRCCOPY);
ReleaseDC(ScreenDC);
end;
procedure SaveScreenShotToFile(const FileName : string);
var
ScreenShot : TBitmap;
begin
ScreenShot := GetScreenShot;
ScreenShot.SaveToFile(FileName);
ScreenShot.Free;
end;
← →
DevilDevil © (2006-08-21 15:17) [4]ОПЕЧАТАЛСЯ. Так вроде надо:
BitBlt(Result.Canvas.Handle, 0, 0, Result.Width, Result.Height, ScreenDC, 0, 0, SRCCOPY);
← →
nordic3 (2006-08-21 19:59) [5]А как сделать это по локальной сети?
← →
Ketmar © (2006-08-21 21:17) [6]> [5] nordic3 (21.08.06 19:59)
а точно так же. только программа, которая делает шот, должны быть запущена не у тебя на компе, а на том компе, шот которого нужен.
зыж предвижу вопрос "а как её там запустить". проверим, хороший ли я провидец. %-)
← →
tButton © (2006-08-22 08:34) [7]
> зыж предвижу вопрос "а как её там запустить". проверим,
> хороший ли я провидец. %-)
делал такое =)
троянил сетку =)
прога возвращала скриншот области радиусом 50пкс вокруг курсора раз в секунду.
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2007.01.21;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.049 c