Fonctions exlode et implode du php

Contenu du snippet

Ce sont 2 fonctions diponibles par défaut en PHP.
Implode permet de convertir une TstringList en string en séparant chaque élément par le séparateur choisi (par défaut le ';')
Explode réalise l' opération inverse (il faut spécifier aussi le séparateur)

Source / Exemple :


function Explode(ch : string;sep: string = ';'):TStringList;
var
 p : integer;
begin
p := pos(sep,ch);
explode := TStringList.Create;
while p > 0 do begin
  explode.Add(copy(ch,1,p-1));
  if p <= length(ch) then ch := copy(ch,p+ length(sep),length(ch));
  p := pos(sep,ch);
end;
explode.Add(ch);
end;

function Implode(lst:TStringList;sep : string =';'):string;
var
  i : integer;
  s : string;
begin
 i:= 0;
 while i < lst.Count - 1 do begin
   s := s + lst[i] + sep;
   i := i + 1;
 end;
 if i < lst.Count then s := s + lst[i]; //Ne mets pas de séparateur sur le dernier élément
 result := s;
end;

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.