Multiplier des caractères.

[Chris]

(J'en vois déjà qui rigolent )

Pourquoi on ne peut pas faire, par exemple, Multi_Tab$ = chr(9)*10, ce qui, dans ce cas, donnerait 10 indentations l'une derrière l'autre.

Hein, pourquoi?

[Lukky]

C'est sans doute trop galère à gérer car si t'as plutôt 10*chr(9) pas facile pour le compilateur.

Mais MultiCar(chr(9), 10) comme syntaxe c'est sympa.

J'ai ça dans mon langage, mais pas Pure hein pourquoi pas Pure ?

JL

[comtois]

ça ne vous convient pas ça ??

Code : Tout sélectionner

Multi_Tab$=RSet("", 10, Chr(65))
Debug Multi_Tab$

[Flype]

ou

Code : Tout sélectionner

Procedure.s CharN(char.s,n.l)
  For i=1 To n
    result$+char
  Next
  ProcedureReturn result$
EndProcedure

Debug CharN("-",30)
Debug RSet("",30,"-")

[Chris]

@Comtois et Flype

Oui, bien sûr, mais le problème n'est pas de faire une fonction, elle est simple à faire.

Je me souviens de mes anciens Basics, sur Atari, il y avait une fonction qui faisait ça. (La syntaxe devait être plus proche de celle qu'a donnée Lucky que de la mienne, il me semble).
C'était très pratique.

On a bien la fonction StringField(), alors que cette fonction est relativement simple à programmer, alors pourquoi pas une fonction ''MultiCar(chr(Valeur), Nombre)''