Fjerne n karakterer i slutten av string

[qdos]

Hvordan kan jeg skrive en funksjon som fjerner f.eks. de tre siste karakterene i en string? Får ikke LeftStr til å passe ettersom størrelsen på stringen er forskjellig fra gang til gang.

[Teddy KGB]

Du må lage en løkke som går gjennom strengen tegn for tegn, til den kommer til slutt. Gjerne med en teller. Så kan du kutte strengen etter (teller - 3) tegn. Evt lager du en metode med en (int) inngangsvariabel så kan du kutte hvor mange tegn du vil fra slutten av strengen..

[qdos]

Takk for svaret Teddy KGB, men jeg klarte det akkurat med LeftStr allikevel:

 

String := LeftStr(String, (Length(String))-n);

[_Wolfman_]

Setlength(string,length(string)-Antall);