Главная страница
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.06 c
14-42135
Style
2003-10-22 11:35
2003.11.13
---|Ветка была без названия|---


4-42263
AKA
2003-09-14 04:52
2003.11.13
Mouse


1-41422
Layner
2003-10-29 15:11
2003.11.13
Как получить в переменную значение выделеной ячейки StringGrid?


3-41111
Petr
2003-10-23 09:22
2003.11.13
TADOQuery и ListView


14-42118
Andryk
2003-10-22 20:04
2003.11.13
Просто прикол :о)))