Splitten..

Übersicht

BlitzBasic

Beginners-Corner

	#Reaper Newsposter Betreff: Splitten..	Fr, März 25, 2005 15:45 Antworten mit Zitat
Hi! Ich habe zu den Thema nichts gefunden.. Ich suche eine funktion, mit der man eine Variebale Splitten kann.. vll kennt hier ja jemand die JS Funktion split() wo man in einem String z.b. welcher lautet "text1,text2" kann man sagen split("text1,text2", ",") ergebnisse wären "text1" und "text2" welche durch das , getrent (splittet) wurden.. Nur kenn ich keine Funktion in BB, welche das kann.. Kann mir da jemand helfen? MfG #Reaper
AMD Athlon 64 3500+, ATI AX800 Pro/TD, 2048 MB DRR 400 von Infineon, ♥RIP♥ (2005 - Juli 2015 -> sic!) Blitz3D, BlitzMax, MaxGUI, Monkey X; Win7

#Reaper

Newsposter

Betreff: Splitten..

Fr, März 25, 2005 15:45
Antworten mit Zitat

Hi!

Ich habe zu den Thema nichts gefunden..

Ich suche eine funktion, mit der man eine Variebale Splitten kann..

vll kennt hier ja jemand die JS Funktion split()
wo man in einem String z.b. welcher lautet "text1,text2" kann man sagen
split("text1,text2", ",")

ergebnisse wären "text1" und "text2" welche durch das , getrent (splittet) wurden..

Nur kenn ich keine Funktion in BB, welche das kann..

Kann mir da jemand helfen?

Smile

MfG
#Reaper

AMD Athlon 64 3500+, ATI AX800 Pro/TD, 2048 MB DRR 400 von Infineon, ♥RIP♥ (2005 - Juli 2015 -> sic!)
Blitz3D, BlitzMax, MaxGUI, Monkey X; Win7

	Spikespine	Fr, März 25, 2005 15:47 Antworten mit Zitat
schau dir mal diese Befehle an. Mit denen Kann man Strings bearbeiten: http://www.blitzbase.de/menu/2r.htm
Athlon 64 3700+ \| 1024 MB RAM \| GeForce 7900 GT \| Blitz2D, Blitz3D, BlitzPlus, BlitzMax

Spikespine

Fr, März 25, 2005 15:47
Antworten mit Zitat

schau dir mal diese Befehle an.
Mit denen Kann man Strings bearbeiten:

http://www.blitzbase.de/menu/2r.htm

Athlon 64 3700+ | 1024 MB RAM | GeForce 7900 GT | Blitz2D, Blitz3D, BlitzPlus, BlitzMax

	jhabekost	Fr, März 25, 2005 15:48 Antworten mit Zitat
oder bei php explode() stimmt wäre ja mal interessant... geht bestimmt mit ner schleife und eine abfolge von bestimmten befehlen... -- Spikespine hat Folgendes geschrieben: schau dir mal diese Befehle an. Mit denen Kann man Strings bearbeiten: http://www.blitzbase.de/menu/2r.htm ne, meines wissens ist sowas bei den regulären befehlen net dabei...

jhabekost

Fr, März 25, 2005 15:48
Antworten mit Zitat

oder bei php explode() Wink

stimmt wäre ja mal interessant...
geht bestimmt mit ner schleife und eine abfolge von bestimmten befehlen...

--
Spikespine hat Folgendes geschrieben:

schau dir mal diese Befehle an.
Mit denen Kann man Strings bearbeiten:

http://www.blitzbase.de/menu/2r.htm

ne, meines wissens ist sowas bei den regulären befehlen net dabei...

	Spikespine	Fr, März 25, 2005 15:55 Antworten mit Zitat
Ja schon klar, abver mit diesen Befehlen kann man sich eine solche Funktion basteln!
Athlon 64 3700+ \| 1024 MB RAM \| GeForce 7900 GT \| Blitz2D, Blitz3D, BlitzPlus, BlitzMax

Spikespine

Fr, März 25, 2005 15:55
Antworten mit Zitat

Ja schon klar, abver mit diesen Befehlen kann man sich eine solche Funktion basteln!

Athlon 64 3700+ | 1024 MB RAM | GeForce 7900 GT | Blitz2D, Blitz3D, BlitzPlus, BlitzMax

	Klaas	Fr, März 25, 2005 16:06 Antworten mit Zitat
ich benutze hier ein Array weil man damit praktischer an die Werte kommt. Deshalb kann es auch nur soviele Teile Trennen wie das Array groß ist. Für mich reicht das, ansonsten müßte man es wohl für Types umschreiben. Code: [AUSKLAPPEN] [EINKLAPPEN] Dim xff_results$(100) Function xff_split(seperator$,txt$) pos=Instr(txt$,seperator$,1) count = 1 While (pos) xff_splitresult(count-1) = Left(txt$,pos-Len(seperator)) txt$=Right(txt$,Len(txt$)-pos-Len(seperator)+1) pos=Instr(txt$,seperator$,1) count=count+1 Wend xff_splitresult(count-1)=txt$ Return count End Function

Klaas

Fr, März 25, 2005 16:06
Antworten mit Zitat

ich benutze hier ein Array weil man damit praktischer an die Werte kommt. Deshalb kann es auch nur soviele Teile Trennen wie das Array groß ist. Für mich reicht das, ansonsten müßte man es wohl für Types umschreiben.

Code: [AUSKLAPPEN]

Dim xff_results$(100)

Function xff_split(seperator$,txt$)
pos=Instr(txt$,seperator$,1)
count = 1
While (pos)
   xff_splitresult(count-1) = Left(txt$,pos-Len(seperator))

   txt$=Right(txt$,Len(txt$)-pos-Len(seperator)+1)
   pos=Instr(txt$,seperator$,1)
   count=count+1
Wend
xff_splitresult(count-1)=txt$

Return count
End Function

	Alfadur	Fr, März 25, 2005 16:15 Antworten mit Zitat
BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] Function split$(String1$,trenner$,richtung=0) If richtung=0 Then Return Mid(String1$,1,Instr(String1$,trenner$)-1) Return Mid(String1$,Instr(String1$,trenner$)+1,-1) End Function String1$=\"text1,text2\" String2$=split(String1$,\",\",0) String3$=split(String1$,\",\",1) Print String1$ Print String2$ Print String3$
A Cray is the only computer that runs an endless loop in less than four hours.

Alfadur

Fr, März 25, 2005 16:15
Antworten mit Zitat

BlitzBasic: [AUSKLAPPEN]


Function split$(String1$,trenner$,richtung=0)
	If richtung=0 Then Return Mid(String1$,1,Instr(String1$,trenner$)-1)
	Return Mid(String1$,Instr(String1$,trenner$)+1,-1)
End Function

String1$=\"text1,text2\"
String2$=split(String1$,\",\",0)
String3$=split(String1$,\",\",1)

Print String1$
Print String2$
Print String3$

A Cray is the only computer that runs an endless loop in less than four hours.

	#Reaper Newsposter	Fr, März 25, 2005 16:20 Antworten mit Zitat
Thx!! Klappt! @Klaas: da kommt ein fehler, wenn ich es benutzten will.. @Alfadur: deins geht gut Thx @all! MfG #Reaper
AMD Athlon 64 3500+, ATI AX800 Pro/TD, 2048 MB DRR 400 von Infineon, ♥RIP♥ (2005 - Juli 2015 -> sic!) Blitz3D, BlitzMax, MaxGUI, Monkey X; Win7