FiveTech Software tech support forums

Hi Fw's. ChooseFont function can not set correctly the dimension of character passed in Array parameter and if I change the dimension is not the set value correctly. For Ex. I set in the array -12, ChooseFont 9, select 12 and return -16!!! Another problem is if I press "Cancel" button after any sett...

... anche ignorare la cosa dato che quello che serve a te è solo il font restituito) Purtroppo invece mi serve il nome del font, la dimensione e se è bold, italico e quanto ho definito nella variabile aFont, con la quale costruisco il font sulla stampante... Grazie, cmq. Posto sull'internazionale! ...

Prova ora: #define LF_HEIGHT 1 #define LF_WIDTH 2 #define LF_ESCAPEMENT 3 #define LF_ORIENTATION 4 #define LF_WEIGHT 5 #define LF_ITALIC 6 #define LF_UNDERLINE 7 #define LF_STRIKEOUT 8 #define LF_CHARSET 9 #define LF_OUTPRECISION 10 #define LF_CLIPPRECISION 11 #define LF_QUALITY 12 #define LF_PITCHA...

Ciao FW's devo rendere interattiva a scelta di font per la stampa, non riesco a verificare le fasi di annullamento da parte dell'utente, infatti se seleziona un qualsiasi font e poi annulla nell'array ritorna l'impostazione effettuata. Inoltre non mi sembra funzionare bene l'impostazione della dimen...

... "A. File Number" ) // Init... cSearch := aSearch[01] // Init... DEFINE ICON oIcon RESOURCE "AIR" DEFINE FONT oFont NAME GetSysFont() SIZE 0,-12 BOLD DEFINE FONT oFont2 NAME GetSysFont() SIZE 0,-14 BOLD MENU oMenu MENUITEM "&Close" ENDMENU DEFINE WINDOW oWnd FROM 0, 0 TO nScrnH, nScrnW ; ...

Maurilio, > 1) Is possible change the font of group name to bold? I don't think so. That may required to implement ownerdraw support. > 2) Is possible change the bitmap when the tree is open/closed? (I couldn't do it in testtrer.prg) > Yes, it ...

I'm testing TTreeView class and I have pending any questions: (I tested testtrer.prg) 1) Is possible change the font of group name to bold? 2) Is possible change the bitmap when the tree is open/closed? (I couldn't do it in testtrer.prg) 3) Is possible change the bitmap size to 32x32, 48x48, ...

... 90 go Bottom cFol_Fac := Inv_Cfa1->Fol_Fac + 1 go top DEFINE Font oFont1 Name "Arial" Size 0,-12 DEFINE Font oFont2 NAME "ARIAL" SIZE 0,50 BOLD DEFINE DIALOG oDlgEdit1 ResName "IngresoCompra" TITLE OemToAnsi("Ingreso Facturas de Compra") Redefine BtnGet oFol_Fac Var cFol_Fac Id 101 Of oDlgEdit1 ...

Milan: DEFINE FONT oFont NAME "ARIAL" SIZE 0,-9 DEFINE FONT oFont1 NAME "ARIAL" SIZE 0,-9 BOLD DEFINE FONT oFont5 NAME "ARIAL" SIZE 0,-12 BOLD You can: -Define a font to use with the browse: REDEFINE LISTBOX oBrwMov fields ID 999 OF oDlg ; ALIAS (cALIAS) FONT oFont; ...

... := .T. DEFINE FONT oFonr NAME "ARIAL" SIZE 0,-7 OF oPrn DEFINE FONT oFonc NAME "ARIAL" SIZE 0,-5 OF oPrn DEFINE FONT oFont NAME "ARIAL" SIZE 0,-15 BOLD OF oPrn DEFINE FONT oFonm NAME "ARIAL" SIZE 0,-19 BOLD OF oPrn DEFINE FONT oFong NAME "ARIAL" SIZE 0,-22 OF oPrn PAGE oPrn:CmSay(vRow,1,vTitle,oFont,2,CLR_BLUE) ...