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; |
#2
|
||||
|
||||
Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración
Recuerda poner los tags al código fuente, ejemplo: Gracias |
#3
|
||||
|
||||
Así, de forma rápida, se me ocurre que, una vez guardado el JPEG en disco, le envías el archivo tal cual y que el cliente lo abra. Debería ser simple.
|
|
|
Temas Similares | ||||
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 |
|