Capturar letras no edit

Delphi

04/06/2005

Olá a todos.
Estou com proplema, eu desejo capturar uma determinada quantidade de caracteres no edit para copiar para uotro lugar.
Ex: Eu tenho os seguintes caracteres, ASDQWERTFG, em uma edit usado na altorização de uso de aplicativo e gostaria de capturar somente os dois primeiros carcteres. Eu tentei o seguinte código e não deu certo:

var:=Edit1.Text[1..2];

Gradesso a atenção de todos!


Bmendesj

Bmendesj

Curtidas 0

Respostas

Jocelio

Jocelio

04/06/2005

declare uma variavel

var a : string;

a := copy(Edit1.text,1,2);

jocelio :)


GOSTEI 0
Carlosrm

Carlosrm

04/06/2005

bmendesj

só para contribuir:
seu raciocínio estaria perfeito, se fizesse

var_qlq := Edit1.Text[1] + Edit1.Text[2];

Neste caso específico (conforme voce postou), índices e em sequência (o primeiro e o segundo caracteres, por exemplo), a sugestão do Jocelio é dez.

Mas se vc precisar trabalhar com índices não em sequência (o oitavo e o terceiro, por exemplo), vc pode usar a concatenação, unindo os índices da string que vc quiser, mas sempre um a um.

Por exemplo, usando a string que vc sugeriu ´ASDQWERTFG´, podemos escrever GARRAFA, fazendo

edit1.text := ´ASDQWERTFG´;
var_qlq := edit1.text[10]+edit1.text[1]+edit1.text[7]+edit1.text[7]+
edit1.text[1]+edit1.text[9]+edit1.text[1];

(Obs: ´var´ é uma palavra reservada da linguagem. Não a use em outras situações).

Espero ter ajudado

carlosrm


GOSTEI 0
POSTAR