[Ñuño Martínez]

Tal vez te ayude la función FmtStr. En tu caso podría ser (así, de memoria):

Código Delphi [-]
Cadena := FmtStr ('%02d-%080', [Valor1, Valor2]);

[edit] Leñes, ¡qué despacio escribo! Aun así, lo dejo porisaca.