Topic: Displaying file name in a menu minus the file extension

[Dommy2Hotty]

I want to display the filename in a menu pulldown using DIESEL.  I do not want to display the file extension:

Code: [Select]

Building.dwg
I want to display:
Building

I'm using the following to display the filename in the menu:

Code: [Select]

[$(eval,$(getvar,dwgname))]

I can't figure out how to strip the last four characters off.  SUBSTR displays an error:

Code: [Select]

[$(eval,$(-,$(substr,$(getvar,dwgname)),4))]
Displays:$(-,??))


Any ideas?

[daron]

Is there a strlen in DIESEL?

[MP]

$(eval,$(substr,$(getvar,dwgname),1,$(-,$(strlen,$(getvar,dwgname)),4)))

[Dommy2Hotty]

$(eval,$(substr,$(getvar,dwgname),1,$(-,$(strlen,$(getvar,dwgname)),4)))

Excellent! Thank you very much.  Final code:

Code: [Select]

[$(eval,Current Floor :\t$(substr,$(getvar,dwgname),1,$(-,$(strlen,$(getvar,dwgname)),4)))]

[daron]

I was just going to say that there is. Thanks MP.

[MP]

MY pleasure folks.

[Dommy2Hotty]

I was trying to use substr , but I didn't have strlen in there.  Then I tried strlen with no substr.  Didn't try putting them together.  Don't think I would have figured out that format of them together.  Thanks again

[daron]

You would use the same format and pattern for lisp.

[Amsterdammed]

(vl-filename-base (getvar "dwgname"))

would be easier

Bernd

[MP]

Of course it would, but he asked for diesel.

[Dommy2Hotty]

(vl-filename-base (getvar "dwgname"))

would be easier

Bernd

But could that be used in a menu name for display purposes?

[daron]

Not in an LT environment and possibly not in a regular environment either.

[Amsterdammed]

You would use the same format and pattern for lisp.

MP, you are right,


I was replying on Darons post

Bernd