FontRequest and GetAttribute

[Juan Carlos]

I have found a problem when you load one font using the FontRequest I can't get the font properties because the instruction GetAttribute needs a number of Font here is the example:

Code: Select all

Fuente=FontRequest("Select one font")
SetFont(Fuente.name, Fuente.size) ;Here you get the name and size from the font.
SetFontColor(HexStr(Fuente.color)) ;I gives the font color.

 ;Here I try to get the anlialias, but the instruction GetAttribute needs a font number and with the FontRequest it is possible?
TextoAlias=GetAttribute(#FONT, Fuente, #ATTRFONTAA)
If TextoAlias=True
	SetFontStyle(#ANTIALIAS)
	SystemRequest("WARNING", "Font with antialias", "Ok", #REQICON_ERROR)
Else
	SystemRequest("WARNING", "Font without antialias", "ok", #REQICON_ERROR)
EndIf
TextOut(#CENTER, #CENTER, "TEXT OF TEST")

EscapeQuit(False)
Repeat
  WaitEvent
Forever

Is there any way to get the number of the font loaded with FontRequest for get all attributtes?
Thank you.

[SamuraiCrow]

I think you are looking for GetFontStyle(). GetAttribute() is only for fonts embedded using preprocessor macros because it is in the object library.

[Juan Carlos]

I think you are looking for GetFontStyle(). GetAttribute() is only for fonts embedded using preprocessor macros because it is in the object library.

Thank you for your idea but SetFontStyle isn't the solution because is not the same situation FontRequest than SetFontStyle.

[airsoftsoftwair]

You cannot get whether the font supports antialiasing because the system font requester doesn't return this information. This information is only available once a font is loaded so you need to load the font first.

[Juan Carlos]

You cannot get whether the font supports antialiasing because the system font requester doesn't return this information. This information is only available once a font is loaded so you need to load the font first.

But un the Code already you load the Font with the requester and the antialias propertie is assigned and the Font is showed with this, but the GetAttribute hasn't this propertie.

[Juan Carlos]

The idea is to can distinguish the True Type Font of Amiga traditional Font to set the anti-alysing in the True Type because if you set for default the Amiga Font isn't showed.

[airsoftsoftwair]

Hollywood can't tell the type of a font without loading it so just load it, query #FONTAA and then free it again.

[Juan Carlos]

But there isn't LoadFont like LoadBrush to get attributes.

[PEB]

Try OpenFont().

Code: Select all

OpenFont(1, "Arial", 36)
DebugPrint(GetAttribute(#FONT, 1, #ATTRFONTAA))
CloseFont(1)

[Juan Carlos]

Try OpenFont().

Code: Select all

OpenFont(1, "Arial", 36)
DebugPrint(GetAttribute(#FONT, 1, #ATTRFONTAA))
CloseFont(1)

No os this, I ask the Font with FontResquest.