Cambiar font a un @x,y browse
Posted: Tue Jun 05, 2012 7:53 pm
¿Como puedo cambiarle el font a un @x,y browse?
@19.5,0.1 BROWSE oBrw_Vta OF oWnd_Ventas ;
HEADERS hb_strtoutf8(TXTp00_010), hb_strtoutf8(TXTp00_011), hb_strtoutf8(TXTp00_012), hb_strtoutf8(TXTp00_013), " ", hb_strtoutf8(TXTp00_014) ;
COLSIZES 125,332,86,95,45,90 ;
FIELDS vbpantx[ oBrw_Vta:nAt ][ 1 ],;
vbpantx[ oBrw_Vta:nAt ][ 2 ],;
iif(vbpantx[ oBrw_Vta:nAt ][ 3 ]=0,' ',transform(vbpantx[ oBrw_Vta:nAt ][ 3 ],picant)),;
iif(vbpantx[ oBrw_Vta:nAt ][ 3 ]=0,' ',transform(vbpantx[ oBrw_Vta:nAt ][ 4 ],picst)),;
If(valtype(vbpantx[ oBrw_Vta:nAt ][ 6 ])='C' .and. vbpantx[ oBrw_Vta:nAt ][ 6 ]='P','ABF',space(6)),;
iif(vbpantx[ oBrw_Vta:nAt ][ 3 ]=0,' ',transform(vbpantx[ oBrw_Vta:nAt ][ 5 ]- vbpantx[ oBrw_Vta:nAt ][ 10 ],picst));
SIZE 776,400
oBrw_Vta:SetArray( vbpantx )
oBrw_Vta:nRowPos = 2
oBrw_Vta:nAt = 2
Desde ya se agradece.
@19.5,0.1 BROWSE oBrw_Vta OF oWnd_Ventas ;
HEADERS hb_strtoutf8(TXTp00_010), hb_strtoutf8(TXTp00_011), hb_strtoutf8(TXTp00_012), hb_strtoutf8(TXTp00_013), " ", hb_strtoutf8(TXTp00_014) ;
COLSIZES 125,332,86,95,45,90 ;
FIELDS vbpantx[ oBrw_Vta:nAt ][ 1 ],;
vbpantx[ oBrw_Vta:nAt ][ 2 ],;
iif(vbpantx[ oBrw_Vta:nAt ][ 3 ]=0,' ',transform(vbpantx[ oBrw_Vta:nAt ][ 3 ],picant)),;
iif(vbpantx[ oBrw_Vta:nAt ][ 3 ]=0,' ',transform(vbpantx[ oBrw_Vta:nAt ][ 4 ],picst)),;
If(valtype(vbpantx[ oBrw_Vta:nAt ][ 6 ])='C' .and. vbpantx[ oBrw_Vta:nAt ][ 6 ]='P','ABF',space(6)),;
iif(vbpantx[ oBrw_Vta:nAt ][ 3 ]=0,' ',transform(vbpantx[ oBrw_Vta:nAt ][ 5 ]- vbpantx[ oBrw_Vta:nAt ][ 10 ],picst));
SIZE 776,400
oBrw_Vta:SetArray( vbpantx )
oBrw_Vta:nRowPos = 2
oBrw_Vta:nAt = 2
Desde ya se agradece.