Função copy

Olá,

Nesta postagem trago uma função que uso muito no meu dia a dia, é a função 'copy'.

esta é a estrutura de declaração da função 'copy':

copy( s : ShortString; index, count : Integer ), sendo que é retornado um informação do tipo ShortString ;

exemplo de uso

var
   nomeAntes: string ;
   nomeDepois: string ;
begin
     nomeAntes  :=  'Apenas um teste de funcionamento.' ;

     showmessage( nomeAntes ) ;

     nomeDepois  :=  Copy( nomeAntes, 1, 9 ) ;

     showmessage( nomeDepois ) ;
end;

execução

     showmessage( nomeAntes ) ;

     showmessage( nomeDepois ) ;

a função copy retorna o valor (cadeia) que estiver entre a posição index e o tamanho requisitado em count, ou seja, no nosso exemplo, temos a cadeia "Apenas um teste de funcionamento.", desta forma fica disposto assim:

'Apenas um teste de funcionamento.' = 33 char

copy( 'Apenas um teste de funcionamento.', 1, 9 )

1 = 'A'

9 = 'm'

retorno = ''Apenas um' 

agradeço pela atenção, até a próxima.