Hola amigo tengo una pregunta sobre el registro de foxpro
hola amigo disculpa la pregunta es que he intentado hacer que los datos de una consulta. Poder entrar a la consulta y luego seleccionar un registro y que me lo presente en el form que uso para registrar los clientes y luego poder modificar ese registro y no he podido.
mi form de registro de clientes estaconstituido así. Un txtCodcli,txtnomcli,txttelcli,txtcedcli,txtdircli. Y mi tabla clientes estacompuesta por codcli,nomcli,telcli,cedcli,dircli. Por otro lado tengo el form de donde quiero extraer la información que esta compuesto por un txt1 en cual le puse el siguiente código en interactivechamge
nom=lower(alltrim(this.value)+"*")
thisform.list1.ColumnCount = 2
thisform.list1.columnwidths = "122,88"
thisform.list1.RowSourceType = 0
thisform.list1.RowSource = "select nomcli,telcli from clientes;
order by nomcli where ;
like(nom,lower(nomcli))into cursor temporal"
thisform.list1.RowSourceType = 3
thisform.list1.Refresh
if thisform.list1.listcount=0
messagebox("Nombre no registrado",0+64,"Atención")
endif
y también tiene list1 con el siguiente código
en evento init
nom="*"
this.ColumnCount = 2
this.columnwidths = "250,100"
this.RowSourceType = 0
this.RowSource = "select nomcli,telcli from clientes;
order by nomcli where ;
like(nom,lower(nomcli))into cursor temporal"
this.RowSourceType = 3
this.refresh
en evento dblclick
Thisform.Text1.value=This.value
a ver si me puede echar una mano te agradecería mucho