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

Вниз

Как получить вид удаленного экрана (примерчик бы)   Найти похожие ветки 

 
Uriel   (2003-09-19 16:02) [0]

Привет всем !!!
Стоит задача: взять вид удаленного экрана и поместить его на мою форму моего приложения на моем компе.Помогите плыз кто шарит, диплом пишу на эту тему, застрял блин на этом месте...
Буду рад любым коментариям....


 
Reindeer Moss Eater ©   (2003-09-19 16:05) [1]

А делать все это только на своем компьютере ты уже умеешь?


 
Barmutik ©   (2003-09-19 16:49) [2]

Я смог решить данную проблему только с помощью написания клиента для удалённого компьютера.

Обычная связь клиент-сервер.

Если найдёте способ без клиента напишите здесь... хотя я не думаю что он существует т.к. даже все программы для удалённого управления своим компьютером используют систему клиент-сервер.


 
Uriel   (2003-09-19 16:50) [3]

ДА. Получаю изображение и масштабирую его только на своем.

procedure TForm1.FormPaint(Sender: TObject);
Var
DesktopCanvas :TCanvas ;
BitMap :TBitMap ;

begin

DesktopCanvas:=TCanvas.Create;
DesktopCanvas.Handle:=GetDC(Hwnd_Desktop);
BitMap := TBitMap.Create;
BitMap.Width := Screen.Width;
BitMap.Height:= Screen.Height;
Bitmap.Canvas.CopyRect(Bitmap.Canvas.ClipRect,
DesktopCanvas, DesktopCanvas.ClipRect);

Form1.Canvas.StretchDraw( Rect(0,0,xScreen-300,yScreen-150), BitMap);

end;

хотелось бы примерчик как взять с удаленного компа.
ЗАРАНЕЕ ПРЕМНОГО БЛАГОДАРЕН!!!


 
Reindeer Moss Eater ©   (2003-09-19 16:58) [4]

С удаленного нельзя. Можно только со своего.
Отсюда следует, что на удаленном компьютере должна быть своя программа, снимающая свой экран.
Она же должна передавать снятую инфу на твой компьютер.



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

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

Наверх




Память: 0.47 MB
Время: 0.054 c
14-41944
AAA3AAA
2003-10-20 14:13
2003.11.13
как деньги продавцу в штаты заслать?


8-41767
DiK
2003-07-07 00:41
2003.11.13
Уменьшить картинку на Image


1-41520
difkukan
2003-10-28 12:18
2003.11.13
Как преобразовать строку hex ов в тип WORD ?


3-41084
нет
2003-10-23 15:28
2003.11.13
Уникальное поле в Парадоксе


1-41226
Sewix
2003-11-01 08:44
2003.11.13
Как установить значение Colorbox а из файла