GARANTIR DESCONTO

Fórum Como tirar o primeiro caracter de uma string de 13 caractere #257438

06/11/2004

0

Como eu faço isto?


O4pr3ndiz

O4pr3ndiz

Responder

Post mais votado

10/11/2004

Como ja foi especificado acima, existem varias maneiras

a mais simples seria realmente o delete

Delete ( fstring, index, quant );
onde fstring é o texto a ser apagado
index é a posição que será excluido o 1º caracter
quant é a quantidade de caracteres a sere, excluidos.

exemplo :

fstring = ´Anderson M Silva´
Delete( fstring, 1, 2 );

Resultado final = ´derson M Silva´

outro exemplo é usar o copy

fResult = copy( fstring, 2, length( fstring ) - 2 );
neste exemplo, estou copiando a fstring a partir da posição 2 com o tamanho total dela - os 2 caracteres que eu nao quero.

Espero ter ajudado

Anderson M Silva
Programador WEB e DeskTop


Anderson Silva

Anderson Silva
Responder

Gostei + 1

Mais Posts

06/11/2004

Gilvanj

tente:
Delete(variavel,1)
ou
variavel := copy(variavel, 2, 1000)


Responder

Gostei + 0

06/11/2004

Aroldo Zanela

Colega,

Delete(SuaString,Posicao,Quantidade);



Responder

Gostei + 0

06/11/2004

Otorquati

8)
Olá,
Não sei se entendi bem, mas o exemplo abaixo mostra como tirar o 1° caracter de uma string qualquer, alem de vc poder utilizá-lo tb.

procedure TForm1.Button1Click(Sender: TObject);
var
sPrimeiroChar, sRestoChar: String;
begin
sPrimeiroChar := LeftStr(edit1.Text,1);
sRestoChar := RightStr(edit1.Text,Length(edit1.Text)-1);
Label1.Caption:=´Primeiro caracter: ´+sPrimeiroChar;
Label2.Caption:=´Caracteres Restantes: ´+sRestoChar;
end;

Espero ter ajudado...


Responder

Gostei + 0

08/11/2004

Inutaishou

Para visualizar um caracter de uma String, eu sugiro que não se use uma função...

Para ver o primeiro caracter de uma String:
Caracter1 := string[1];


[]´s,


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar