FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Pocket PC CurDir()
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
CurDir()
Posted: Wed Apr 15, 2009 07:47 PM
Usad este CurDir():
Code (fw): Select all Collapse
function FWCurDir()

   local cExeName := GetModuleFileName( 0 )

return SubStr( cExeName, 1, RAt( "\", cExeName ) - 1 )
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 84
Joined: Wed Nov 09, 2005 11:22 PM
Re: CurDir()
Posted: Sun May 31, 2009 12:36 AM

Antonio

Maravilha !

Isso resolveu o erro que postei há anos:

viewtopic.php?f=7t=4623

O erro estava justamente na função CurDir()
Com FWCurDir() funcionou perfeitamente !

[]'s

Rogerio

&

Continue the discussion