String nach vordefinierbarem Muster formatieren

[Windwalker]

Hallo,

ich bin dabei, eine Routine zu schreiben, die einen String nach einem definierbarem Muster aufbereitet.
Konkret habe ich eine Seriennummer aus alphanumerischen Zeichen z.B. "AB1234CD56" die ich z.B. als "AB1-234-CD56" darstellen möchte.
Das Format der Darstellung möchte ich einer Art Muster-String, in diesem Beispiel z.B. "###-###-####" vorgeben. Es soll also Platzhalter geben, die die Zeichen der Nummer aufnehmen und andere Zeichen, wie "-" werden literal übernommen.

Gibt es hierzu in Delphi bestimmte Funktionen/Prozeduren, die besonders geeignet sind oder werde ich um eine komplett händische Programmierung nicht herumkommen?

Danke!
Sascha.