| |
|
|
![Julian Schmidt: 08.08.2012](.././../../i/a/1598.gif) Julian Schmidt | Wunsch: Befehl um une Teilstring trop effacer
Vorübergehende Solution:
CLS
imprimer "String: 1,2,3,4,5,6,7,8,9"
imprimer "Teilstring 8 löschen"
imprimer "Ergebnis: "+DelSubStr("1,2,3,4,5,6,7,8,9",8,»)
Waitinput
Proc DelSubStr
Paramètres Text$,Teil&,Trenn$
Déclarer Text2$
whileloop Len(Text$,Trenn$)
Text2$=Text2$+Si((&loop<>Si(Teil&<>1,1,2)) and (&loop<>Teil&),Trenn$,»)+Si(&loop<>Teil&,$ Substr(Text$,&loop,Trenn$),»)
Endwhile
Retour Text2$
ENDPROC
|
|
|
| |
|
|
|
![RGH: 01.01.2013](.././../../i/a/20.gif) RGH | Salut, cela peux doch schonj qui Funktion Del$:
imprimer "Ergebnis: "+Del$("1,2,3,4,5,6,7,8,9",8,1,»)
il peut sogar un bisschen plus, là aussi plusieurs Teilstrings gelöscht volonté peut.
Salut Roland |
|
|
| XProfan X2Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 01.01.2013 ▲ |
|
|
|
|
![Julian Schmidt: 01.01.2013](.././../../i/a/1598.gif) Julian Schmidt | Stimmt!
RGH (01.01.13)
il peut sogar un bisschen plus, là aussi plusieurs Teilstrings gelöscht volonté peut.
Wird pas dans qui Aider erwähnt. Beispiel? |
|
|
| |
|
|
|
![Jörg Sellmeyer: 01.01.2013](.././../../i/a/8132362004294faafc5e8c.jpg) Jörg Sellmeyer |
Beispiel?
imprimer "Ergebnis: "+Del$("1,2,3,4,5,6,7,8,9",6,2,»)
WaitInput
|
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... ![](https://www.wuestensand.info/images/CoverFataMorganaklein.jpg) | 01.01.2013 ▲ |
|
|
|
|
![RGH: 01.01.2013](.././../../i/a/20.gif) RGH | Erstens wird es dans qui Aider erwähnt et zweitens ist qui dritte paramètre le nombre qui marque bzw. Teilstrings, qui entfernt volonté!
citation aus qui Aider: "Wenn un Trennzeichen angegeben ist: Ab qui Teilstring-Position N1 volonté N2 Teilstrings aus dem String entfernt."
Salut Roland |
|
|
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 01.01.2013 ▲ |
|
|
|