Muy buenas, alguien me podría decir como se pinta un pixel o pixeles en un dialogo y aplicarte un color.
Un Saludo.
Pintar un pixel o varios pixeles
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
Este es un ejemplo:
Cambiando nRGB( 0, 0, 0 ) por otros valores en vez de cero, usas el color RGB que quieras
Code: Select all
#include "FWCE.ch"
function Main()
local oDlg
DEFINE DIALOG oDlg SIZE 200, 100
ACTIVATE DIALOG oDlg CENTERED ;
ON PAINT SetPixel( oDlg:hDC, 50, 50, nRGB( 0, 0, 0 ) )
return nil
#pragma BEGINDUMP
#include <hbapi.h>
#include <windows.h>
HB_FUNC( SETPIXEL )
{
hb_retnl( SetPixel( ( HDC ) hb_parnl( 1 ), hb_parnl( 2 ), hb_parnl( 3 ), hb_parnl( 4 ) ) );
}
#pragma ENDDUMP
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact: