PureBoard

Verfasst: **20.12.2007 17:43**

Moin Leute ...

ich brauche einen Code um die Stellen an denen ein String in einem 2. string vorkommt herauszukriegen ...
auch wenn es mehrere stellen gibt

z.B Dampfschiff
string f in string dampfschiff kommt an den stellen 5 ,10 ,11 raus

Danke schonma lassma-asma

Verfasst: **20.12.2007 18:07**

ganz banal =

Code: Alles auswählen

Procedure LetterFinder(String.s,Suchstring.s)

For i=1 To Len(String)

If Mid(String,i,1)=Suchstring
  Debug "Position = "+Str(i)
EndIf

Next i

EndProcedure

LetterFinder("Dampfschiff","f")

Wäre natürlich ausbaufähig wegen Gross/Kleinschreibung, eine Linklist , damit das Ergebnis mehrfach sein kann ... und und und

Verfasst: **20.12.2007 18:19**

Da kann man auch gleich Findstring nutzen

Code: Alles auswählen

  pos = 0
  s.s = "Dampfschiff"
  n.s = "f"
  
  Repeat
    pos = FindString(s,n,pos+1)
    
    If pos
      Debug pos
    EndIf 
    
  Until pos = 0

Verfasst: **20.12.2007 18:28**

oder das...
Ich sah die frage und sah mich den code wie in trance tippern

Da hab ich nicht wirklich nachgedacht

wie soll ich sagen ...
intuitiv gefühlt ....

Verfasst: **21.12.2007 01:30**

jo danke ihr beiden ...

is genial unn so ziemlich genau das was is suchte ...

Gruß lassma-asma

PureBoard

Buchstaben in Wort lokalisieren {gelöst}

Buchstaben in Wort lokalisieren {gelöst}