Beim Suchen gefundene Elemente aus Memo löschen

[Stamper]

Hallo,

ich habe mir ein Programm geschrieben, mit dem ich eine Liste von Dateinamen in ein Memo kopieren kann. Diese Dateien werden dann im gewünschten Verzeichnis gesucht und auf Wunsch in ein anderes Verzeichnis kopiert. Ich möchte noch eine Funktion einbauen, die ich nicht hinbekomme. Vll kann mir jmd helfen. Und zwar hätte ich gerne, dass das Programm alle Dateinamen aus dem Memo löscht, wenn diese Datei gefunden wird. Ich habe folgende Zeile geschrieben, bei der beim Kompilieren ein Fehler ausgegeben wird:

[/delphi]if SR = 0 then form1.Memo1.Lines.Delete(gconst);[delphi]

var SR: TSearchRec;
gconst ist eine globale Variable, in die ich den Wert der Schleife reinkopiere, mit dem ich das Memo zeilenweise auslese.

mzwvar2 ist der String, mit dem ich das Element der Memo an die Suchprozedur übergeben. Vll muss ich ja auch das einsetzen.

Fehlermeldung: "Inkompatible Typen"

Danke im Vorraus.
Eric