Schau Dir SysUtils.Trim an, und bau Dir daraus Deine eigene Trim-Funktion.
Da der Rückgabewert ja schon belegt ist übergibst Du dann neben dem zu trimmenden String einen Var-Paramter vom Typ Integer, in dem Dir die Anzahl der gelöschten Zeilenumbrüche zurückgegeben werden.
Edit:
@Nuclear-Ping: ich denke mal, dass darüber noch jemand sein Händchen halten wird, und das nicht ungesehen released wird
