How to delete last char

Question

How to delete last character of String with substring or anything ?

For example;

var
  query : String;
begin
  query:= \'test=1&line         


        

Answer 1

A third option is this:

SetLength(Query,LENGTH(Query)-1)