FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Agregar columnas a xbrowse
Posts: 158
Joined: Tue Oct 11, 2005 03:10 PM
Agregar columnas a xbrowse
Posted: Fri Oct 30, 2009 06:46 AM
Alguien puede ayudarme en esto:

Tengo un browse (ya creado), con 2 columnas, pero necesito agregar otras 2.
Lo hago con

oCol:=o:AddCol()
...
....
...
Todo bien hasta aqui.

Pero necesito DISMINUIR el tamaño de la columa número 2, para que las columnas agregadas "quepan" en el browse, y no sea necesario utilizar las flechas derecha e izquierda, Entonces si hago oCol[2]:=XXX, obtengo el siguiente error

Application
===========
Path and name: P:\Fuentes\xHarbour\Pagos\BIN\Copay.Exe (32 bits)
Size: 2,358,784 bytes
Time from start: 0 hours 0 mins 2 secs
Error occurred at: 30/10/2009, 00:27:05
Error description: Error BASE/1004 Class: 'NIL' has no exported method: EVAL
Args:
[ 1] = U

Stack Calls
===========
Called from: => EVAL(0)
Called from: source\Rglib\xbrowse.prg => TXBRWCOLUMN:PAINTDATA(6167)
Called from: source\Rglib\xbrowse.prg => TXBROWSE:DRAWLINE(1275)
Called from: source\Rglib\xbrowse.prg => TXBROWSE:GOTOP(2335)
Called from: source\Rglib\tmaint.prg => (b)TMAINT:PONBROW(356)


Si no CAMBIO el NWIDTH de la columna no se produce el error

No puedo aumentar el tamaño del browse, porque es un browse GENERICO, para todos mis mantenimientos.

Por su atención muchas gracias
Posts: 1076
Joined: Fri Oct 07, 2005 10:41 PM
Re: Agregar columnas a xbrowse
Posted: Sun Nov 01, 2009 07:30 AM

ricardog,

Puedes hacer esto.

oBrw:aCols[2]:nWidth := xxx

Saludos

William, Morales

Saludos



méxico.sureste

Continue the discussion