FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour CONTADOR Y ORDENAR REGISTROS
Posts: 537
Joined: Mon Jan 16, 2006 03:42 PM
CONTADOR Y ORDENAR REGISTROS
Posted: Tue May 23, 2017 08:59 PM
Amigo como puedo llevar el contador de registro y ademas ordenar la informacion asi como esta imagen
con la classe #include "taskpanel.ch"




saludos
Posts: 346
Joined: Mon Oct 05, 2009 03:35 PM
Re: CONTADOR Y ORDENAR REGISTROS
Posted: Tue May 23, 2017 11:14 PM
Amigo, como referencia:




contador de registro, en la columna dos del primer browse, para usarlo en la taskpanel deberias pasar los parametros oBrw:KeyNo() y oBrw:KeyCount()

Code (fw): Select all Collapse
oBrw:aCols[2]:bFooter := { || "Cliente N° "+LTRIM( STR( oBrw:KeyNo() ) ) + "/" + LTRIM( STR( oBrw:KeyCount() ) ) }


lo otro son Tabs, yo lo defino asi:

Code (fw): Select all Collapse
          REDEFINE TABS  oTab PROMPTS "Contratos Vigentes"  ID 101 COLOR CLR_BLACK OF xDlg

// PARA CONTROLAR AL PINCHAR CADA TAB
//           REDEFINE TABS  oTab PROMPTS "Otro 1","Otro 2","Otro 3"  ID 101 COLOR CLR_BLACK OF xDlg
//           oTab:bChange := {|| IF (oTab:nOption = 1, Accion1(), IF(oTab:nOption=2, Accion2(), Accion3() ) ) }
SkyPe: armando.lagunas@hotmail.com

Mail: armando.lagunas@gmail.com
Posts: 564
Joined: Thu Oct 13, 2005 09:23 AM
Re: CONTADOR Y ORDENAR REGISTROS
Posted: Wed May 24, 2017 01:40 PM
Hola,
Pues es como dice Armando, pero yo lo hago drectamente sobre el alias del dbf

Code (fw): Select all Collapse
tran(FI->(OrdKeyNo()),'@E 999,999')+" / "+tran(FI->(OrdKeyCount()),'@E 999,999')


No uso la clase taskpanel, uso c5vmenu que puedes descargar desde https://github.com/JoseluisSanchez/colossus y ahi tienes un ejemplo completo de como usarla.

Saludos,
José Luis

Continue the discussion