Zeilen automatisch durch nummerieren

[DGL-luke]

ok, nicht schwierig

Delphi-Quellcode:

function LinkGen(istart,iend: Integer; captions: TStrings; tpl: string): TStringList;
var i: Integer;
begin
  if (pos(tpl,'%1s')<0) (pos(tpl,'%2d')<0) then
    raise EInvalidParameter.Create('template-string muss url- und caption- platzhalter enthalten!');

  Result := TStringList.Create;
  for i := istart to iend do
    Result.Add(format(tpl,[captions[i],i]));
end;

Bitte selber verstehen format