Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Помогите, пожалуйста. Как передать снимок экрана по сети через Socket не сохраняя его в файл. Заранее благодарен.

Вопрос задал: Anton-L (статус: Посетитель) Вопрос отправлен: 27 июля 2007, 20:56 Состояние вопроса: открыт, ответов: 2.

Ответ #1. Отвечает эксперт: Градов Ю.М.

Здравствуйте, Лобашов Антон Владимирович!
Передавать информацию попиксельно, как в факсимиле.

Ответ отправил: Градов Ю.М. (статус: 8-ой класс) Время отправки: 28 июля 2007, 10:25 Оценка за ответ: 4 Комментарий к оценке: Спасибо.

Ответ #2. Отвечает эксперт: min@y™

В 101-м номере журнала "Хакер" (май 2007) на странице 120 есть отличная статья, называется она "Ваяем RADMIN". На диске от журнала есть полностью рабочий исходник реализованной в статье программы. Правда, там всё-таки работа через файл (PNG), но я думаю, что переделать TFileStream в TMemoryStream у тебя получится. Этот исходник прицепляю к своему ответу.

А скачать компонент TPngImage можно тут.
К ответу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки ответа)

Ответ отправил: min@y™ (статус: Доктор наук) Время отправки: 30 июля 2007, 08:29 Оценка за ответ: 5

Мини-форум вопроса

Anton-L (статус: Посетитель), 28 июля 2007, 12:17 [#1]: А в *.JPG формате можно?, а то bmp много весит.

Градов Ю.М. (статус: 8-ой класс), 28 июля 2007, 12:44 [#2]: У Вас было условие "не сохраняя его в файл", а *.JPG необходимо передать полностью, чтобы была возможность его открытия. JPG-файл можно передать, как бинарный файл: function SendBuf(var Buf; Count: Integer): Integer;

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.