Stringproblem die 2. : abwechselnt Ziffer und %-Zeichen

Moellers · Hält's aus hier Beiträge: 10

Und noch ein kleines Problem.

Gegeben ist ein String "1234567890"

Dieser soll nach der Umwandlung wie folgt aussehen.
String "%1%2%3%4%5%6%7%8%9%0%"

Wie kann man sowas am Besten und einfachsten umsetzen?

Gruss
und Danke für Eure kompetente Hilfe

Andreas

Gast Erhaltene Danke: 1

Spontan:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:

function blubb(s: string): string;
var
 i: integer;
begin
 result := '';
 for i := 1 to length(s) do
  result := result + '%' + s[i];
 if length(s) > 0 then
  result := result + '%';
end;

[/delphi]

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme