Search found 26 matches: ofonte

Return to advanced search

Re: Imprimir fechaq

Hola
.......
SET DATE FORMAT "DD/MM/YYYY"
dFecha := DATE()
......
......
oPrn:CmSay(nRow, 1, DTOC(dFecha), oFontE)

......
by Willi Quintana
Tue Jul 11, 2023 1:06 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Imprimir fechaq
Replies: 3
Views: 228

Re: To Mister Nages - xBrowser

Mister Nages, Did not work. Aadd (aHilite, {Upper (SubStr (cMessage, start), (endFinal - start) + 1)),; oFonte_Botao, nil, nil}) http://am2tecnologia.com.br/sample/exemplo4.jpg Att., Oliveiros Junior Try putting SetBkMode( hDC, 1 )  before calling FW_SayTextHilite(...)
by nageswaragunupudi
Wed Aug 19, 2020 4:27 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: To Mister Nages - xBrowser
Replies: 21
Views: 3048

Re: To Mister Nages - xBrowser

Mister Nages,
Did not work.

Aadd (aHilite, {Upper (SubStr (cMessage, start), (endFinal - start) + 1)),;
oFonte_Botao, nil, nil})

Image
Att.,

Oliveiros Junior
by oliveiros junior
Tue Aug 18, 2020 8:55 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: To Mister Nages - xBrowser
Replies: 21
Views: 3048

Re: To Mister Nages - xBrowser

WITH OBJECT aBrowser[2] WITH OBJECT :aCols[ 1 ] :cHeader := "" :oHeaderFont := oFonte_padrao :nHeadStrAlign := AL_CENTER :nWidth := 80 :bStrData := { || AllTrim( DToC( oMensagem:getValueByPos( 2 ) ) ) } :nDataStrAlign := AL_TOP :nCellheight := 20 :oDataFont := oFonte_botao :SetColsAsRows( ...
by oliveiros junior
Mon Aug 17, 2020 7:33 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: To Mister Nages - xBrowser
Replies: 21
Views: 3048

Re: To Mister Nages - xBrowser

Thank you mister nages, 1) how would this refresh occur? WITH OBJECT :aCols[ 3 ] :bPaintText := <|oCol, hDC, cText, aRect, aColors| FW_SayTextHilite( hDC, cText, aRect, oFonte_Browse, aColors[ 1 ], aColors[ 2 ], ; { aHilite } ) Return NIL > END There are two browsers when the first line change...
by oliveiros junior
Sat Aug 15, 2020 1:52 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: To Mister Nages - xBrowser
Replies: 21
Views: 3048

Re: Fwh19.05 - New Class TDockPnel

... is something missing in class TGRAPH :?: I had a look at it, but couldn't find it. //oGraph:SetArrayFonts( { oFont2, oFont, oFont1, oFont, oFontB, oFontE, oFont1, oFont1, oFontB } ) I disabled this line and it works perfect without problems. Application =========== Path and name: I:\___PANEL4\PANEL.exe ...
by cnavarro
Tue Jun 04, 2019 2:48 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Fwh19.05 - New Class TDockPnel
Replies: 17
Views: 3397

Re: Fwh19.05 - New Class TDockPnel

... is something missing in class TGRAPH :?: I had a look at it, but couldn't find it. //oGraph:SetArrayFonts( { oFont2, oFont, oFont1, oFont, oFontB, oFontE, oFont1, oFont1, oFontB } ) I disabled this line and it works perfect without problems. Application =========== Path and name: I:\___PANEL4\PANEL.exe ...
by ukoenig
Tue Jun 04, 2019 2:03 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Fwh19.05 - New Class TDockPnel
Replies: 17
Views: 3397

Re: EXCESS RELEASE OF FONT - oFonte:End()

Thanks MR.Nages :D
by MGA
Sat Jun 10, 2017 12:52 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: EXCESS RELEASE OF FONT - oFonte:End()
Replies: 10
Views: 1504

Re: EXCESS RELEASE OF FONT - oFonte:End()

do not end font in timers or valid clauses.

What you need to do after the end of MDICHILD, do it in oWnd:bPostEnd
by nageswaragunupudi
Fri Jun 09, 2017 9:37 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: EXCESS RELEASE OF FONT - oFonte:End()
Replies: 10
Views: 1504

Re: EXCESS RELEASE OF FONT - oFonte:End()

Obrigado Vilian.
by MGA
Thu Jun 08, 2017 9:14 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: EXCESS RELEASE OF FONT - oFonte:End()
Replies: 10
Views: 1504

Re: EXCESS RELEASE OF FONT - oFonte:End()

SGS,

IF your program is creating a .log file with this message, certainly you have what I wrote in my previous message in somewhere(Eg: Other functions, etc). Fix it and .log file will not be created.
by vilian
Thu Jun 08, 2017 7:34 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: EXCESS RELEASE OF FONT - oFonte:End()
Replies: 10
Views: 1504

Re: EXCESS RELEASE OF FONT - oFonte:End()

Vilian, oFonteBotao: = TFont (): Novo ('Lucida Console', -0, -12, .f.,. F.) Define janela s_oWndMesas título '. :: Mesas ::.' Mdichild de M-> oWnd vscroll @ 10,10 BTNBMP aMesas [n] OF s_oWndMesas; TOP TAMANHO 100,100; PROMPT cDescricao 2007; RECURSO MESA_FECHADA; FONT oFonteBotao ACTION (MSGINFO ...
by MGA
Thu Jun 08, 2017 7:17 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: EXCESS RELEASE OF FONT - oFonte:End()
Replies: 10
Views: 1504

Re: EXCESS RELEASE OF FONT - oFonte:End()

SGS,

Look at your code and search for thinks like oObj:oFont := oFont
You must replace it for oObj:SetFont( oFont ) or use its FONT clause.
by vilian
Thu Jun 08, 2017 7:02 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: EXCESS RELEASE OF FONT - oFonte:End()
Replies: 10
Views: 1504

Re: EXCESS RELEASE OF FONT - oFonte:End()

Villian,

The problem happens when you press ESC on a WINDOW. If I close the window by X it works fine.
by MGA
Thu Jun 08, 2017 6:48 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: EXCESS RELEASE OF FONT - oFonte:End()
Replies: 10
Views: 1504
Next

Return to advanced search