FiveTech Software tech support forums

... nCharSet, nOutPrecision, nClipPrecision,; nQuality, oDevice, nPitchFamily ) creates a font with exactly the same parameters using Windows function CreateFont(). CreateFontIndirect() uses LOGFONT structure with the same values to create a font. Both functions result in the same font. TFont class ...

... Es como si FW utilizara un 'pinzel' y dibujara la letra en lugar de coger la fuente en si. Fonts are not generated by FWH. FWH calls Windows API CreateFont( <params> ) and Windows creates the fonts. FWH does not draw fonts on the screen, it is Windows OS that draws the font on the screen. ...

Antonio buenos dias, gracias por la ayuda Agrego la VM.LIB (xharbour), y me manda estos errorres :( :( Proyecto: Kept5, Entorno: BorlandDLL: [1]:Harbour.Exe Source\Tseguro.prg /m /n /es2 /ki /iP:\32bits\xharbour\include;P:\32bits\FWH\INCLUDE /i /oObj\Tseguro.c xHarbour Compiler build 1.2.1 (SimpLex)...

Tim,

really strange

Could you add this function and try it again ?

function CreateFont()

return nil

... LOADIMAGE,LOADBITMAP,LOADBITMAPEX,OPENIMAGE,OPENBITMAP,CREATESOLIDBRUSH,CREATEHATCHBRUSH,CREATEFONT,LOADICON,WINDOW2BITMAP WVW_DLGSETICON,WVW_CREATEDIALOGDYNAMIC,WVW_CREATEFONT,WVW_SETPOPUPMENU,WVW_CREATEMENU,WVW_CREATEPOPUPMENU,WVW_GETMENU ...

... LOADIMAGE,LOADBITMAP,LOADBITMAPEX,OPENIMAGE,OPENBITMAP,CREATESOLIDBRUSH,CREATEHATCHBRUSH,CREATEFONT,LOADICON,WINDOW2BITMAP WVW_DLGSETICON,WVW_CREATEDIALOGDYNAMIC,WVW_CREATEFONT,WVW_SETPOPUPMENU,WVW_CREATEMENU,WVW_CREATEPOPUPMENU,WVW_GETMENU ...

... (LPCTSTR)IDI_APPLICATION); wcex.hCursor = LoadCursor(NULL, IDC_ARROW); wcex.lpszClassName = WndClass00; RegisterClassEx(&wcex); HFONT hfont0 = CreateFont(-11, 0, 0, 0, 0, FALSE, FALSE, FALSE, 1, 0, 0, 0, 0, ("MS Sans Serif")); HWND hwnd = CreateWindowEx(0, ("WndClass0"), ...

... 178oFnt := TFont():New( "Courier New", 0, -11,,,,, 700,,,, ARABIC_CHARSET, 3, 2, 1, oPrn ) Detailed description on CreateFont() can be found at MSDN . p.s. Antonio, would it be possible for DEFINE FONT to be enhanced so we could pass the character set too? TIA

... cMDIStruct() cMimeDec() cMimeEnc() cNewFileName() cNtxKey() ColorsQty() CPUType() CreateCare() CreateCDC() CreateDC() CreateDlgIndirect() CreateFont() CreateHatchBrush() CreateMenu() CreateOLEObject() CreatePatternBrush() CreatePen() CreatePopUpMenu() CreateSolidBrush() CreateWindow() ...

... it is a Windows own GDI object. You may have to destroy the previous handle of the font, using DeleteObject() and then create a new font using CreateFont() http://msdn.microsoft.com/en-us/library/dd183499(VS.85).aspx

Manuel, La diferencia que indicas viene de los parámetros que usa CreateFont(). Mira lo que comenta el API de Windows: http://msdn.microsoft.com/en-us/library/ms534214(VS.85).aspx nHeight [in] Specifies the height, in logical units, of the font's character ...

... error: Macro redefinition of 'CreateDC'. D:\COMPILER\xHB\c_include\win\wingdi.h(3825): error: Macro redefinition of 'CreateFont'. D:\COMPILER\xHB\c_include\win\wingdi.h(3826): error: Macro redefinition of 'CreateIC'. D:\COMPILER\xHB\c_include\win\wingdi.h(3832): error: ...

Dear Dutch, I use CreateFont() and it works perfectly now. I'm interested on this topic for other nonlatin languages, like Arabic which has the additional problem that mixes left-to-right with right-to-left text in a single row. Could ...

Dear Antonio,

I use CreateFont() and it works perfectly now.

Regards,
Dutch

Dutch,

I really don't know it. You should google for some info about it.

Maybe CreateFont() supports a parameter for "scripts"