Anonyme Methode in Schleife ausführen - wie abbrechen?

[Der schöne Günther]

Gib der Methode doch einen var-Parameter canContinue oder so mit. Eingänglich auf True gesetzt und wenn jemand den ganzen Vorgang abgebrochen haben will, setzt er das auf False .

Also dass die Methode nicht mehr TProc<String> ist, sondern TMyProc = reference to procedure(const mStr: String; var canContinue: Boolean) .
Oder TFunc<String, Boolean> .