FiveTech Software tech support forums

... aRspNm[oBrw:nArrayAt]["estado"]) } ,;
{ CLR_WHITE,clrEstSelec("S") }) }
:SetFont( oFont1Cja )

END

WITH OBJECT oBrw

//Colocamos los titulos a las columnas
FOR j:=1 TO len(::aColTt)
:aCols[j]:cHeader := ::aColTt[j]
:aCols[j]:oHeaderFont = oFontCja
NEXT

//Ahora las especiales ...

... Titulo del grafico
cTipo -> Un tipo de grafico simple de google graph (PieChart, BarChart, ColumnChart, etc)
aColumnsData -> Array con los titulos de las columnas de los datos a mostrar en el grafico (2 columnas, 1 fila)
aData -> Array con los los datos a mostrar en el grafico (2 columnas, n ...

... PARA FIJAR O NO ULTIMO CAMPO INDICE.
<ExpC1> NOMBRE (SIN EXTENSION) DE LA TABLA XBASE (.dbf) PRINCIPAL A CAPTAR.
<Arr1> ARREGLO CON LOS TITULOS DESEADOS PARA CADA CAMPO DE LA TABLA XBASE
PRINCIPAL A CAPTAR.
<Arr2> ARREGLO CON LOS NOMBRES DE LAS TABLAS XBASES AUXILARES PARA CADA
CAMPO ...

... height is .25"
CELLBORDERS SINGLE ; // Outline cells with thin border
COLSHADE aMarca; // Sombras en columnas
HEADERROWS 1; // dos lineas de titulos
HEADER aFldNames;
HEADERFONTSIZE 10;
HEADERAPPEAR BOLD_ON;
HEADERHALIGN CENTER //;

DEFINE CELL FORMAT oRTF ;
CELLSHADE aMarca
lFormato:=.F ...

... height is .25"
CELLBORDERS SINGLE ; // Outline cells with thin border
COLSHADE aMarca; // Sombras en columnas
HEADERROWS 1; // dos lineas de titulos
HEADER aFldNames;
HEADERFONTSIZE 10;
HEADERAPPEAR BOLD_ON;
HEADERHALIGN CENTER //;

DEFINE CELL FORMAT oRTF ;
CELLSHADE aMarca
lFormato:=.F ...

Buenas tardes !!!

Buscando en Google, lo primero que aparece es este enlace del Ministerio de Educación.

https://www.educacionyfp.gob.es/colombi ... jeros.html

Mucha suerte para tu amiga.

Un abrazo,

RAO...abusando de tu generosidad como puedo agregarle a una funcion tuya que ya hace tiempo posteaste de pasar un array a excel
poder agregar los titulos
function ArrayToExcel2( aData )

local oExcel, oBook, oSheet
local cText, oClp, nCols := 0

if ( oExcel := ExcelObj() ) == nil
? "Excel not ...

Una pantalla negra sin titulos, puedes ver la clase TMetro, que tiene el estilo que buscas.
#include "fivewin.ch"Function main&#40;&#41;LOCAL oWnd, cTitle, oFontDEFINE FONT oFont NAME "Segoe UI Light" SIZE 0, -52 cTitle := "Mi Pantalla"DEFINE WINDOW oWnd STYLE nOr&#40; WS_POPUP, WS_VISIBLE &#41 ...

... 40;,,,,,, &#123; "AMOUNT", "QTY", "TOWN" &#125; &#41; &#125; &#41;return nil


Buen dia, ya funciono, yo staba tomando los nombres de las columnas COLUMNS, creyendo era eso por ser aCols, es decir los nombres de los campos y no los nombre de los titulos de las columnas HEADERS, gracias, saludos...

Saludos a todos los Compañeros y Maestros del Foro:

Estoy desarrollando una pequeña aplicación que necesita algunos botones con titulos e imagenes y la clase TBtnBMP es perfecta, me pregunto si hay alguna forma de hacer que los titulos o Captions se muestren en Vertical, ya que al dibujar el botón ...

Gracias Artu01 nuevamente por tu mensaje.

El problema de pdf se resolvió ya, puedo generar el pdf y la previsualización e imprimir el reporte.

El tema es que el reporte sale sin líneas, cabezal titulos del detalle y nada más

https://ibb.co/C9SRSrt

Sin embargo la tabla tiene 2000 registros mas o menos

Hola Lubin:
Con oLbx:aHeaders obtienes el arreglo con los titulos.
Con oLbx:bLine obtienes el bloque de codigo con los campos
Espero te sirva como inicio.

... posible extraerle desde otra función de su objeto oLBx asociado y sacar una relacion de los campos de las columnas (FIELDS) que lo conforman y los titulos (HEADER) ?

Algo Asi :

REDEFINE LISTBOX oLbx FIELDS M->Campo1, M->Campo2, M->Campo3 ;
HEADERS "Codigo","Nombre" ,"Apellido";
FIELDSIZES 25 ...

Excelente Otto.

Muchas gracias.
Saludos
Jorge

Hello Jorge,
I'm not sure if I got your question right.
Best regards,
Otto

oLbx:aHeaders:={ "K","NR.", "test","-> test2","|| test3" }
oLbx:refresh()
oLbx:SetFocus()