Strlen
Questa funzione restituisce un numero intero che corrisponde al numero di caratteri che costituiscono una stringa
(strlen stringa)
Esempio:
(defun c:trovalung()
(setq miastringa(getstring"\nscrivi una parola"))
(setq lunstr(strlen miastringa))
(princ "la stringa è lunga " )
(princ lunstr)
(princ)
)
salviamo il file lez14.lsp
eseguiamo autocad e scriviamo nella linea di comando
(load "lez14")
facciamo Invio
quindi scriveremo
trovalung
Scarica l'esempio
R. Pucci