---

Servus

Leider werden die Anführungszeichen im Betreff entfernt -
sollte eigentlich (zahl? "123.45")  -> True heißen.

Ich glaub', ich hab so eine Funktion schon wo gesehen - find's aber nicht mehr.
Es geht darum festzustellen, ob ein Wert eine Zahl darstellt.
Mir fällt jetzt nur dazu ein, mit (type) auf STR INT oder REAL zu prüfen und im Falle von STR, jeden einzelnen Charakter auf 0-9, bzw. Komma zu prüfen.

Ich denke, dass das dort besser gelöst war. Ob die Funktion jetzt genau "zahl?" hieß, oder nur so ähnlich, kann ich nicht sagen.
Danke für Hinweise oder hat jemand einen besseren Lösungsvorschlag.

------------------
Schöne Grüße
Ernst

www.geopaint.at

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Meinst du sowas wie hier am Ende beschrieben?
http://autolisp.mapcar.net/strings.html  ?

Für die Kochbuchbesitzer: Seite 158

------------------
Grüsse

Thomas

Korrekturen zum Kochbuch AutoLISP

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

nimm (distof ZAHLSTRING) .. liefert nil, wenn ZAHLSTRING nicht numerisch interpretiert werden kann

(distof  "2")-> 2.0
(distof "1e3")-> 1000.0
(distof "asc")-> nil
------------------
      - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Auf Axels Seiten hab ich zwar geschaut (aber im roten Bereich), doch die Seitentitel sind leider nicht so hilfreich, wenn man was sucht - und mein Kochbuch liegt leider daheim. Bin mir ziemlich sicher, dass das die Quelle meiner Erinnerung ist.

Und (distof) ist auch eine gute Idee.

Danke

------------------
Schöne Grüße
Ernst

www.geopaint.at

[Diese Nachricht wurde von Geos am 17. Jan. 2008 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ich hab da mal was für´s Forum entwickelt und gepostet. Vielleicht bringts was...

http://ww3.cad.de/foren/ubb/Forum145/HTML/002224.shtml#000017

vlg
Wolfgang S

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke, das kann man sicher mal brauchen (schon abgespeichert).
Dieses Mal genügt mir die Feststellung, ob der Wert eine Zahl darstellt (runden ja/nein).

Code:

---

(defun f#zahl? (#wert / )
  (if
    (or
      (= (type #wert) 'INT)
      (= (type #wert) 'REAL)
      (distof #wert)
    )
    T
  )
)

---

------------------
Schöne Grüße
Ernst

www.geopaint.at

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Tag zusammen,

Geos, mein lieber, was tust du denn da? Nach deiner Beschreibung gilt doch:

(type #wert) -> STRING

Das kann nicht funktionieren würde ich meinen. So geht's immer (wie schon CADmium trefflich bemerkt hat):

Code:

---

(defun f#zahl (#wert)
  (distof #wert)
)

---

Mehr brauchst du nicht - ehrlich.

Achim

------------------

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Achim

Das Ziel war schon eine Funktion, die man sowohl mit STRINGs, als auch mit INTs oder REALs füttern kann. Aber weil letztere eh kein Problem darstellten, bezog sich die Frage nur mehr auf STRINGs.
Aber danke trotzdem für Deine Antwort.

------------------
Schöne Grüße
Ernst

www.geopaint.at

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Nachtrag ... dann laß doch alle Dateitypen zu :

(defun f#zahl? (#wert / )
  (if
    (or
      (= (type #wert) 'INT)
      (= (type #wert) 'REAL)
      (and
        (= (type #wert) 'STR)
        (distof #wert)
      ) 
    )
    T
  )
)

------------------
  - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP