japee
Messages postés1727Date d'inscriptionvendredi 27 décembre 2002StatutModérateurDernière intervention 6 novembre 20218 6 sept. 2003 à 15:45
tu fais par exemple :
function Remplace(StrIn: String): String;
var i: Integer;
begin
Result := '';
for i := 1 to Length(StrIn) do
begin
if StrIn[i] = ' ' then Result := Result + '_'
else Result := Result + StrIn[i];
end;
end;