Substituir Ultimo caracter de um Memo

Delphi

10/03/2005

olá pessoal
como faço para substituir um determinado caracter de um memo, mas só se ele estiver na ultima posição do memo?

outro problema é que o memo pode conter alguns <enter> no fim, o que dificultaria ou seria possivel acabar com esses <enter> no fim e depois verificar se um determinado caractere esta no fim do memo ?

agradecido
Diogo


Diogoalles

Diogoalles

Curtidas 0

Respostas

Marcosrocha

Marcosrocha

10/03/2005

Você tem que fazer uma função com um for onde o nI := 1 até Length(cStr) e ver se a posição do seu cStr[nI] for o caracter que você quer substituir vc dá um Insert(CharTarget,cStr,nI); e depois Delete(cStr,nI+1,1);. :wink:
A variável cStr é declarada como uma String. E vc passa o Text do Memo pra ela!!! :o
As funções Length() e Delete() estão na SysUtils. :D
É só adicionar e fazer a festa!! 8)


GOSTEI 0
POSTAR