elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Guía actualizada para evitar que un ransomware ataque tu empresa


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  Obtener valor del pixel
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Obtener valor del pixel  (Leído 3,654 veces)
Finrael

Desconectado Desconectado

Mensajes: 1


Ver Perfil
Obtener valor del pixel
« en: 14 Junio 2012, 19:40 pm »

Hola primero disculpar si ya esta respondido en algun lado esta duda pero ando algo confunso

la cuestion es la siguiente, tengo que hacer un software que simule una red neuronal que reconozca imagenes y me indique si es la opcion seleccionada, pero en fin. Mi problema es mucho mas basico, para dicho software necesito obtener los valores de cada pixel de una imagen que cargo en tiempo de ejecucion para ir guardolos en algun lado pero los ejemplos que encuentro estan en VB 6 y ya no estan soportados por vb.net. Hasta ahora tengo apenas


Código
  1. Public Class Form1
  2.  
  3.    Private Declare Function GetPixel Lib "gdi32.dll" (ByVal hdc As Integer, ByVal x As Integer, ByVal y As Integer) As Integer
  4.    Private Declare Function GetWindowDC Lib "user32.dll" (ByVal hwnd As Integer) As Integer
  5.    Private Declare Function GetDesktopWindow Lib "user32.dll" () As Integer
  6.  
  7.  
  8.  
  9.    Public Shared Function PixelColor(ByVal x As Integer, ByVal y As Integer) As Color
  10.        Dim winDc = GetWindowDC(API.GetDesktopWindow)
  11.        Dim color = GetPixel(winDc, x, y).ToString
  12.        PixelColor = System.Drawing.ColorTranslator.FromOle(color)
  13.    End Function
  14.  
  15.    Private Sub btnCargar_Click(sender As System.Object, e As System.EventArgs) Handles btnCargar.Click
  16.        OpenFileDialog1.ShowDialog()
  17.        picCarga.Image = System.Drawing.Image.FromFile(OpenFileDialog1.FileName)
  18.  
  19.    End Sub
  20.  
  21.    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
  22.        Me.Close()
  23.  
  24.    End Sub
  25.  
  26.    Private Sub btnEjecutar_Click(sender As System.Object, e As System.EventArgs) Handles btnEjecutar.Click
  27.  
  28.    End Sub
  29.  
  30.  
  31.    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
  32.  
  33.    End Sub
  34. End Class
  35.  


Aunque en realidad las primeras partes del codigo no me las tome de un ejemplo que pretendi adaptar y de hecho la linea:
Dim winDc = GetWindowDC(API.GetDesktopWindow)
 no me la acepta ya que dice que no sabe que es API

EN realidad ya estoy muy desesperado asi que si alguien me pudiera ayudar se lo agradecere infinitamente


« Última modificación: 14 Junio 2012, 20:09 pm por raul338 » En línea

Maurice_Lupin


Desconectado Desconectado

Mensajes: 356

GPS


Ver Perfil WWW
Re: Obtener valor del pixel
« Respuesta #1 en: 16 Junio 2012, 18:22 pm »

Para utilizar las funciones de la API en vb.net, yo utilizo esta pagina, http://pinvoke.net/

Para obtener el valor de un pixel utilizo el objeto Bitmap
http://msdn.microsoft.com/en-us/library/system.drawing.bitmap.aspx

Código
  1. Dim imagen As Bitmap
  2.  
  3. imagen.getPixel(x, y)
  4.  
  5. imagen.SetPixel(x, y, Color )
  6.  

Saludos.


En línea

Un error se comete al equivocarse.
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Captura de valor de Pixel de Camara Web
Programación Visual Basic
rod00x3 1 2,512 Último mensaje 4 Junio 2009, 22:46 pm
por LeandroA
Obtener luminosidad de un pixel
PHP
Skeletron 7 5,906 Último mensaje 1 Marzo 2010, 20:04 pm
por Castg!
¿como dibujar un circulo pixel a pixel? VB 6.0
Programación Visual Basic
AlxSpy 6 13,538 Último mensaje 28 Mayo 2011, 18:48 pm
por AlxSpy
Obtener cada pixel del area de un Bitmap (Locked)
.NET (C#, VB.NET, ASP)
GonzaFz 0 1,936 Último mensaje 20 Junio 2012, 08:33 am
por GonzaFz
Ayuda por favor sql CE conexión y obtener valor de un campo
Programación General
boreau 0 2,643 Último mensaje 30 Octubre 2012, 19:46 pm
por boreau
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines