Page 1 sur 1

[R] StringRegExp  

Posté : mer. 22 janv. 2025 10:46
par Yle
Bonjour

Je voudrais utiliser StringRegExp dans ce bout de code :

Code : Tout sélectionner

#include <MsgBoxConstants.au3>
#include <StringConstants.au3>
#include <Array.au3>

$i1 = InputBox("Controle scrores","Entrer autant de scores (dans n'importe quel ordre)  que vs voulez séparés par une virgule","111,-66,35,52,56,35,-66,110,72,1"," ",500,200)
$repart = StringSplit($i1,",")
For $i = 1 to $repart[0]
	$repart[$i] = Number($repart[$i])
Next
_ArraySort($repart,1,1)	; Tri à partir 2eme ligne

$repart1 = $repart
;~ _ArrayDisplay ($repart)

; Intervalle
$Interval = 100/ ($repart[0]-1)
MsgBox(0,"","$Interval=" & $Interval)

For $i = 1 to $repart[0]
	if $i > 1 then
		$repart1[$i]  = (100 - ($Interval * ($i-1 )))
	else
			$repart1[$i] = 100
	EndIf
Next
_ArrayDisplay ($repart1)

Exit
J'aimerai que $Repart1 m'affiche 3 chiffres après virgule sans arrondi. Donc une expression comme celle ci : StringRegExp($Nombre, "(\d{2}[.,]\d{3})",1)
relevé sur Autoit mais je ne vois pas comment l'intégrer dans ma dernière boucle FOR
Merci d'avance pour votre aide.

Re: [..] StringRegExp

Posté : mer. 22 janv. 2025 11:54
par jchd
C'est plutôt StringFormat qu'il faut employer.

Re: [..] StringRegExp

Posté : mer. 22 janv. 2025 15:46
par Yle
Bonjour -Effectivement StringFormat("%.3f",(100 - ($Interval * ($i-1 )))) --MERCI