Tcalex : insert a bitmap

Tcalex : insert a bitmap

Postby Silvio.Falconi » Mon Jan 20, 2020 6:12 pm

I Need to insert Two bitmaps on each day on mounth view.
Can now how male It pls
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7074
Joined: Thu Oct 18, 2012 7:17 pm

Re: Tcalex : insert a bitmap

Postby Silvio.Falconi » Sat Jan 25, 2020 10:21 am

I need to insert a bitmap on this position sample :

Image

I need this change because we do the differential collection for urban garbage and I wanted to insert the symbol linked to the day

Someone can help me please ?

Necesito este cambio porque hacemos la recolección diferencial para la basura urbana y quería insertar el símbolo vinculado al día


for a sample I tried to insert a text "Raccolta Carta" on header days
I not modified Tcalex.prg But I call an override

Image

perhaps I can change it call a function to set the text for each day but my customer want a bitmap with the symbol of type of urban garbage ( generally are 4)
Last edited by Silvio.Falconi on Sat Jan 25, 2020 10:49 am, edited 1 time in total.
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7074
Joined: Thu Oct 18, 2012 7:17 pm

Re: Tcalex : insert a bitmap

Postby Otto » Sat Jan 25, 2020 10:46 am

Hello Silvio,
same problem here: MO paper, Fr plastic and on We the rest of garbage. :-)
Do you have the icons ready.

In my software I use

@ 0,0 ;
BUTTONBMP ;
PROMPT "FW" ;
BITMAP here my icon
with no ACTION.

Maybe you can try this.
Where in source are the dates painted..


Best regards
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6346
Joined: Fri Oct 07, 2005 7:07 pm

Re: Tcalex : insert a bitmap

Postby Silvio.Falconi » Sat Jan 25, 2020 10:52 am

Otto wrote:Hello Silvio,
same problem here: MO paper, Fr plastic and on We the rest of garbage. :-)
Do you have the icons ready.

In my software I use

@ 0,0 ;
BUTTONBMP ;
PROMPT "FW" ;
BITMAP here my icon
with no ACTION.

Maybe you can try this.
Where in source are the dates painted..


Best regards
Otto


Otto I update my message
I wish insert the bitmap instead of the text on tcalex app
I Know How make a "BUTTONBMP" but this not is my problem, I asked another question
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7074
Joined: Thu Oct 18, 2012 7:17 pm

Re: Tcalex : insert a bitmap

Postby Otto » Sat Jan 25, 2020 11:55 am

Silvio,
can you post the lines of TCalex where the date is painted.
And is the source of TCalex in the Fivewin samples.
Then I try what I suggested.
Best regards
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6346
Joined: Fri Oct 07, 2005 7:07 pm

Re: Tcalex : insert a bitmap

Postby Silvio.Falconi » Sat Jan 25, 2020 12:14 pm

class Tcalex
Method Paintcell

dNextDay = ::dStart + ( ( nRow - 1 ) * 7 ) + nCol - 1

I add
cTypeGarbage:= LoadGarbage( dNextDay )

this return me a text ( it load on my calendar archive and return me the type of garbage)

then I add this cTypeGarbage .....sample

cText = " " + Str( Day( dNextDay ), 2 ) +cTypeGarbage

sample :
Image
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7074
Joined: Thu Oct 18, 2012 7:17 pm

Re: Tcalex : insert a bitmap

Postby Otto » Sat Jan 25, 2020 1:11 pm

Silvio, where is the source code of Tcalex.
Best regards
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6346
Joined: Fri Oct 07, 2005 7:07 pm

Re: Tcalex : insert a bitmap

Postby Silvio.Falconi » Sat Jan 25, 2020 4:32 pm

Fwh sources
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7074
Joined: Thu Oct 18, 2012 7:17 pm


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 65 guests