FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour cGetFile function different version
Posts: 866
Joined: Tue Oct 16, 2007 08:57 AM
cGetFile function different version
Posted: Mon Mar 09, 2026 08:08 AM

Dear Antonio,

I use this code within Old FWH version and New FWH version
I found New FWH version File Name show Empty. Look Left side.
Old FWH version can show it and no problem.

LOCAL cFile := "HpSA"+ALLTRIM(pcSysDate)+'_'+SUBS(pcSysDate,1,5)+'.csv'
LOCAL cINJDAT := ""


       cINJDAT = cGetFile( cFile, "้ธๆ“‡ๅญ˜ๅ…ฅ็›ฎ้Œ„" )

This Old FWH version and Working.

This New FWH version and not show File name.

Best Regards,



Richard



Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 32bit

MySQL v8.0

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 64bit
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: cGetFile function different version
Posted: Mon Mar 09, 2026 01:53 PM

Dear Richard,

It is a side effect bug due to the recent unicode support modifications.

Please modify this in source/winapi/getfile.c

Please replace this:
pFile = fw_parWideLen( 8, wLen * 2 ); //512 );

with this:
pFile = fw_parWideLen( IF( hb_pcount() > 7 && HB_ISCHAR( 8 ), 8, 1 ), wLen * 2 );

bug detected and solved by Antigravity :wink:

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion