Uso do comando copy em substring
eu uso assim:
copy(tabela1campo, length(tabela2campo), 1) :=´*´; exemplo
Agora preciso fazer o seguinte:
Dentro de um campo string de comprimento 13, copiar a 13ª string(a última) e enviar para um outro de tamanho 12 para q ele fique com 13 também(deve ser enviado p/ a última posição)
copy(tabela1campo, length(tabela2campo), 1) :=´*´; exemplo
Agora preciso fazer o seguinte:
Dentro de um campo string de comprimento 13, copiar a 13ª string(a última) e enviar para um outro de tamanho 12 para q ele fique com 13 também(deve ser enviado p/ a última posição)
Paulo
Curtidas 0
Respostas
Anonymous
21/03/2003
outro := outro + copy(string,13,1);
ou
outro := outro + copy(string,length(string), 1));
ou
outro := outro + copy(string,length(string), 1));
GOSTEI 0