hola ayudenme a una cosa sencilla

[warmint]

estoy muy liado vereis kisiera acer teniendo 2 botones y 2 textbox una cosa y eske quiero en el 1 poner la contraseña y entra al form siguiente pues vereis en el otro cuando le aprete al otro button ponga la contraseña y el 1 boton se quede inaccesible osea k cada vez k le apretes al boton no vaya y el otro si  y tambien quiero k cuando eso se haga se kede aun aviendo cerrado el .exe y cuando lo buelves a estar aun este vereis soy aun novato y me gustaria de buestra ayuda para hacer una cosa k me gustaria aprender espero buestras respuestas
os dejo una foto

[naderST]

Hola... algo asi?

Código [Seleccionar] Expandir


private sub Command2_click()
command1.enabled = false
end sub


[warmint]

siiiiiiiiiiiii aora necesito k se kede asin osea k se guarde conforme esta y cuando se ejecute el programa o lo k valla acer siga asin saves como?

[naderST]

siiiiiiiiiiiii aora necesito k se kede asin osea k se guarde conforme esta y cuando se ejecute el programa o lo k vaya acer siga asin saves como?

escribe bien... no te entiendo que quieres hacer.

[warmint]

eske yo escribo asin enverde que es que xD
mira lo k quiero eske cuando abra el form y le aprete al command 2 el command kede inabilitado como lo k tu me as dicho y cuando cierre y vielva abrir se kede con el command 1 desabilitado osea lo k e echo se kede o otro ejemplo
supongamos k lo convierto en .exe y se llama ejemplo programa.exe lo abro y estan los dos botones bien no? entoces cuando le aprete al 2 el command 1 se desabilite y cierro el programa.exe y cuando lo vuelva abrir que el command 1 siga deshabilitado k lo k aiga echo se ubiera guardado entiendes ya pues aora quiero la manera de k se guarde eso solo espero tu respuesta o la de otro 

[HaDeS, -]

Mira este pequeño ejemplo:

Código (vb) [Seleccionar] Expandir


Private Sub Command2_Click()
Command1.Enabled = False
SaveSetting "ejemplo", "boton", "habilitado", "0"
End Sub

Private Sub Command3_Click()
Command1.Enabled = True
SaveSetting "ejemplo", "boton", "habilitado", "1"
End Sub

Private Sub Form_Load()
If GetSetting("ejemplo", "boton", "habilitado") = "0" Then
    Command1.Enabled = False
End If
End Sub

SaveSetting guarda un valor en el registro del sistema.
GetSetting retorna valores del registro del sistema.
Command2 deshabilita el botón
Command3 habilita el botón

Para deshabilitar el botón cada vez que se inicia la aplicación retornamos el valor en el registro de la clave habilitado, y si es igual a cero (Que anteriormente se definió con command2) entonces el botón quedará inhabilitado)

Saludos

[Littl3]

nas, el savesetting me hubiera servido mucho hace tiempo, para guardarlo que sintaxis se utiliza?


Por ejemplo asi:

SaveSetting "ejemplo", "boton", "habilitado", "1"

Esta guardando una clave en ejemplo/boton/habilitado con valor 1 ?

No se podria guardar directamente en ejemplo?  "SaveSetting "ejemplo", "1"

Salu2

[SKL (orignal)]

mejor usa la clase que subi, para utulizar el registro, es muchisimo mejor, y podes hacer comprobaciones y elegir el destino de la informacion!!


aca te paso el link nuevamente: clsLightning.rar en UpSourceCode.com.ar

[Littl3]

Gracias le hechare un vistazo

[warmint]

siiiiii es lo k quiero pero ay un problemita veras
lo que te marque de rojo es el problema veras yo no quiero k empieza desabilitado quiero k empieze abilitado pero cuando canvio el codigo k te e puesto en rojo enverde false le pones true pero ese es el problema cuando lo canvias lo abres de prueba empieza vien pero cuando lo cierras con el boton deshabilitado  y abres sige igual  alguna ontra sugerencia?

Private Sub Command2_Click()
Command1.Enabled = False
SaveSetting "ejemplo", "boton", "habilitado", "0"
End Sub

Private Sub Command3_Click()
Command1.Enabled = True
SaveSetting "ejemplo", "boton", "habilitado", "1"
End Sub

Private Sub Form_Load()
If GetSetting("ejemplo", "boton", "habilitado") = "0" Then
Command1.Enabled = False
    End If
End Sub