Código Delphi [-] var2:=trim(edit1.text); Resultado:=copy(var2,1,30);
var2:=trim(edit1.text); Resultado:=copy(var2,1,30);