FiveTech Software tech support forums

... DEFINE XLS FORMAT ndeci PICTURE '##,###,###.##' DEFINE XLS FORMAT ndeci1 PICTURE '##,###,##0.#' DEFINE XLS FONT nFont1 NAME "Arial" HEIGHT 14 BOLD DEFINE XLS FONT nFont2 NAME "Arial" BOLD XLS oFileXLS FILE "concent.xls" xls col 1 width 12 of ofilexls xls col 3 width 12 of ofilexls xls col ...

... nDesc:=0 nDescFinal:=0 cClave:=Space(20) nCantidad:=0 SET 3DLOOK ON // Microsoft 3D Look DEFINE FONT oFont62 NAME "monospac821 bt" SIZE 0, -18 BOLD DEFINE FONT oFont61 NAME "Arial" SIZE 0, -10 BOLD // DEFINE FONT oFont65 NAME "monospac821 bt" SIZE 0, -12 BOLD DEFINE DIALOG oDlg6 FROM 5,.5 TO ...

... nDesc:=0 nDescFinal:=0 cClave:=Space(20) nCantidad:=0 SET 3DLOOK ON // Microsoft 3D Look DEFINE FONT oFont62 NAME "monospac821 bt" SIZE 0, -18 BOLD DEFINE FONT oFont61 NAME "Arial" SIZE 0, -10 BOLD // DEFINE FONT oFont65 NAME "monospac821 bt" SIZE 0, -12 BOLD DEFINE DIALOG oDlg6 FROM 5,.5 TO ...

Gracias ya quedo,

el valor quedo asi

DEFINE FONT oFont NAME 'Courier New' SIZE 0,-40 BOLD NESCAPEMENT 1800



Mauricio

Pues me ocurre igual:
DEFINE FONT oFont2 NAME "MS SANS SERIF" SIZE 0,-10 BOLD
REDEFINE COMBOBOX oMesTc VAR cMestc ITEMS aMes ID 108 FONT oFont2 OF oDlg

Error E0030 Syntax error: "parse error at 'COMBOBOX'"

Un saludo,
Manuel


FW 2.8 (Octubre9/20079
xHarbour Compiler build 0.99.61 (SimpLex)

Hola..

Prueba con esto..

DEFINE FONT oFont NAME "Courier New" SIZE 10, -16 bold


Luego solo tienes que usar el objeto oFont en donde quieras.


Saludos.

Elías Torres.

... queres cambiar el font cuando la celda esta seleccionada: Define Font oFont1 Name "Arial" Size 0, -12 Define Font oFont2 Name "Arial" Size 0, -12 Bold Italic oBrw:bFont:= {|nRow,nCol,nStyleLine| Iif( nStyleLine = 3 , oFont1:hFont , oFont2:hFont ) } Todas las celdas: oBrw:bFont:= {|nRow,nCol,nStyleLine| ...

... aX[2] := LoadBitMap( GetResources(), "Z_Red_X") aX[3] := LoadBitMap( GetResources(), "Z_Blank") endif DEFINE FONT oFont NAME "System" SIZE 8, 16 BOLD // 6, 15 DEFINE DIALOG oDlg of MainWnd NAME "Aktivite" REDEFINE BROWSE oBrw ID 999 OF oDlg ; MESSAGE "You may open multi-copies, DblCkick to edit, ...

... DEFINE dialog odlg resource "Inventario" redefine group ogrp id 600 of odlg color CLR_RED,RGB(230,184,94) DEFINE font oFont2 name "Courier New" bold redefine say id 4001 of odlg color CLR_RED, RGB(230,184,94) redefine say id 4002 of odlg color CLR_RED, RGB(230,184,94) redefine say id 4003 of ...

... ; SendMessage( ::oTree:hWnd, TVM_ENSUREVISIBLE, 0, ::hItem ) And here's what I added to TTreeVie.prg (ehnancements in bold): [ Note: it seems bold doesn't work inside the code bbcode, so look out for [ b ] .... [ / b ] and strip it out from the actual code METHOD CollapseAll( ...

... oMsgBar, cDefaultMsg, cBuffer ) local nClrText:= oMsgBar:nClrText local cMsg, oFont DEFINE FONT oFont NAME "Ms Sans Serif" SIZE 0,-10 BOLD if Len( cBuffer ) > 0 cMsg:= "Buscando: " + upper(cBuffer) oMsgBar:nClrText:= CLR_BLUE oMsgBar:SetFont(oFont) else cMsg:= cDefaultMsg endif ...

... "bamari" ) } FIELD CON_INM aDia := C_RESERDIA( aDia, dFecha1 ) // calcula cabeceras listbox DEFINE FONT oFont NAME "MS Sans Serif" SIZE 0, -14 BOLD ABRE ("RESERVA", "RESERVA", "RESERVA" ) ORDSETFOCUS("CON_INM") ABRE ( "inqui", "inqui", "inqui" ) ORDSETFOCUS("CON_INM") ABRE ("fincas", "fincas", ...

... PRINT oPrn NAME "COTIZACIONES" PREVIEW FROM USER DEFINE FONT oFont NAME "Arial" SIZE 0,-12 OF oPrn DEFINE FONT oFontV NAME "Arial" SIZE 0,-4.5 BOLD NESCAPEMENT 900 OF oPrn PAGE oPrn:cmsay(00,00,oemtoansi("Elisa Flores y Compa¤ia Limitada"),oFont) oPrn:cmsay(01,00,oemtoansi("Barraca de Maredas"),oFont) ...

... icon when used with DBCOMBO, but it works fine with the regular FWH COMBOBOX code. If I clickon the box itself, it changes color and has a bold line beneath it, but no list. Tim

... oFont2 Name "Arial" Size 0,18 Of oPrint Define Font oFont5 Name "Arial" Size 0,16 Of oPrint Define Font oFont3 Name "Arial" Size 0,12 Of oPrint Bold UnderLine Define Font oFont4 Name "Arial" Size 0,24 Of oPrint Bold Italic Define Pen oPen Style 0 width 5 nVertical := oPrint:nVertRes() nHorizontal ...