Fórum remover 10 primeiros caracteres de um TEDIT #280998

10/05/2005

0

bom, tenho um edit que possui sempre um monte de caracteres....
gostaria de remover apenas os dez primeiros, deixando o restante...
Alguem teria uma ideia de como eu posso fazer isso?
Abraços!
Juliano


Mahdak

Mahdak

Responder

Posts

10/05/2005

Tnaires

Olá
Tente o seguinte (não testei):
Delete(Edit1.Text, 1, 10);

Abraços


Responder

Gostei + 0

10/05/2005

Mahdak

deu o seuinte erro:

[Error] Unit1.pas(31): Constant object cannot be passed as var parameter

e agora?


Responder

Gostei + 0

10/05/2005

Tnaires

É verdade, o Text do Edit é constante e não pode ser alterado por referência.
Nesse caso, tente:
Edit1.Text := Copy(Edit1.Text, 1, 10);

Talvez a sintaxe do Copy esteja errada, pq tô sem Delphi e não me lembro mto.
Abraços


Responder

Gostei + 0

10/05/2005

Mahdak

sim deu certo mas ao invés de apagar os dez primeiros caracteres ele apaga os dez ultimos do edit... nao tem como inverter isso?


Responder

Gostei + 0

10/05/2005

Tnaires

Hehehe, q coisa não? :oops:
Tente assim:
Edit1.Text := Copy(Edit1.Text, 10, Length(Edit1.Text));

Abraços


Responder

Gostei + 0

10/05/2005

Tnaires

Melhor:
Edit1.Text := Copy(Edit1.Text, 11, Length(Edit1.Text));

Pq do jeito anterior ele pega a partir do décimo caractere, ou seja, exclui os 9 primeiros.
Abraços


Responder

Gostei + 0

10/05/2005

Mahdak

Valeu irmao, deu certinho agora...
Abraços!


Responder

Gostei + 0

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

Aceitar