| |
| |
|
p.specht
 | Getestet dans XProfan11.2a: Aus einer Proc peut sich normalement avec Retour x seulement un einziger Wert zurückliefern (Es sei car, on übergibt un Array - ensuite wird sur cet Array gearbeitet)! Verzichtet on sur une Proc-Aufruf avec Klammern, alors KEINE "Funktion" (paramètre sommes naturellement weiterhin zulässig), so laisser sich per Dummy-Proc Aufruf jusque 15 verschiedene Werte dans den Hauptteil zurückliefern, sans dabei später trop disposende Bereiche ou bien gar une eigenen globalen Stack einrichten trop doit. attention: Aufrufe aus dem Hauptteil avec Parametern IN KLAMMER effacer bereits VOR dem return cette internen Parameterstack!
cls
split "abcdefghijklmno",99
imprimer "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 : parameters g$,f$
declare 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]
return 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 oui aucun  !
mais comment würdest Du es car faire, Michael? |
|
| |
| XProfan 11Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'... | 02.05.2021 ▲ |
|
| |
|
|
Michael
W. | plusieurs Werte sur une Struktur.
und dir naturellement aussi comme Hash-Array, alors qui "Key" / "Value" variante.
ou bien si es aucun speziellen sélection besoin simple dans un Array.
qui ici angegebene variante serait je comme "Dirty Trick" appel. et voilà on nie sûrement, si cela dans Zukunft aussi encore so funktioniert.
maintenant sais je mais, pourquoi ca ici chez PType$() steht:
qui Ermittlung des Typs doit direct am Anfang qui Procédure avant einem etwaigen ersten Funktions- ou bien Prozeduraufruf stehen! |
|
| |
| |
| |
|
(513)
Deutsch
English
Français
Español
Italia