Ver Mensaje Individual
  #4 (permalink)  
Antiguo 21/08/2009, 16:24
Avatar de A.H.H
A.H.H
 
Fecha de Ingreso: mayo-2007
Ubicación: IRUN,(GUIPUZCOA) España
Mensajes: 178
Antigüedad: 17 años, 11 meses
Puntos: 4
Respuesta: savesetting/getsetting

Hola ya lo solucione con GetAllSettings(appname, section)
que recoge todos los valores guardados con savesetting.
despues recorro el listbox con dos bucles y ya me quedan marcados al correr el programa, todos los items que estaban elegidos al cerrar el programa y guardar.
dejo el codigo por si ha alguien le interesa............

Código:
'LISTBOX CON STYLE CHECKBOX'
'DEJAR MARCADOS LOS ITEMS GUARDADOS ANTERIORMENTE AL CERRAR'
'AL INICIO DEL PROGRAMA'

variable = GetAllSettings(App.EXEName, "DIRHORACONCRETA") 'introducimos en la variable todos los valores '
If Not IsEmpty(variable) = True Then 'esto es por si en el registro la variable esta vacia si no daria error '
For N = 0 To List1.ListCount - 1 'recorremos el listbox'
For i = 0 To UBound(variable, 1) ' recorremos la variable'
If variable(i, 1) = List1.List(N) Then 'si el contenido de las lineas de la variable coincide con el de las lineas del list del listbox'
List1.Selected(N) = True 'entonces dejarlas marcadas'
End If
Next
Next
End If


salu2