ComboBox

Post Reply
macato
Posts: 28
Joined: Tue Mar 01, 2011 12:39 pm

ComboBox

Post by macato »

Amigos

favor su ayuda comienzo a utilizar la clase TMsql y necesito abrir un combobox relacionando 2 tablas, por un código en común, aquí un ejemplo de como lo realizo:

***ABRO LAS TABLAS
::oCliente := ::oMain:oCon:Query( "SELECT * FROM MAANALIS" ) //esta tabla contiene un campo TIPO_CLIENTE

::oTipo_Clientes := ::oMain:oCon:Query( "SELECT * FROM COTIPANA" ) //esta tabla contienen los tipos de clientes

*** CREO UN ARREGLO CON LOS DATOS DEL TIPO DE CLIENTES PARA LUEGO RELACIONARLO CON CADA CLIENTE
::aCte := Array( 02 )
::aCte[01] := {}
::aCte[02] := {}

WHILE !::oTipo_Clientes :eof()
AAdd( ::aCte[01], ::oTipo_Clientes:descripcion )
AAdd( ::aCte[02], ::oTipo_Clientes:tipo_cliente )
::oTipo_Clientes:skip()
ENDDO

*** ASI INTENTO RELACIONAR LAS TABLAS, para mostrar el la seleccion en el combobox
::vCmb[01] := ::aCte[01][max( 1,aScan( ::aCte[02], { |a|a = ::oClientes("TIPO_CLIENTE") } ) ) ]

***LUEGO ABRO EL COMBOBOX EN UN DIALOGO

Redefine ComboBox ::oCmb[01] VAR ::vCmb[01] Id 107 Of oDlg1 Items ::aCte[01]

No logro hacer que al seleccionar un cliente se muestre asociado a un tipo..

alguna sugerencia, se los agradezco

salu2
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Re: ComboBox

Post by Antonio Linares »

Puedes mostrar una captura de pantalla para ver el diálogo ? gracias
regards, saludos

Antonio Linares
www.fivetechsoft.com
macato
Posts: 28
Joined: Tue Mar 01, 2011 12:39 pm

Re: ComboBox

Post by macato »

Antonio Linares wrote:Puedes mostrar una captura de pantalla para ver el diálogo ? gracias
gracias Antonio

Image

lo que intento es que desde el combobox guardar un tipo de cliente (Proveedor, Cliente, honorarios u otro) luego al editarlo que en la edicion se muestre lo que se selecciono y guardo previamente.. lo que actualmente me ocurre es que al editar solo me muestra el primer dato del combobox y no lo que se guardo en la tabla.

gracias.
horacio
Posts: 1270
Joined: Wed Jun 21, 2006 12:39 am
Location: Capital Federal Argentina

Re: ComboBox

Post by horacio »

Es un combo desde código o recursos ???

Saludos
macato
Posts: 28
Joined: Tue Mar 01, 2011 12:39 pm

Re: ComboBox

Post by macato »

horacio wrote:Es un combo desde código o recursos ???

Saludos
si el combobox es desde un recurso

gracias..
horacio
Posts: 1270
Joined: Wed Jun 21, 2006 12:39 am
Location: Capital Federal Argentina

Re: ComboBox

Post by horacio »

Si utilizas Pelles-C, prueba desactivar el estilo sort.

Saludos
macato
Posts: 28
Joined: Tue Mar 01, 2011 12:39 pm

Re: ComboBox

Post by macato »

horacio wrote:Si utilizas Pelles-C, prueba desactivar el estilo sort.

Saludos
Tengo desactivado el sort!!

sigo probandoooo..

gracias
Marcelo Via Giglio
Posts: 1033
Joined: Fri Oct 07, 2005 3:33 pm
Location: Cochabamba - Bolivia

Re: ComboBox

Post by Marcelo Via Giglio »

Hola,

muchas veces para asociar dos arrays con un COMBOBOX, como ser códigos y descripciones, es mejor utilizar del DBCOMBO

REDEFINE DBCOMBO ::oCmb[01] ;
VAR ::vCmb[01] ;
ID 107 ;
OF oDlg1
LIST ::aCte[01] ;
ITEMS ::aCte[02]

saludos

Marcelo
macato
Posts: 28
Joined: Tue Mar 01, 2011 12:39 pm

Re: ComboBox

Post by macato »

Marcelo Via Giglio wrote:Hola,

muchas veces para asociar dos arrays con un COMBOBOX, como ser códigos y descripciones, es mejor utilizar del DBCOMBO

REDEFINE DBCOMBO ::oCmb[01] ;
VAR ::vCmb[01] ;
ID 107 ;
OF oDlg1
LIST ::aCte[01] ;
ITEMS ::aCte[02]

saludos

Marcelo
mmm nunca he utilizado DBCOMBO me marca error al compilar... en la linea del DBCOMBO
Marcelo Via Giglio
Posts: 1033
Joined: Fri Oct 07, 2005 3:33 pm
Location: Cochabamba - Bolivia

Re: ComboBox

Post by Marcelo Via Giglio »

Hola,

debes de incluir el archivo de cabecera en tu prg

#include "dbcombo.ch"

saludos

Marcelo
Post Reply