FiveTech Software tech support forums

... imagefilename, 2 ) * Nuevo: Ejemplo samples\dllexpl.prg, muestra cómo obtener las funciones exportadas de cualquier DLL. * Modificado: Función cFilePath( cFile ). Se elimina la función Upper() porque es práctico para los usuarios de algunos idiomas. https://forums.fivetechsupport.com/viewtopic.php?f=3&t=43850&sid=19db84a6686a199e5a8529b0d17e21d6 ...

... ) or FWCopyToClipBoard( imagefilename, 2 ) * New: samples\dllexpl.prg shows how to get the exported functions of any DLL. * function cFilePath( cFile ). Upper() is removed as it is convinient to users of some languages. https://forums.fivetechsupport.com/viewtopic.php?f=3&t=43850&sid=19db84a6686a199e5a8529b0d17e21d6 ...

... version FWH2310 going to be released at any time. I just availed the opportunity to discuss other options. Their functionality is not exactly like cFilePath One more. Works only of if the file exists: ? FileSysObj():GetFile( cFile ):ParentFolder:Path

nageswaragunupudi wrote:I think there should be no problem in removing Upper.

Meanwhile just for discussion, other ways are

Code: Select all  Expand view

cPath := BeforAtNum( "\", TrueName( cFile ) ) + "\"

Thank you Mr. Rao,

I understand that you recommend creating my own function and using it.

I think there should be no problem in removing Upper.

Meanwhile just for discussion, other ways are

Code: Select all  Expand view

cPath := BeforAtNum( "\", TrueName( cFile ) ) + "\"

StrCapFirst() no sirve?

https://fivetechsupport.com/forums/viewtopic.php?f=3&t=40794&start=0

Regards, saludos.

Hi, This function is in filename.prg in \fwh\source\function directory. function cFilePath( cPathMask )   // returns path of a filename   local lUNC := "/" $ cPathMask   local cSep := If( lUNC, "/", "\" )   local n := RAt( ...

how are FUNCTION Pathonly() and Fileonly() called under Fivewin

cFilePath( c )
cFileName( c ) OR cFileNoPath( c )

Please see \fwh\source\function\filename.prg for many other functions abt file and path names. etc

... on exit. therefore the user_check procedure must return a true or false logical variable of the type function test() local oDlt, lCont cDbfPath:=cFilePath(GetModuleFileName( GetInstance() )) + "2013\dbf\" cExePath:= cFilePath(GetModuleFileName( GetInstance() )) * SET DEFAULT TO &cDbfPath ...

cFilePath()、GetModulefileName() ?

I will test point by point and answer one by one. b. GetModulefileName/cFilePath.... ExeName: #include "fivewin.ch"REQUEST HB_CODEPAGE_UTF8function Main()   HB_CDPSELECT( "UTF8" )   FW_SetUnicode( .t. )? "ExeName()", ...

1. filename change from english to uft8, ex: 'abc.exe to ' 中文龍咙.exe'
2. directory is utf8 name, ex: 'c:\temp\中文龍咙\'

a. read/write .ini, GetPvProfString/WritePProfString....
b. GetModulefileName/cFilePath....

/ ??? Para que sirve, Silvio?
cIniFile := cFilePath( GetModuleFileName( GetInstance() ) ) + "tabledb.ini"

for save the state and other things

... I wish save on record (dbf) only bitmaps\servizi\pattino.png I saw also filename.prg and not found a solution Function test() Local cIniFile := cFilePath( GetModuleFileName( GetInstance() ) ) + "Test.ini" Local cExePath := cFilePath( GetModuleFileName( GetInstance() ) ) Local cSerPath ...

Otto ,
sorry I TRIED with these functions

//?cFileNoPath( cPathMask )
//?cFilePath( cPathMask )
//?cFileDisc( cPathMask )
//?cFileNoExt( cPathMask )
//?cFileSubDir( cPathMask )
//? cFileUNC( cPathMask )
//? cRelativePath( cPathMask )

with no success!!!!

none give me ..\images\name.png