Главная страница
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.058 c
6-41785
Анатолий
2003-09-18 09:28
2003.11.13
Проблема с w2k


1-41421
Антон.
2003-10-29 15:19
2003.11.13
bpl


6-41822
Rodin
2003-09-11 11:15
2003.11.13
ip by name


1-41183
kopcap
2003-11-02 18:28
2003.11.13
За скока времени выполнится функция


4-42299
ruslan_as
2003-09-09 16:22
2003.11.13
Как мне дождаться запуска открываемого файла?