64bit Font original code be changed-Solved

64bit Font original code be changed-Solved

Postby richard-service » Wed Aug 03, 2022 9:45 am

Dear Antonio, Mr.Rao

Look 2017 build Application screen shot。
Win10 and Win11 no problem。

Image

Look 2206 build Application screen shot
Win10 and Win11 problem.
Image

Same as full source code。
I use it below:
Code: Select all  Expand view

DEFINE FONT oFontGraph NAME "MS Sans Serif" SIZE 0,-10
 
Best Regards,

Richard

Harbour 3.2.0dev (r2402101027) => Borland C++ v7.7 32bit
MySQL v8.0 /ADS v10
Harbour 3.2.0dev (r2011030937) => Borland C++ v7.4 64bit
User avatar
richard-service
 
Posts: 803
Joined: Tue Oct 16, 2007 8:57 am
Location: New Taipei City, Taiwan

Re: 64bit Font original code be changed-Solved

Postby richard-service » Mon Aug 08, 2022 1:02 am

Tgraph Need to Redeclare the variable When use FWH2206
But FWH170x NO Redeclare the variable and work fine.

Code: Select all  Expand view

oGraph:aFont[x] := TFont():New("MS Sans Serif",0,-12,.F.,.f.,0,0,,.F.,.F.,.F.)
 
Best Regards,

Richard

Harbour 3.2.0dev (r2402101027) => Borland C++ v7.7 32bit
MySQL v8.0 /ADS v10
Harbour 3.2.0dev (r2011030937) => Borland C++ v7.4 64bit
User avatar
richard-service
 
Posts: 803
Joined: Tue Oct 16, 2007 8:57 am
Location: New Taipei City, Taiwan

Re: 64bit Font original code be changed-Solved

Postby Antonio Linares » Mon Aug 08, 2022 7:21 am

Dear Richard,

Have you solved it ? :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42081
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: 64bit Font original code be changed-Solved

Postby richard-service » Tue Aug 09, 2022 4:11 am

Antonio Linares wrote:Dear Richard,

Have you solved it ? :-)


Dear Antonio,

Look it below:

Code: Select all  Expand view

oGraph:aFont[1] := TFont():New("Arial Unicode MS",0,-12,.f.,.f.,0,0,,.f.,.f.,.f.) // Title
oGraph:aFont[2] := TFont():New("Arial Unicode MS",0,-12,.F.,.f.,0,0,,.F.,.F.,.F.) // xFont
oGraph:aFont[3] := TFont():New("Arial Unicode MS",0,-12,.F.,.f.,0,0,,.F.,.F.,.F.) // yFont
oGraph:aFont[4] := TFont():New("Arial Unicode MS",0,-10,.F.,.f.,0,0,,.F.,.F.,.F.) // Legends
oGraph:aFont[5] := TFont():New("Arial Unicode MS",0,-12,.F.,.f.,0,0,,.F.,.F.,.F.) // Subtitle
oGraph:aFont[6] := TFont():New("Arial Unicode MS",0,-12,.F.,.f.,0,0,,.F.,.F.,.F.) // xTitle
oGraph:aFont[7] := TFont():New("Arial Unicode MS",0,-12,.F.,.f.,0,0,,.F.,.F.,.F.) // yTitle
oGraph:aFont[8] := TFont():New("Arial Unicode MS",0,-12,.F.,.f.,0,0,,.F.,.F.,.F.) // Values
 
Best Regards,

Richard

Harbour 3.2.0dev (r2402101027) => Borland C++ v7.7 32bit
MySQL v8.0 /ADS v10
Harbour 3.2.0dev (r2011030937) => Borland C++ v7.4 64bit
User avatar
richard-service
 
Posts: 803
Joined: Tue Oct 16, 2007 8:57 am
Location: New Taipei City, Taiwan


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 73 guests