Anhängen einer Liste zur Anzeige in einem Textfeld% im Racket

Question

Ich habe eine Funktion, die eine Liste von Strings namens "derivedSentences" erhält, die in einem Textfeld angezeigt werden müssen.

(for-each (lambda (singlesentence) 
      (send derivationPanelTextField set-value singlesentence) 
       ) derivedSentences) 

Doch wie es so ist, ist es jedes Mal, Schleifen, es ersetzt genau das, was vorher drin war, so dass nur die letzte Zeichenfolge angezeigt wird. Aber ich versuche, es Schritt für Schritt zeigen zu lassen, also müsste ich ständig die Zeichenfolgen mit jeder Wiederholung der Schleife anhängen, aber, was auch immer ich versuche, funktioniert nicht. Es ist entweder ein Fehler oder das Textfeld würde leer angezeigt.

Answer 1

Wenn Sie den Text nicht aus dem Textfeld abfragen können, können Sie den Text trotzdem in einer String-Variablen ansammeln.

(let ((text "")) 
    (for-each 
    (lambda (singlesentence) 
    (set! text (string-append text singlesentence)) 
    (send derivationPanelTextField set-value text)) 
    derivedSentences))