XPSE

Français

Nico
Madysa

si je mich pas justement schwer irre, ensuite stimmt quelque chose chez den beiden Funktionen MkLenL et MkLenR pas. Beide laisser cela Programme sans Fehlermeldung abstürzen. Kompilieren Marque Séparation {$iqt} nproc A var text$ = "Oho" text$ = MkLenR(text$,"!",6)'ohne diese Zeile klappt's. return text$ endproc cls print A() waitinput
Nico Madysa	30.04.2011 ▲ Vollständiges citation Absatzweise Citation Zeilenweise Citation

« cette Beitrag wurde comme Solution gekennzeichnet. »

oui, weil je "doof" suis...

So ists dans beiden Fällen implementiert:
Kompilieren Marque Séparation

nProc mkLenL(string s,f,long l){

    long c=len(s)
    caseNot c<l : return s
    return mkStr(f,c-l)+s// <-- c-l, haha

}

So funktioniert es naturellement:
Kompilieren Marque Séparation

nProc mkl(string s,f,long l){

    long c=len(s)
    caseNot c<l : return s
    return mkStr(f,l-c)+s

}

nProc mkr(string s,f,long l){

    long c=len(s)
    caseNot c<l : return s
    return s+mkStr$(f,l-c)

}

Bug et Workaround dans qui Aider geschrieben ( [...]

) et si XPSE wieder à qui Reihe ist wird cela naturellement korrigiert.

qui Funktionen mkLenL et mkLenR volonté (zum Glück) pas wiederum de anderen Funktionen genutzt qui dem Sprachschatz beiliegen.

01.05.2011 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Nico
Madysa

Alles bien sûr, merci.