Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - seba123neo

#2291
Hola, ¿ al listview le enlazaste el ImageList desde las propiedades ? igualmente para cargar las imagenes lo podes hacer en tiempo de diseño, no cargar las imagenes en tiempo de ejecución.

saludos.
#2292
Cita de: Tengu en 26 Agosto 2009, 01:48 AM
exacto solo te fijas el ultimo item y lo seleccionas asi quedara como quieres

aunk coincido con lo antes dicho. no entiendo la diferencia de estar arriba o abajo jajaj

como que no es util ? el que dice eso es porque nunca vio la utilidad. fijate cualquier cantidad de programas tienen esa opcion, o en un textbox tambien. por ejemplo cuando te esta llegando informacion de algun modo uno siempre quiere ver la ultima que va llegando no la primera, puede ser muy util, como dijeron ahi en un chat se ve lo ultimo ingresado no lo primero, como ven hay 3 millones de utilidades, no se para que la quiere NsTeam, pero que es util...si lo es para algunas ocasiones. te dejaria mudo si te digo todas las utilidades que se puede usar algo asi, ya sea en listbox, textbox, grilla ...etc..
#2293
Código (vb) [Seleccionar]
Private Declare Function MessageBoxEx Lib "user32" Alias "MessageBoxExA" (ByVal hwnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal uType As Long, ByVal wLanguageId As Long) As Long
Const MB_ICONASTERISK = &H40&

Private Sub Form_Load()
   MessageBoxEx Me.hwnd, "Hola", "Aviso", MB_ICONASTERISK, 0
End Sub
#2294
Hola, haber proba..

Código (csharp) [Seleccionar]
int x = Convert.ToInt32(textBox1.Text);
#2295
Programación Visual Basic / Re: Duda If
25 Agosto 2009, 01:08 AM
para colmo sin source, aca se postea todo con source, sino no va aca, va en software, y te recomendaria no postarlo en rapidshare ya que aparte de ser horrible me parece que lo bajan 10 y te lo borran. mejor ponelo en esta pagina que la mayoria de aca usa, es libre y te dura por siempre (o hasta que ivo deje de garpar el hosting  :xD, si es que garpa  :xD), al subirlo te da un link y ese debes postear.

Uploadsourcecode

PD:te vuelvo a recordar que sin source te lo tengo que mover a otra parte, vos diras.

saludos.

#2296
Hola, yo tambien habia visto ese OCX hace tiempo, tiene varios controles, pero te digo la verdad me paso lo mismo que a vos, una vez lo instale y me andaba de 10 me acuerdo que al boton se le podia poner la profundida de 3D y esas cosas...estaba bueno..pero despues reinstale el visual basic por algo que habia pasado y nunca mas me andubo por el error que comentas...pero te digo que no vale la pena sufrir tanto por unos controles que no estan tan buenos.

PD:la solucion es bajarte este archivo VBUSC.EXE y ejecutarlo y listo te anda, lo que hace es proporcionarte las licencias para los controles discontinuos.lo acabo de probar y puedo usar los controles.

saludos.
#2297
Programación Visual Basic / Re: Duda If
25 Agosto 2009, 00:41 AM
no puedo creer que hiciste un avion y no sabes como funciona la rueda...no se si me entendes... :¬¬
#2298
Cita de: Skeletron en 14 Agosto 2009, 02:27 AM
Capturar video??
No no... al archivo lo tengo en mi PC.. por ejemplo: C:/VIDEOS
Y al programa le doy el link de donde está en mi PC y que lo analice..

tampoco se como lo queres ahcer, si con un control, con codigo o con que...porque con el mismo control de windows media player tenes para ir avanzando de fotogramas...cualqueir forma de reproduccion de video que puedas encontrar para .NET debe tener seguro la opcion para elegir el fotograma.

saludos.
#2299
te recomiendo tambien de esa pagina el chamaleon button, es libre de codigo y no necesitas OCX...

saludos.
#2300
Hola, proba esto haber si te sirve..

Código (vb) [Seleccionar]
Option Explicit

Private Sub Command1_Click()
    MsgBox descifrar("P A R I S  V A U T  B I E N  U N E  M E S S E ", "L O U P L  O U P L  O U P L  O U P  L O U P L ")
End Sub

Private Function descifrar(ByVal pCadena As String, ByVal pPassword As String) As String

    Dim vContador As Integer, vIndice As Integer, vFila As Integer, vNumero As Integer
     
    pCadena = LCase(pCadena)
    pPassword = LCase(pPassword)
   
    For vContador = 1 To Len(pCadena)
        vIndice = vIndice + 1
        If vIndice > Len(pPassword) Then vIndice = vIndice - Len(pPassword)
       
        vFila = Asc(Mid(pPassword, vIndice, 1)) - 97
       
        If vFila = 0 Then vFila = 26
       
        vNumero = Asc(Mid(pCadena, vContador, 1))
       
        If vNumero >= 97 And vNumero <= 122 Then vNumero = vNumero + vFila
        If vNumero > 122 Then vNumero = vNumero - 26
       
        descifrar = descifrar & Chr(vNumero)
    Next vContador
   
End Function


saludos.