how to get "Name" of App ?

[Jimmy]

hi,

under Xbase++i have AppName() to get "Name" of App
how under Fivewin

[karinha]

https://forums.fivetechsupport.com/viewtopic.php?f=3&t=31155&p=180163&hilit=HB_ARGV&sid=01ac4c30bf4be4755dde9ce6acb4bcc5&sid=9d6c2fd2fb337b5a04c537edc8214103#p180163

Regards, saludos.

[Jimmy]

hi,

thx for Answer

the Link point to

How to keep a appl. on top of the dlg on resize ? (solved)

---

i got 2 Solution
1.) GetModuleFileName( GetInstance() )
2.) GetAppName()
where 2nd point to 1St

[nageswaragunupudi]

Code: Select all  Expand view

? ExeName()

[Jimmy]

hi,

Code: Select all  Expand view

? ExeName()

so there are 3 Solution

... "where" is ExeName() ... can´t find it under \fwh

[nageswaragunupudi]

This is a function from Clipper Tools functions, available from the good old Clipper days.
This is available in CT.LIB for xHarbour and hbct.lib for Harbour.
This lib is automatically linked in build?..

Please note that this returns the exename with full path.

[karinha]

Thanks mister Rao:

Code: Select all  Expand view

      cOrigPath  :=  "C:\DATA\ADDRESS.EXE"
      IF ExeName() <> cOrigPath
         ? "Program name or directory have been changed!"
         QUIT
      ENDIF
 

Harbour:

Code: Select all  Expand view

      cOrigPath  :=  "C:\DATA\ADDRESS.EXE"
      IF HB_ProgName() <> cOrigPath
         ? "Program name or directory have been changed!"
         QUIT
      ENDIF
 

Regards, saludos.

[nageswaragunupudi]

We can also get exactly the same result with

Code: Select all  Expand view

? HB_ArgV( 0 )

and

Code: Select all  Expand view

? GetModuleFileName( GetInstance() )

What to use is just a matter of personal taste.
I use ExeName()

[karinha]

Yes,

https://vivaclipper.wordpress.com/2014/02/26/hb_argv/

Code: Select all  Expand view

Example:

      // If command line is :  C:\temp>test.exe p1 p2

        ? HB_ArgV()     // C:\temp\test.exe
        ? HB_ArgV( 0)   // C:\temp\test.exe
        ? HB_ArgV( 1 )  // p1
        ? HB_ArgV( 2 )  // p2
        ? HB_ArgV( 3 )  // ( Null String )
 

Regards, saludos.

[Jimmy]

hi,

This is a function from Clipper Tools functions, available from the good old Clipper days.
This is available in CT.LIB for xHarbour and hbct.lib for Harbour.

ahh, i begin to remember ...

thx for Answer