Letzten Teil eines Strings entfernen bei unbekannter Länge

[lbccaleb]

So geht das runterzählen...

Delphi-Quellcode:

var I: Integer;

for I :=1 downto Length(deinstring) do
  begin;

  end;