string trimmen

[herkules]

hallo zusammen!
einen string trimmen in php ist ja eine einfache sache, hier eine kleine lösung für applescripter (die routine "trimmt" nicht nur leerzeichen...):

--*****************
-- Zeichen loeschen
--*****************

-- Aufruf
set Variabel to |Trimmen|("InputString", "", " ")

-- Trimmen
--********
on |Trimmen|(Input, Art, Zeichen)

-- Flag setzen
set OK to false

-- Input uebergeben
set Output to Input

-- wenn nicht leer, weitermachen
if Output is not "" then

-- pruefen, ob String nicht nur aus Zeichen besteht.
repeat with n from 1 to (length of Output)
if (characters n thru n of Output as text) is not Zeichen then
set OK to true
exit repeat
end if
end repeat

-- weitermachen, wenn Ok
if OK then

-- je nach Wunsch trimmen
if Art = "r" then
-- Zeichen rechts loeschen

repeat while (characters (length of Output) thru (length of Output) of Output as text) = Zeichen
set Output to (characters 1 thru ((length of Output) - 1) of Output as text) as string
end repeat

else if Art = "l" then
-- Zeichen links loeschen

-- Zaehler initalisieren
set n to 1

repeat while (characters n thru n of Output as text) = Zeichen
set Output to (characters (n + 1) thru (length of Output) of Output as text) as string
set n to n + 1
end repeat

else
-- Zeichen links und rechts loeschen

-- rechts loeschen
repeat while (characters (length of Output) thru (length of Output) of Output as text) = Zeichen
set Output to (characters 1 thru ((length of Output) - 1) of Output as text) as string
end repeat

-- links loeschen
-- Zaehler initalisieren
set n to 1

repeat while (characters n thru n of Output as text) = Zeichen
set Output to (characters (n + 1) thru (length of Output) of Output as text) as string
set n to n + 1
end repeat
end if
else
set Output to ""
end if --> if OK
end if --> if Output is not ""

-- Wert zurueckgeben
return Output

end |Trimmen|
_________________
gruss christos;-)

[spirigwi]

HALLO HERCULES schön dich an diesem Platz wieder auftauchen zu sehen:

[Snow]

Nein, nein, nein, das Forum ist daran nicht schuld.

Ich denke, Herkules ist da beim Tippen automatisch in die PHP-Syntax verfallen. != bedeutet in der Tat 'ungleich' bzw. um es im AppleScript-Chargon auszudrücken 'is not' oder 'is not equal to'.
_________________
Peter
-
Fischer-Bayern.de|Shadetreemicro.com

[herkules]

stimmt, hab ich was übersehen. respektive einfach nur copy paste ausgeführt. das ungleichheitszeichen mache ich halt immer mit "alt + 6". aber beim kopieren, wird das ganze so wies aussicht in "!=" konvertiert. beim ausdruck "is not" muss ich eben mehr schreiben... programmierer-faulheit
_________________
gruss christos;-)

[spirigwi]

[herkules]

so, jetzt habe ich das mit dem "!=" korrigiert. es hiesst jetzt "is not". bei den anderen schnippseln gehe ich das auch noch kontrollieren...
_________________
gruss christos;-)

[JohnWick7]

Danke für das Wissen.