Search found 299 matches

by ADBLANCO
Mon Jul 20, 2009 4:25 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Define Font
Replies: 1
Views: 207

Re: Define Font

PRUEBA CON: SIZE -8.5,-16.5 BOLD

:oops:
TODO PUEDE SUCEDER!
by ADBLANCO
Mon Jul 20, 2009 4:12 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Boton en el get
Replies: 3
Views: 383

Re: Boton en el get

DEBERÍA USAR ON INIT , NO ON PAINT
by ADBLANCO
Thu Jul 16, 2009 8:16 pm
Forum: FiveWin para Harbour/xHarbour
Topic: DBF - índice no detecta un campo
Replies: 14
Views: 3446

Re: DBF - índice no detecta un campo

PUEDES PRESENTAR EL CODIGO DE GENERAR INDICES Y TAMBIEN EL SEEK
by ADBLANCO
Mon Jul 13, 2009 9:30 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Ordenar en Castellano
Replies: 6
Views: 645

Re: Ordenar en Castellano

"INDEX ON TransDat(APELLIDOS+NOMBRE,.T.) TO ..." pero no puedio hacer "INDEX ON TransDat(APELLIDOS)+TransDat(NOMBRE), .T.)", que es en realidad lo que deseo hacer. ES QUE LA FUNCION QUE DEFINISTES TIENE DOS PARÁMETROS, POR LO TANTO DEBE SER INDEX ON TransDat(APELLIDOS,.T.)+TransD...
by ADBLANCO
Mon Jul 13, 2009 8:12 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Ordenar en Castellano
Replies: 6
Views: 645

Re: Ordenar en Castellano

PRUEBA CON

INDEX ON TransDat(_FIELD->APELLIDOS)+TransDat(_FIELD->NOMBRE), .T.)

NO SE, PUDIERA TRABAJAR

:oops:
by ADBLANCO
Thu Jul 09, 2009 1:04 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Index Decreciente
Replies: 19
Views: 3123

Re: Index Decreciente

CORRIJO LA PROPUESTA:



INDEX ON STR(CAMPO1,N)+STR(999999-CAMPO2,6) TO FILE

DONDE N ES EL TAMAÑO DEL CAMPO1

:oops:
by ADBLANCO
Mon Jul 06, 2009 1:55 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Index Decreciente
Replies: 19
Views: 3123

Re: Index Decreciente

LO ÚNICO QUE SE ME OCURRE ES UTILIZAR UN ARTIFICIO,
SI EL NÚMERO MÁXIMO DEL SEGUNDO MIEMBRO ES 999999

GENERAR EL INDICE DE ESTA FORMA

INDEX ON CAMPO1+(999999-CAMPO2) TO FILE

Y HACER QUE LAS BUSQUEDAS UTILICEN EL MISMO ARTIFICIO



NO SE, PUDIERA SERVIR
:oops:
by ADBLANCO
Thu Jun 25, 2009 5:21 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Quisiera saber
Replies: 7
Views: 888

Re: Quisiera saber

Recomiendo hacer esto:

FUNCTION ALGO()
**********************
Local nOld_arch:=SELECT()
.
.
.
.
.
.
.
IF nOld_arch>0
SELECT(nOld_arch)
ENDIF
RETURN


Para evitar cualquier posibilidad de error
by ADBLANCO
Fri Jun 19, 2009 3:59 pm
Forum: FiveWin para Harbour/xHarbour
Topic: problema con REDEFINE SAY .. PICTURE FWH9.04 (Solucionado)
Replies: 2
Views: 389

Re: Un problema con REDEFINE SAY .. PICTURE FWH9.04

PRUEBA CON:
REDEFINE SAY oSay PROMPT TRANSFORM(nSaldo,"@( 9,999,999.99") ID 851 OF oDLG FONT oFont
by ADBLANCO
Tue May 26, 2009 8:13 pm
Forum: FiveWin para Harbour/xHarbour
Topic: database y browse
Replies: 9
Views: 1045

Re: database y browse

Prueba con :

REDEFINE BTNBMP oNbut[1] id 102 of oDlg resource "btnagregar","btnagrega1" ACTION eval({|| provee( oLbx, .T.,oMae,oBanpro )}) NOBORDER
by ADBLANCO
Tue May 26, 2009 6:22 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Leer una base sin permiso
Replies: 4
Views: 616

Re: Leer una base sin permiso

No creo que tenga nada que ver, pero el orden de las instrucciones no debiera ser:


EMPL->( dBCloseArea() )
WinExec("Net use \\FOSERVER\RRHH /delete",0)

en lugar de:


WinExec("Net use \\FOSERVER\RRHH /delete",0)

EMPL->( dBCloseArea() )
by ADBLANCO
Mon May 25, 2009 9:32 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Una ayudita con los TABS
Replies: 4
Views: 544

Re: Una ayudita con los TABS

Realmente no se, pero se me ocurre:

oTabs:aPrompts[1]:Disable()


:oops:
by ADBLANCO
Mon May 25, 2009 2:33 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Dialogo que muestre como avanza un proceso
Replies: 6
Views: 1438

Re: Dialogo que muestre como avanza un proceso

Cero problemas desde xp y/o vista (comprobado)
by ADBLANCO
Fri May 22, 2009 4:55 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ¿Como lo haceis vosotros?
Replies: 15
Views: 2055

Re: ¿Como lo haceis vosotros?

yO GENERO UN INDICE TEMPORAL, ES MUY RÁPIDO, MÁS SI SE GENERA EL EL DISCO DURO DE LA ESTACIÓN DE TRABAJO
by ADBLANCO
Thu May 21, 2009 9:01 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Una ayudita Please!
Replies: 4
Views: 382

Re: Una ayudita Please!

Gracias, Es exactamente lo que estaba buscando