TStringList als Result einer Funktion

[Sir Rufo]

Eventuell ist mein englisch eingerostet, aber bei Fill erwarte ich, dass die Liste gefüllt und eben nicht aufgefüllt wird (wäre dann ja Fillup). Darum der Parameter Append mit default False .

Es kommt also nicht darauf an, was gemacht wird, sondern was der Name nahelegt und logisch ist.

Deine Funktion müsste also logischerweise procedure AppendAnimals( Dest: TStrings; Clear: Boolean=False ); heissen.