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

 

 


Tema destacado: Trabajando con las ramas de git (tercera parte)


  Mostrar Temas
Páginas: 1 2 3 4 5 6 7 8 9 10 11 [12] 13 14
111  Programación / Programación Visual Basic / Bytes Array en: 22 Octubre 2009, 02:46 am
Buenas Alguien sabe como Obtener la longitud en bytes de un array (ya sea uni, bi, tridimencional, multi)

Algo asi como LenB() pero que sea para Array

gracias
112  Programación / Programación Visual Basic / [Source] ListBoxViewEx (Beta) en: 7 Octubre 2009, 21:45 pm
Antes que nada:

Es el ListboxEx de Leandro Ascierto pero con muchas modificaciones, entre ellas la Adiciòn de un ListView.

Post Original ListViewEx Leandro Ascierto

Atras cosas a Notar:

Elimine los picture,VScroll y Redibuje TODO en un HDC de Memoria, para la manipulaciòn con el ScrollGhost.

Actualmente lo estoy Optimisando ( Este es el Codigo Fuente Contiene Codigo Basura y Repetitivo )

Las mejoras ya listas son:

* Ordenamiento Mejorado (Elimine el Modo de Ordenamiento de LeandroAscierto)
* Ordenamiento por Columnas
* Multiselecciòn con tecla Shift
* Obtenciòn de Rango de Selecciòn
* Elimine el error de que cuando se estaba seleccionado un item o fila INferior ese subia mientras el Item o fila a eliminar era de abajo (o Superior con respecto a la matriz)



ELIMINE el VScroll y puse un sistema que denomino ScrollGhost, es decir:

El Scroll Ghost tiene el funcionamiento de un Slider la velocidad de recorrido de los items o fila depende de la posiciòn del mouse en el ScrollGhost. Los ScrollGhost se encuentran en el area superior, Inferior y en los extremos Izquierda y Derecha

Para los ScrollGhost Superior e Inferiores la velocidad se define  asi

VelocidadMinimo-------------------------------------------------VelocidadMaxima

Para los ScrollGhost Laterales la Minima es en area superior y la Maxima en el Ala Inferior

Dichos ScrollGhost los stoy Arreglando y por obvias razones cambiare el diseño de estos por unos mas vistosos (Actualmente son solo pruebas)

Dichos ScrollGhost los stoy Arreglando y por abvias razones cambiare el diseño de estos por unos mas vistosos y màs manejables (Actualmente son solo pruebas)

Los Items Actualmente NO ESTAN POR REGIONES por lo tanto no se pueden realizar cambios entre ellos (Esta version esta 100% enfocada a ListBoxEx de Leandro Ascierto por lo cual tengo que Rehacer las filas en Regiones para realizar cambios entre items con el Mouse).




Bueno Aqui les dejo el SourceCode (Reitero es Betay contiene CodigoBasura y Cosas Repetidas.)

http://infrangelux.sytes.net/Descargas/Programas/ListBoxViewEx.zip

P.D.: Espero que LeandroAscierto no se moleste por esta modificaciòn tan masima jojojo.

Dulces Lunas
113  Programación / Programación Visual Basic / [Solucionado] HDCMemory Color Texto en: 5 Octubre 2009, 04:09 am
Bueno nada mas para saber con que API le aplico color al texto en el HDC creado en memoria, la api que uso para crear dicho texto es:

Código
  1. CreateFontIndirect
  2.  

Dulces Lunas!¡.
114  Programación / Programación Visual Basic / [Duda] Seven/Vista en: 4 Octubre 2009, 05:54 am
La grandiosa duda es

¿Que version del M$ Windows Common Controls es la que acepta Vista/Seven?

Dulces Lunas!¡.
115  Media / Juegos y Consolas / [Ayuda-Duda->Configuraciòn] PS2-Slim en: 25 Septiembre 2009, 03:26 am
Hola buenas las tengan... eso se oyo medio feo, pero da igual.

