XPSE

English

Nico
Madysa

If I not straight heavy crazy, then is correct something with whom both functions MkLenL and MkLenR not. both let the program without Error Message crash. Compile Mark Separation {$iqt} nproc A var text$ = "Oho" text$ = MkLenR(text$,"!",6)'ohne diese Zeile klappt's. return text$ endproc cls print A() waitinput
Nico Madysa	04/30/11 ▲ Vollständiges Quote Absatzweise Quote Zeilenweise Quote

« this Posting watts as Solution marked. »

Yes, because I "doof" be...

so ists in both Make implementiert:
Compile Mark Separation

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 functions it naturally:
Compile Mark Separation

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)

}

bow and Workaround into Help written ( [...]

) and if XPSE again on the row is becomes the naturally korrigiert.

The functions mkLenL and mkLenR go (to that Happiness) not against of others functions used The the Sprachschatz beiliegen.

05/01/11 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Nico
Madysa

everything clear, thanks.