| |
|
|
p.specht
| Getestet en XProfan11.2a: Aus uno Proc lässt se normalerweise con Volver x sólo una einziger Valor zurückliefern (Lo sei porque, uno übergibt una Array - Luego se en dieses Array gearbeitet)! Verzichtet uno en una Proc-Aufruf con Klammern, also KEINE "Funktion" (Parámetro son natürlich weiterhin zulässig), así dejar se por Dummy-Proc Aufruf a a 15 verschiedene Werte en el Hauptteil zurückliefern, sin esta später a disposende Bereiche oder gar una eigenen globalen Stack einrichten tener. Achtung: Aufrufe de el Hauptteil con Parametern IN KLAMMER löschen ya VOR el volver esta internen Parameterstack!
cls
split "abcdefghijklmno",99
imprimir "0:";@$(0),"1:";@$(1),"2:";@$(2),"3:";@$(3),"4:";@$(4),\
"5:";@$(5),"6:";@$(6),"7:";@$(7),"8:";@$(8),"9:";@$(9),"10:";@$(10),\
"11:";@$(11),"12:";@$(12),"13:";@$(13),"14:";@$(14),"15:";@$(15)
waitinput
end
proc split : parámetros g$,f$
declarar a$[15] : a$[]=mid$(g$,&index+1,1)
dummy a$[0],a$[1],a$[2],a$[3],a$[4],a$[5],a$[6],a$[7],\
a$[8],a$[9],a$[10],a$[11],a$[12],a$[13],a$[14],a$[15]
volver f$
ENDPROC
proc dummy
ENDPROC
|
|
|
| Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'... | 30.04.2021 ▲ |
|
|
|
|
Michael W. | |
|
| |
|
|
|
p.specht
| Muss sí keiner ! Aber como würdest Usted lo porque hacer, Michael? |
|
|
| XProfan 11Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'... | 02.05.2021 ▲ |
|
|
|
|
Michael W. | Mehrere Werte una Struktur. Lo va natürlich auch como Hash-Array, Así que el "Key" / "Value" Variante. Oder si keiner speziellen Auswahl bedarf simplemente en una Array.
El hier angegebene Variante sería Yo como "Dirty Trick" llamada. Und como es uno nie sicher, si el en Zukunft auch todavía así funktioniert.
Jetzt weiß Yo aber, por qué dies hier en PType$() es:
El Ermittlung des Typs muß direkt al Anfang el Procedimiento antes una etwaigen ersten Funktions- oder Prozeduraufruf posición! |
|
|
| |
|
|