Keep last 9 characters from a string

[Mountain_XD]

Hi, I want to keep 9 characters from a string (DText or MText). Thank you so much ! 

[Tharwat]

Here is an example:

(setq str "B1-X-(300x200)")
(if (> (setq len (strlen str)) 8)
  (substr str (- len 8))
  )

 

[Steven P]

A slightly different way, if all the texts are in the format "ABC (NxY)" and where the numbers could be any length. Returns anything after the first '('

 

MyString is the text string to change

 

(if (setq MyPos (vl-string-search "(" MyString)) ; position of deliminator, (
  (setq MyString (substr MyString (+ MyPos 1)) ) ; if contains "("
  MyString                                       ; If doesn't contain "("
)