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 - XresH

#221
Cita de: LukaCrosszeria en 14 Junio 2013, 21:15 PM
Me explicare:

Hay dos programas. El botton[Lo llamaremos X] que acabo de hacer y el otro programa [ El que llamaremos Y].

El botton lo hice para simular un botton mas de Y. Es decir como si X perteneciera a Y.

Al momento de hacer una tabulacion uno se sobre pone sobre el otro. Es decir, si selecciono a X, se observa como si X perteneciera a Y, pero si selecciono a Y, este se sobrepone en X. Lo que quiero es que X y Y siempre esten juntos.




Aqui imagenes:

Con el programa mio seleccionado en el Tab



Con el programa externo seleccionado, el mio pasa a ser sobrepuesto


Querés tabular entre botones de programas, nunca lo intente y no se si se pueda, no podés juntar las aplicaciones  y hacer todo en un solo Form?

Ahí sería mas facil :P
#222
Cita de: EleKtro H@cker en 14 Junio 2013, 20:34 PM
No sé si lo he entendido.

Tienes dos aplicaciones (y las dos de código nativo .NET), llamémosles "1" y "2"...

...¿Quieres que al presionar la tecla "Tabulación" en el programa "1", se active el foco de la ventana del programa "2"?

Saludos

Me parece a mi que el quiere lo contrario, que NO pierda el foco el botón, o no?
#223
Cita de: EleKtro H@cker en 14 Junio 2013, 19:00 PM
Más fácil:

Código (vbnet) [Seleccionar]
Public Class Form1

   Shared Clients(500) As System.Net.Sockets.UdpClient

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       For X As Int64 = 0 To Clients.Count - 1 : Clients(X) = New System.Net.Sockets.UdpClient : Next
   End Sub

End Class


Saludos!

Que suerte que hay gente que esta mas atenta, una variable seguida de un numero y todas iguales, lo haces array.

Mas que fácil, re sencilllo

Gracias elektro, sorry por la distracción (La triste vida de un noob :P)

Saludos.
#224
Me mataste (que atrasado estoy que dude de lo que decías)

a ver si alguno de estos enlaces te sirve porque no he manejado lo que decis:



http://www.iesromerovargas.net/recursos/elec/sol/basic4android.htm

http://www.historiasdeuncazique.com/articulo/730/basic4android-tutorial-anadiendo-actualizando-librerias-a-basic4android.html

http://www.historiasdeuncazique.com/articulo/tag/basic4android


Saludos.
#225
Con for no pero podés simplificar así mira:

Shared client, Client2, Cliente3 As UdpClient


Y asi todas las variables que tengas y/o las líneas que quieras.

Saludos.
#226
Excelente observación elektro no lo había notado, y sí me refería a eso que indicas lo entendiste correctamente.

Porque si el formulario cambia de tamaño o la resolución es mayor/menor la posición dentro del mismo en base a coordenadas siempre va a ser la misma.


button1.location = new point(10, 10)

Este asignación va a ser igual tanto en un Formulario de 5 x 5 metros (:P) como en uno común.

Bienvenida la aclaración, se agradece :D
#227
Podrías almacenar todo en una variable pública desde un módulo, y "llamar" a la misma desde cualquier formulario y su valor no cambiaría en tiempo de ejecución.

Si lo que queres es extraerla desde un archivo de texto, hay muchos ejemplos del método Open en Visual 6.


Open App.Path & "Nombrearchivo.txt" For Append As #1 'abrimos txt

Append deja el contenido por lo que no sobreescribe nada.

Para escribir datos nuevos en el archivo:

Write #1, Datos

No olvides cerrar

Close #1

Para leerlo

Open App.Path & "nombrearchivo.txt" For Input As 1

Line Input #1, Datos


Tampoco olvides cerrar

Close#1


Basicamente de esa forma podes guardr y obtener el dato desde un txt especifico.
Es a modo de ejemplo, espero sirva


Saludos.
#228
Cita de: fervabi22 en 14 Junio 2013, 15:12 PM
Hola XresH

En Realidad el archivo de DarkMatrix ya no existe por que MEGAUPLOAD ya no Existe  por lo tanto no se puede descargar el Codigo de DarkMatrix

Deberias de Leer XresH Antes de decir que esta Todo:

Hola DarkMatrix podrias subir nuevamente el archivo con el Codigo si  fueras tan amable.

Muchas Gracias de Antemano

    Private Sub Form_Load()
     
    1         On Error GoTo Form_Load_Error
     
    2         Call RegisterComponent(App.Path & "\unzip32.dll", DllRegisterServer)
     
    3         TempUpdateList = App.Path & "\updatelist.txt"     ' Archivo que guarda la informacion de los archivos actualizados
    4         TempFileList = App.Path & "\filelist.txt"         ' Donde seran almacenados los archivos actuales
     
    5         If Command = "GenerateUpdateList" Then
    6             If mArchivos.ArchivoExiste(App.Path & "\updatelist.txt") Then Call mArchivos.BorrarArchivo(App.Path & "\updatelist.txt")
    7             Call Generate_FileList(App.Path, 1, App.Path & "\updatelist.txt", HostUrl)
    8             MsgBox "Listo"
    9             End
    10        End If
     
    11        If mArchivos.ArchivoExiste(TempUpdateList) Then mArchivos.BorrarArchivo TempUpdateList
    12        If mArchivos.ArchivoExiste(TempFileList) Then mArchivos.BorrarArchivo TempFileList
    13        If mArchivos.ArchivoExiste(App.Path & "\updatelist.zip") Then mArchivos.BorrarArchivo App.Path & "\updatelist.zip"
    14        If mArchivos.ArchivoExiste(App.Path & "\updatelist.txt") Then mArchivos.BorrarArchivo App.Path & "\updatelist.txt"
     
    15        Set Download = New CDownload
     
    16        Me.Show
     
    17        If Descargar_Updatelist = True Then               ' Descarga el Updatelist
    18            Call Generar_Lista_De_Archivos                ' Genera la lista de archivos
    19            Call Comprobar_Actualizaciones(App.Path)      ' Compara archivos en busca de actualizaciones
    20            Call Descargar_Actualizaciones                ' Descargar Actualizaciones
    21            Call SetStatus("Actualizacion Completa...")   ' Establece el Mensaje de que se completo todo
    22            cmdAceptar.Enabled = True                     ' Activa el mensaje para activar la aplicacion Principal
    23        Else
    24            Call SetStatus("Fallo al Tratar de Actualizar...")    ' Fallo la actualizacion.
    25        End If
     
    26        Exit Sub
     
    Form_Load_Error:
     
    27        MsgBox "Error " & Err.Number & " (" & Err.Description & ") En La Linea Nº " & Erl & " Del Procedimiento Form_Load del Formulario frmDownloader", vbCritical + vbOKOnly, "Error"
     
    End Sub


Yo lo hice funcionar con eso, si tu capacidad no te dá, entonces no digas cosas que no son.

Saludos.
#229
Si usamos coordenadas del ratón dentro de nuestro formulario, pienso que no tendrá efecto s¡ se cambia de resolución? cierto? o es hasta cierto punto  :-\

Coordenadas manuales es cierto que puede causar problemas por lo que indicaron los colegas, ya que el form puede quedar fuera de pantalla si es muy grande.


Saludos.
#230
Cita de: fervabi22 en 14 Junio 2013, 05:20 AM
Hola a Todos esta Bueno el Tema pero ya no se puede descargar el archivo que tiene el codigo para descargar el ACtualizador en Linea de archivos

Alguien lo podria adjuntar nuevamente o enviarlo a mi correo: Fervabi@hotmail.com

Está todo en el post no precisás bajar nada...

Saludos.