Definindo Fonte para o sistema

[Scooby]

Bom Dia senhores.

Estou com a seguinte duvida, estou utilizando um arquivo .ini para que o usuário possa definir a fonte que será utilizada no sistema
bem como a largura e comprimento. 

Arquivo .Ini
FONTE_NOME=Tahoma
FONTE_ALTURA=5
FONTE_LARGURA=-14
LOGOMARCA_ARQUIVO=LogoSuc.Bmp
ICONE_ARQUIVO=IcoSuc.Bmp

Porém acontece o seguinte: fiz todas as configurações no sistema.

Procedure DefFonSys(oFon_,oBmp_,oIco_,vNomIco_) // Define a fonte do sistema
Local vFonNam:="",vNomLog:="",vNomIco:="",;
      nFonAlt:=0,nFonLar:=0
If !Empty(vTxtIni:=MemoRead(cCamPro_+"Success.Ini"))
   vFonNam:=RatTxt(vTxtIni,"FONTE_NOME=",0)
   nFonAlt:=Val(RatTxt(vTxtIni,"FONTE_ALTURA=",0))
   nFonLar:=Val(RatTxt(vTxtIni,"FONTE_LARGURA=",0))
   vNomLog:=RatTxt(vTxtIni,"LOGOMARCA_ARQUIVO=",0)
   vNomIco:=RatTxt(vTxtIni,"ICONE_ARQUIVO=",0)
EndIf
vFonNam:=AllTrim(If(Empty(vFonNam),"Tahoma",vFonNam))
nFonAlt:=If(Empty(nFonAlt),5,nFonAlt)
nFonLar:=If(Empty(nFonLar),-14,nFonLar)
vNomLog:=AllTrim(If(Empty(vNomLog),"LogoSuc.Bmp",vNomLog))
vNomIco:=AllTrim(If(Empty(vNomIco_),If(Empty(vNomIco),"IcoSuc.Bmp",vNomIco),vNomIco_))
Define Font oFon_ Name vFonNam Size nFonAlt,nFonLar
Define BitMap oBmp_ File(cCamPro_+vNomLog) Adjust
Define Icon oIco_ File(cCamPro_+vNomIco)

O problema que acontece é o seguinte, em algumas telas o formato da fonte, simplesmente não ocorre e o que é pior, o sistema ainda a transforma
em 'Negrito', gostaria de saber se alguém pode me ajudar com essa questão.

 

Imagem do erro: https://drive.google.com/open?id=1n6_xRz70ir5vUU4udwwE2qjACLvMRrmE

 

Att

[MatheusFarias]

As vezes quando trabalhava com fontes em objetos publicos isso acontecia, apos usar fontes locais somente sem reaproveitar a declaraçao dependendo de como esta sem MEMVAR na compilaçao isso pode ter como conflito.