Bonjour à tous,
Existe t'il une fonction equivalente à explode en php dans le language de script de AMC. Si ce n'est pas le cas comment faire pour extraire les valeurs d'une chaine délimités par un caractère et appliquer un traitement a chacune de ces valeurs.
Merci d'avance
[FR] Découper une chaine de caractères
Soit il faut faire ça avec Pos et Copy pour rechercher et copier les éléments "manuellement", soit utiliser par exemple les fonctions dans StringUtils1.pas qui facilitent un peu ce boulot (TextBefore + variable RemainingText), soit utiliser l'objet TStringList dont la propriété Text permet de découper une chaîne ayant des retour à la ligne (#13#10) comme séparateurs :
Code: Select all
program NewScript;
var
s: string;
SL: TStringList;
i: Integer;
begin
SL := TStringList.Create;
s := 'test,2e élément,fin';
SL.Text := StringReplace(s, ',', #13#10);
for i := 0 to SL.Count - 1 do
begin
ShowMessage(SL.GetString(i));
end;
end.