Para Manuel Mercado

[JoseGS]

Hola Manuel

Tengo un problema con TSBrowse:

Resulta que estoy intentando hacer un browse con titulos de columnas en vertical y no funciona...

Aqui el codigo

REDEFINE BROWSE oBrw9 ID 104 OF oFld:aDialogs[3] UPDATE ALIAS "RDIARIO"
ADD COLUMN TO oBrw9 DATA oBrw9:nAT HEADER "No" ALIGN 1,1,1 SIZE 25 NOHILITE

ADD COLUMN TO oBrw9 DATA {||RDIARIO->C1A+CRLF+RDIARIO>C1B+CRLF+RDIARIO>C1C} "AAA"+CRLF+"BBB"+CRLF+"CCC" ALIGN 0,1,1 SIZE 100

ADD COLUMN TO oBrw9 DATA FieldWBlock('C2',SELECT()) HEADER "TIPO DE PACIENTE" ALIGN 0,0,0

oBrw9:SetAlign( 3, 2, 3 ) // Cambio la orientacion del titulo de la columna 3 a vertical

oBrw9:nHeightCell += 25
oBrw9:nHeightHead += 14
oBrw9:oBrush := oBrushX

Utilizo FWH + TSBROWSE 8


gRACIAS

[mmercado]

Hola José:

Utilizo FWH + TSBROWSE 8

Mándame un mail para enviarte TSBrowse V.9.0 Beta.

Un abrazo.

Manuel Mercado Gómez.

[JoseGS]

Hola Manuel
Gracias por contestar
mi email es:

guillermosanchez@movistar.com.pa

Saludos desde Panama