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/view ... 03#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

? ExeName()

[Jimmy]

hi,

Code: Select all | Expand

? 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

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

Harbour:

Code: Select all | Expand

      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

? HB_ArgV( 0 )

and

Code: Select all | Expand

? 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

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