Função do Delphi
Copy(‘texto’, posição inicial, quantidade de caractares a serem copiados)
Retorno: String
Exemplos de uso:
1 2 3 4 5 6 7 8 9 10 11 | procedure TForm1.Button1Click(Sender: TObject); begin // irá aparecer ext ShowMessage(Copy('texto', 2, 3)); // irá aparecer Show ShowMessage(Copy('Show Delphi', 1, 4)); // irá aparecer Studio ShowMessage(Copy('Rad Studio XE 7', 4, 7)); end; |
