Hallo,
Du könntest erst mal mit
Trim die Steuerzeichen links und rechts abschneiden. Dann gehst Du von hinten durch den String und suchst das erste Steuerzeichen. Jetzt musst Du nur noch den String mit
Copy zurechschneiden.
Grob sähe das so aus:
Delphi-Quellcode:
function ProcessString(
const Source):
String;
var
S:
String;
C: Integer;
begin
S := Trim(Source);
C := Length(S);
while (C > 0)
do
begin
if S[C] < #32
then
begin
Result := Copy(S, C + 1, MaxInt);
Exit;
end;
Dec(C);
end;
Result := '
';
end;
Dabei gehe ich aber davon aus, dass am Ende des Strings nur noch Steuerzeichen vorkommen.
@hoika: Die Hochkommas stammen von der
IDE und trennen nur die Steuerzeichen von den druckbaren Zeichen.
//Edit: Fehler korrigiert.
Gruß
xaromz