Realizo estaduda de configuraciòn de mi PS2-SLIM con chip Matrix Infinity (Con punto Y y SX soldados por un servidor ya que no los traia como tal), Modelo 77001 Version 14-15.

Mi pregunta es por que NO se hace ver la configuraciòn YPbPr desde la Bios? es decir solo se ve la de video (Video, Audio R y L, cables Amarillo, Blanco y Rojo) pero NO los de YPbPr (Ojo con chip Activo/Desactivado), configurando de igual manera en el Chip.

OJO esto solo me pasa con los juegos de la Play Station 1 los de la 2 corren eseccionalmente en mi monitor LCD que uso con la PC y a la cual le saco los cables de YPbPr (pines 1,2,3,  {6,7,8}=1).

P.D.: se su`pone que al soldar el punto SX se tiene que forzar el arranque de dicho juego, es por esto que pasa? o es por que un juego de Play 1 No corre en modo progresivo (YPbPr) ?

Dulces Lunas!¡.
116  Programación / Programación Visual Basic / bmp to ico en: 16 Septiembre 2009, 01:39 am
Alguien sabe como convertir una imagen a formato ico, lo que pasa es que me e trabado al extraer los iconos de un X archivo por ejemplo de un exe, dll, txt (Iconos segun la configuracion e la pc actual en tiempo actual) y posteriormente como es de esperarse mostrarlo en un hdc (en uno de memoria) y guardarlo pero como es de esperarse se guarda en formato BMP...

Uso las apis Extracticon, drawicon, assosiatedicon, yestaba pensando en usar las apis para los recursos de archivos  (LoadResource, FindResource, etc ) y de esta forma guardarlo con el cabezar de un formato ico, pero es muy laborioso, ademas que que no cuento con dicha informaciòn

a lo que voy es guardar de un hdco bmp a ico, el icono leido con extractico y dibujado en el ndc con drawico, omo se guardaria entonces, a un formato Valido .ico?

Dulces Lunas
117  Programación / Programación Visual Basic / blank en: 20 Agosto 2009, 19:44 pm
blank
118  Programación / Programación Visual Basic / Estructura VBHeader en: 13 Julio 2009, 09:24 am
Bueno solo vengo a preguntar cual es la estructura del VBHeader de un EXE compilado obviamente

Solo eso Gracias
119  Foros Generales / Sugerencias y dudas sobre el Foro / Errores Del Foro? al publicar Imagenes... en: 22 Junio 2009, 23:38 pm
La cosa esta asi:

Pongo el siguiente code para publicar una imagen en pequeño


[ URL=http://img514.imageshack.us/i/reancho.jpg/][IMG ]http://img514.imageshack.us/img514/4552/reancho.th.jpg[/img ][/URL ]

Le he dado espacios a las estiquetas para que e4 vea el codigo q empleo en el segundo post y sus efectos tal cuales al publicar (El error surge de gual forma al ponerlo entre las etiquetas (code)(/code) Obviamente con corchetes xP).

Que me podnria la siguiente imagen relacionado con un hipervinculo,pero al previsualizar TODO BIEN pero al darle guardar pasa lo siguiente:

[ URL=http://img514.imageshack.us/i/reancho.jpg/][ IMG]http://img514.imageshack.us/img514/4552/reancho.th.jpg[/ img][/ URL]

Al publicar:

[ URL=http://img514.imageshack.us/i/reancho.jpg/][IMG]http://img514.imageshack.us/img514/4552/reancho.jpg[/ IMG][/ URL]

Es decir al publicar quita .th pero UNICAMENTE con relacion a Hipervinculos e INCLUSIVE esto paa cuando esta entre las etiquetas code, por ello no lo he publicado de esa forma como deberia ser.¡!

Dulces Lunas
120  Programación / Programación Visual Basic / [Modificación a Source] Reproducir Medio en Escritorio...¡! en: 22 Marzo 2009, 11:25 am
el codigo es original de Leandro Ascierto solo cambie un poco este:

Solo se nesesita un modulo
        No requiere Formulario
No tiene dependencias
        Por ende quite el WindowsMediaPlayer y ya trabaja sobre MCI
Al estar COMPILADO y al Arrastrar un Archivo de Música, Video o Imagen se reproduce (OJO las imagenes no tardan mucho en cerrar Sorry jem)

Al termino de la Reproducción del Archivo se Cierra Automaticamente.

Source Solo se nesesita un Modulo
Código
  1. Option Explicit
  2. 'By Leandro Ascierto
  3. 'Modificado por BlackZeroX (Parte MCI)
  4. 'Corrección Api SystemParametersInfo
  5. 'Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, byval lpvParam As Any, ByVal fuWinIni As Long) As Long
  6. Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
  7. Private Declare Function SetSysColors Lib "user32.dll" (ByVal nChanges As Long, ByRef lpSysColor As Long, ByRef lpColorValues As Long) As Long
  8. Private Declare Function GetSysColor Lib "user32.dll" (ByVal nIndex As Long) As Long
  9.  
  10. 'Declraciones Anidadas
  11. Private Const SPI_GETWORKAREA = 48
  12. Public Type RECT
  13.    Left As Long
  14.    Top As Long
  15.    Right As Long
  16.    Bottom As Long
  17. End Type
  18. Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
  19. 'Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
  20. 'Private Declare Function GetActiveWindow Lib "user32" () As Long
  21. Private Declare Function WaitMessage Lib "user32" () As Long
  22. Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
  23. 'Fin
  24.  
  25. Private Const COLOR_BACKGROUND As Long = 1
  26. Private Const SPIF_UPDATEINIFILE As Long = &H1
  27. Private Const SPIF_SENDWININICHANGE As Long = &H2
  28. Private Const SPI_GETDESKWALLPAPER As Long = 115
  29. Private Const SPI_SETDESKWALLPAPER As Long = 20
  30. Dim lOldColor As Long
  31. Dim sOldWallPaper As String
  32.  
  33. Sub Main()
  34.    'Sustitución de la Dependencia WindowsMediaPlayer por el MCI
  35.    Dim T_rect As RECT
  36.    Dim data As String
  37.    data = Space(255)
  38.    mciSendString "close all ", 0, 0, 0 'Activa la linea si Aun no lo compilas
  39.    mciSendString "open " & Command$ & " alias MedioX style popup ", 0, 0, 0
  40.    SystemParametersInfo SPI_GETWORKAREA, 0, T_rect, 0
  41.    mciSendString "put MedioX window at 0 0 1 1 ", 0, 0, 0
  42.    mciSendString "play MedioX ", 0, 0, 0
  43.    mciSendString "window MedioX state hide", 0, 0, 0
  44.    mciSendString "put MedioX window at 0 0 " & Int(T_rect.Right - T_rect.Left) & " " & Int(T_rect.Bottom - T_rect.Top + 40) & " ", 0, 0, 0
  45.    'ShowWindow GetActiveWindow, 0
  46. '--------------------------------------
  47.    'Source Leandro Ascierto
  48.    sOldWallPaper = Space(255)
  49.    'SystemParametersInfo SPI_GETDESKWALLPAPER, 255, sOldWallPaper, 0 'Original
  50.    SystemParametersInfo SPI_GETDESKWALLPAPER, 255, ByVal sOldWallPaper, 0 'Corrección
  51.    lOldColor = GetSysColor(COLOR_BACKGROUND)
  52.    Call SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, " ", 0)
  53.    Call SetSysColors(1, COLOR_BACKGROUND, RGB(16, 0, 16))
  54.    Do
  55.        mciSendString "status MedioX mode", data, 255, 0
  56.        If Not Left(data, 7) = "playing" Then
  57.            Exit Do
  58.        End If
  59.        DoEvents
  60.        Debug.Print Left(data, 7)
  61.        WaitMessage
  62.    Loop
  63.    Call SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, sOldWallPaper, 0)
  64.    Call SetSysColors(1, COLOR_BACKGROUND, lOldColor)
  65. End Sub
  66.  
Post Original
Páginas: 1 2 3 4 5 6 7 8 9 10 11 [12] 13 14
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines