Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Pedido De Serial Al Iniciar - Tutorial
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Pedido De Serial Al Iniciar - Tutorial 
 
Hola gente de gambas-es estaba un poco aburrido así que me puse a crear este código, que lo que hace es cuando un usuario inicia por primera vez nuestro programa le pide una clave, si la ingresa bien le muestra la aplicación y si la ingresa mal le sale un mensaje de error, pero aparte si ya a ingresado la clave bien no se la vuelve a pedir nunca mas.

Bien en el Formulario FMain O el Formulario que se mostrara la pantalla de pedido de serial abriremos un Public Sub _new() con el siguiente contenido:

Public Sub _new()
If Exist(User.Home &/ ".act") Then
   Form1.Show
    Form1.center
    Me.Close
Else
  Me.Show
  Me.Center
Endif
End


¿que hace este codigo? este Codigo verifica si el archivo oculto .act existe en la carpeta /home/tu usuario, si es asi te muestra la pantalla principal de la aplicacion, en caso de no existir te muestra el formulario de pedido de clave

ahora en el formulario crearemos un TextBox al cual llamaremos serialbox y un boton, en el codigo de el boton agregaremos:

If serialbox.text = "Clave Que Deve Ingresar El usuario" Then
    Form1.Show
    Form1.center
    Me.Close
    File.Save(User.Home &/ ".act", "Activado")
  Else
    Message.Error("Clave Invalida")
  Endif
 


¿que hace este codigo? Este Codigo lo que hace es que si el usuario en serialbox ingresa la clave correcta le muestra la pagina principal de nuestra aplicacion y ademas crea el archivo .act en /home/tu usuario y si la clave es incorrecta te muestra un mensaje de error.

serial-0.0.1.tar.gz
Descripción: Ejemplo De Pedido de Serial 
Descargar
Nombre del archivo: serial-0.0.1.tar.gz
Tamaño: 4.94 KB
Descargado: 40 veces
serial-0.0.1.tar.gz
Descripción: Ejemplo De Pedido de Serial 
Descargar
Nombre del archivo: serial-0.0.1.tar.gz
Tamaño: 4.94 KB
Descargado: 40 veces
serial-0.0.1.tar.gz
Descripción: Ejemplo De Pedido de Serial 
Descargar
Nombre del archivo: serial-0.0.1.tar.gz
Tamaño: 4.94 KB
Descargado: 40 veces

 




===================
Hola a Todos

Proyectos Gambas:

[list]
[*]CLText: Editor de Texto
[/list]
 
última edición por kingworld el Viernes, 25 May 2012, 19:31; editado 1 vez 
kingworld - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Pedido De Serial Al Iniciar - Tutorial 
 
Si funciona y esta en Gambas3.
Lo que le falraria un boton para salir, entra en un bucle infinito, jeje
 



 
tonixs - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario



  

 

cron