FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Error en Listbox con Report
Posts: 711
Joined: Thu Oct 06, 2005 09:57 PM
Error en Listbox con Report
Posted: Fri May 23, 2008 06:42 PM

Desde un dialogo, donde tengo un listbox con campos de la base de datos "x", pulsando un bot贸n imprimo un listado (con previo) pero de otra DBF que tambien est谩 abierta.

Al volver del previo (imprima o no) el listbox se disloca, duplicando los registros. Lo he intentado de varias formas, a帽adiendo oLbx:Refresh(), oLbx:upstable(), DBGOTOP(), tanto en el bot贸n del di谩logo, como al final del ACTIVE REPORT POSTEND. He intentado poniendo el previo modal y no modal, pero continua el problema. Solo funciona suprimiendo el previo 贸 coloc谩ndole un ALERT() cuando vuelve del proceso de impresi贸n.

驴Alguna idea magistral?

Muchas gracias por vuestras ideas y un buen fin de semana.

Un saludo



Manuel
Posts: 299
Joined: Mon Oct 22, 2007 03:03 PM
Error en Listbox con Report
Posted: Fri May 23, 2008 08:32 PM

Cual ListBox Utilizas?, En mi caso uso TwBrowse y SIEMPRE defino el alias;

oLbx:cAlias:='x'

Porque lo que te pasa es t铆pico de perder el foco a la tabla.

Saludos



Angel, Valencia, Venezuela



xH .997 - FW 7.9 - BCC55 - WorkShop - MySql
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM
Error en Listbox con Report
Posted: Fri May 23, 2008 08:48 PM
No se si ser谩 la opcion, pero hace despues que reporte termine un select a la tabla que tiene el listbox.

Espero te sirva
SELECT (tabla_listbox)
DEFINE DIALOG ....
@ 10, 10 BUTTON oBot ACTION Reporte()
ACTIVATE DIALOG ...

STATIC FUNCTION Reporte()
...
SELECT (tabla_listbox)
RETURN nil
Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Error en Listbox con Report
Posted: Sat May 24, 2008 09:31 AM

Hola Manuel:

No hace mucho me top茅 con el mismo problema, y es que para imprimir con REPORT tienes que estar situado en el 谩rea de trabajo correspondiente (que alguien me corrija si me equivoco). Yo lo hago as铆 y funciona correctamente:
............
Local nAreanterior:=SELECT()
DbSelectArea("GASTOS2")
REPORT
...............
..............
END REPORT
//
DbSelectArea(nAreanterior)
//

Saludos,
Manuel

Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 711
Joined: Thu Oct 06, 2005 09:57 PM
Error en Listbox con Report
Posted: Sat May 24, 2008 04:12 PM

Muchas gracias a todos por responder.

Uso el listbox Twbrowse. En la definici贸n del listbox, tengo un alias de su base y al final del report tengo un Select a dicha base, pero como dije antes, si no le pongo un ALERT de stop, la cosa se descontrola. Creo que quizas pueda ser que el preview crea un dialogo no-modal y que quizas esto produce el descontrol del listbox.

Un saludo



Manuel

Continue the discussion