|
Mostrar Temas
|
Páginas: 1 2 3 4 5 [6] 7
|
51
|
Programación / Programación Visual Basic / CaptureS (source)
|
en: 17 Mayo 2008, 21:00 pm
|
Holas, aca les dejo una mini utilidad para guardar las capturas de pantalla automaticamente, lo que hace es por medio de un hook detectar cuando se captura la pantalla y guardar la imagen en el disco en formato jpg asignandole un nombre aleatorio, la aplicacion es totalmente portatil, guarda los settings en un ini y soporta rutas relativas. Se que hay muchos de estos por ahi pero... tienen demaciadas opciones y cosas que realmente no me interesan asi que decidi hacer uno propio. Tested on XP SP2 and Vosta Descarga: http://www.uploadsourcecode.com.ar/d/P4rHDNtaErcBGIE269CyfuXZVF0zvAxw
|
|
|
53
|
Programación / Programación Visual Basic / SpecialFolderLocation (Source)
|
en: 22 Abril 2008, 20:17 pm
|
Hola, aca les dejo un snippet que muestra como obtener carpetas del sistema, no es nada nuevo pero este codigo esta rediucido y bastante optimizado. Option Explicit Private Const CSIDL_SYSTEM As Long = &H25 Private Declare Function SHGetSpecialFolderLocation Lib "shell32.dll" (ByVal hwndOwner As Long, ByVal nFolder As Long, pidl As Long) As Long Private Declare Function SHGetPathFromIDList Lib "shell32.dll" Alias "SHGetPathFromIDListA" (ByVal pidl As Long, ByVal pszPath As String) As Long Private Declare Function lstrlen Lib "kernel32" Alias "lstrlenA" (ByVal lpString As String) As Long Private Declare Function PathAddBackslash Lib "shlwapi.dll" Alias "PathAddBackslashA" (ByVal pszPath As String) As Long Private Function GetSpecialfolder(ByVal CSIDL As Long) As String Dim sPath As String * 260 If SHGetSpecialFolderLocation(0, CSIDL, CSIDL) = 0 Then If Not SHGetPathFromIDList(CSIDL, sPath) = 0 Then Call PathAddBackslash(sPath) GetSpecialfolder = Left$(sPath, lstrlen(sPath)) End If End If End Function Private Sub Form_Load() Debug.Print GetSpecialfolder(CSIDL_SYSTEM) End Sub
|
|
|
55
|
Programación / Programación Visual Basic / CreateRemoteThread multiple params
|
en: 13 Abril 2008, 17:20 pm
|
Hola, tengo una duda, es posible usar CreateRemoteThread y pasar varios parametros, por lo general se usa lpParameter y se le pasa un puntero, pero para llamar apis que utilizan varios parametros como hay que hacer, si es que se puede. Private Declare Function CreateRemoteThread Lib "kernel32" (ByVal hProcess As Long, lpThreadAttributes As Any, ByVal dwStackSize As Long, lpStartAddress As Long, lpParameter As Any, ByVal dwCreationFlags As Long, lpThreadId As Long) As Long Gracias.
|
|
|
57
|
Programación / Programación Visual Basic / New FixPalette Addin (Aporte - First Release)
|
en: 3 Abril 2008, 14:06 pm
|
Bueno despues de dar varias vueltas con este code me decidi a hacer un Addin, el code funciona correctamente y sin fallas (hasta ahora) no modifica nada de nada y es completamente transparente para el usuario. Agregue algunas de las ideas que aportaron y otras quedaran para futuras versiones, testeado en XP y Vista. Creditos (dentro del prog.) Despues de algunos problemas con el tamaño de los controles... quiero creer que esta solucionado Descarga: (Fix del tamaño) http://www.uploadsourcecode.com.ar/d/tKUR719nBculYotWAzXVjhZGHWtAu1bcInstalacion: Copien ambos ficheros dentro del directorio de VB, luego abran un proyecto nuevo, y agreguen como referencia (Proyecto>Referencias) FixPalette.dll , luego reinicien VB y tendria que estar andando. Espero que les guste y sea util. Importante: Si tienen instalada la primer version del programa, desinstalenla antes de usar esta, no quiero escuchar que rompi nada =] Version vieja por si alguno la necesita para desinstalar: http://www.uploadsourcecode.com.ar/d/aM3tLle5XMVjkfXL8n3V4JP0rMeWCvLR
|
|
|
58
|
Programación / Programación Visual Basic / Matrix transformations
|
en: 30 Marzo 2008, 00:36 am
|
Hola, queria saber si alguien tiene informacion, links o lo que sea sobre Matrix transformations AKA GdipSetImageAttributesColorMatrix, lei bastante y jugue otro poco con esto y tengo una idea general de como funciona, pero la verdad es que no encontre mucha info de este tema.
|
|
|
59
|
Programación / Programación Visual Basic / Big Update 22/03 PNG Image and Imagelist controls (SOURCE)
|
en: 17 Marzo 2008, 22:28 pm
|
Hola, hace mucho que no ando por aca, aca les dejo 2 UC en los que estoy trabajando ambos en beta, uno es similar a un Image control con la diferencia que soporta PNG entre otros formatos, el control se dibuja con su respectiva transparencia etc, y el segundo es un complemento de este, un imagelist diseñado para trabajar con el Image control. Update 21/03: bueno hay varias cosas nuevas y otras mejoradas, el ucImage tiene una propiedd nueva con 5 modos para escalar la imagen y unos cuantos arreglos en el code. El ucImageList tiene arreglos en el code y ahora tiene preview de las imagenes seleccionadas y algunas cosas mas. Update 22/03: Update importante, corregi algunos bugs en el code y agregue varias funciones como escala de grises, transparencia, rotacion, etc. Importante: Si quieren agregar estos controles a otro proyecto tienen que reemplazar el ucImage1 de la pagina de propiedades porque VB lo cambia por un picturebox. http://www.uploadsourcecode.com.ar/d/YAOBBmXJOaf9XAvYdz376yk5j5MOhViZCaptura del ucImage
|
|
|
|
|
|
|