![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Enviar una captura de pantalla via UDP
Saludos,
hace poco cree una pequeña aplicacion de chat en una red local utilizando los componentes indy udp, y se me ocurrio la ide de poder enviar una captura de pantalla hacia otra la otra maquina utilizando los componentes mencionados tengo el codigo para capturar una imagen y guardarla pero quisiera que me dieran alguna idea de como modificarlo para copiar la imagen en la otra pc. este es el codigo para capturar el escritorio y guardar la imagen en mi Disco uses ................ , jpeg; procedure capturar_area_pantalla_a_bitmap_temporal(ABitmap: TBitmap); var vDesktopDC: HDC; //contendrá el device context handle del escritorio actual begin vDesktopDC := GetWindowDC(GetDesktopWindow); try ABitmap.PixelFormat := pf24bit; ABitmap.Height := Screen.Height; ABitmap.Width := Screen.Width; BitBlt(ABitmap.Canvas.Handle, 0, 0, ABitmap.Width, ABitmap.Height, vDesktopDC, 0, 0, SRCCOPY); //es posible configurar el área a capturar finally ReleaseDC(GetDesktopWindow, vDesktopDC); end; end; procedure capturar_pantalla_a_disco_formato_JPG(const fichero:string); var vJpg: TJpegImage; vBmp: TBitmap; begin vBmp := TBitmap.Create; try capturar_area_pantalla_a_bitmap_temporal(vBmp); vJpg := TJpegImage.Create; try vJpg.Assign(vBmp); vJpg.CompressionQuality := 85; //calidad JPG 85% vJpg.SaveToFile(fichero); //guardar en formato JPG finally vJpg.Free; end; finally vBmp.Free; end; end; |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
captura de pantalla | magomalo | C++ Builder | 1 | 04-02-2007 01:25:17 |
Captura de pantalla en el OnDeactivate | afxe | Gráficos | 5 | 04-10-2006 18:49:49 |
Captura de pantalla en un Bitmap | Neftali [Germán.Estévez] | Trucos | 0 | 30-06-2006 10:13:23 |
Captura pantalla | walito | Gráficos | 11 | 28-01-2006 01:37:05 |
Captura de pantalla | craven | API de Windows | 1 | 29-08-2003 15:51:39 |
![]() |
|