Obtiene los caracteres indicados en «longitud» empezando por la parte derecha de la cadena especificada en «cadena».
Un ejemplo de uso:
1 2 3 4 5 |
if RightStr (tTbNum.AsString, 4) = '4609' then begin insertar (obtener ('233', '23334')); numInt := numInt + 1; end; |
En este ejemplo, si el valor de «tTbNum.AsString» fuera «Esto es una prueba», la función RightStr (tTbNum.AsString, 4) devolvería el valor «ueba».
Uses StrUtils;