FoxPro/Visual FoxPro - Pasar datos a un ListBox

 
Vista:

Pasar datos a un ListBox

Publicado por Gabriel (427 intervenciones) el 16/05/2006 15:33:47
Que tal amigos :
Recurro a ustedes a ver si alguien tiene alguna idea de como resolver lo siguiente...
He creado un formulario con algunos controles y uno de ellos va a permitir al Usuario escoger UNO o mas Documentos seleccionados de un ListBox

Ej. Registrar [ ] Uno (ComboBox) [X] Varios (ListBox )

Cuando se selecciona Varios llamara a otro Formulario en donde Habra un TextBox para Ingresar algun Documento Nuevo no contenido en la Lista y ademas 2 ListBox adicionales debajo del TextBox, es aqui donde empieza la duda.
El Listbox de la Izquierda esta cargada con la Tabla de Documentos existentes y al medio existen 4 botones de comando para seleccionar Uno, Todos, Quitar Uno, Quitar Todo. Sobre esta parte ya tengo la codificacion. Ahora bien los Documentos que resulten seleccionados apareceran en el LISTBOX del lado derecho

Aqui la duda como hago para que al Cerrar este formulario secundario la informacion contenida en el LISTBOX resultante de la derecha lo pase al LISTBOX del formulario principal.

Espero sus comentarios y/o sugerencia al respecto

Saludos,
Gabriel
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Pasar datos a un ListBox

Publicado por DOUGLAS (297 intervenciones) el 16/05/2006 19:52:54
BIEN TRABAJA CON PARAMETRO

CUANDO LLAMES AL FORM. SECUNDARIO

ALGO ASI SIMILAR

DO FORM FRMSECUNDARIO WITH "NOMBRE DEL FORM PRINCIPAL" TO XRES

EN EL INIT DEL FORM SECUNDARIO PONE ALGO ASI

PARAMETER noWinAc
thisform.winact =noWinAc
THISFORM.VALBUS = " " &&SI TU RESULTADO ES NUMERO INICIAL CON 0

CLARO thisform.winact TENES QUE CREAR ESTA PROPIEDAD.
THISFORM.VALBUS Y ESTA TAMBIEN

EN EL UNLOAD DEL FORM SECUNDARIO PONE ESTO

ACTIVATE WINDOWS (thisform.winact)
RETURN THISFORM.VALBUS

AHORA EL FORM

PRINCIPAL DESPUES QUE RETORNE

SI SON CODIGOS LOS QUE BUSCAS YA QUE ESTO QUE DESEA QUE TE MUESTRE SON DATOS GUARDADOS EN UNA TABLA
VAL BUS PUEDE SER UN CODIGO POR EJEMPLO TU HACELO A TU CODIGO

COMO TU DIJISTES

DO FORM FRMSECUNDARIO WITH "NOMBRE DEL FORM PRINCIPAL" TO XRES

XRES
VA SER TU CODIGO DE RETORNO QUE AGREGASTE ALLA EN FORM SEC.

AHORA

XRES BUSCALO EN TU TABLA
IF FOUND ()
ES QUE LA AGREGO ALLA
HACE UN SELECT = XRES SEA IGUAL A LO QUE TU AGREGASTE QUE VA SER XRES DE HECHO.
SELECCIONA TU TABLA O TEMPORAL DE LISTBOXX

Y HACE UN APPEND FROM DBF("TUCURSOR")

ALGO ASI SI NO ENTIENDES TE PUEDE EXPLICAR O ME ENVIAS TU FORM Y TE LO HAGO FUNCIONAR

DOUGLAS SANCHEZ
NICARAGUA

ENDIF
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar