Short file names

[Marco]

Hi, there is a function in xharbour returning the short file name in 8.3 format of a long file name?

EXAMPLE:

LF_ToShort("long_file_name.txt") -> "LONGFI~1.TXT"

thanks.

[dlzc]

Dear Marco:

On Thursday, June 24, 2021 at 6:42:42 AM UTC-7, Marco wrote:
> Hi, there is a function in xharbour returning the short file name in
> 8.3 format of a long file name?

There is not always a "short file name" generated.

If you get no other answer, you can "RUN" a directory command, pipe the output to a file, and parse the file.
DIR cfilename.typ /X >PARSEME.TXT
date... time... size... short file name... long file name.
Seems to be very columnatic, so should be easy to parse as an SDF or something.

David A. Smith

[Jayadev U]

Hi,

Please try with the following:

#pragma begindump

#include <windows.h>
#include "hbapi.h"

HB_FUNC( GETSHORTPATHNAME )
{
char buffer[ MAX_PATH + 1 ] = {0};
GetShortPathName( hb_parcx(1), buffer, MAX_PATH );
hb_retc( buffer );
}

HB_FUNC( GETSHORTFILENAME )
{
char pszReturn[ MAX_PATH ] ;
pszReturn[0]= '\0' ;

GetShortPathName( hb_parcx( 1 ), pszReturn, MAX_PATH - 1 ) ;
hb_retc( pszReturn ) ;
}

#pragma enddump


HTH,

Warm regards,

Jayadev

[Marco]

Thanks it works!