Foros Club Delphi - Buscas semejanza

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)

- - Buscas semejanza (https://www.clubdelphi.com/foros/showthread.php?t=56418)

mefixxto

16-05-2008 16:14:43

Buscas semejanza

Quisiera que cuando inserte un texto en un textbox examite que el texto termine con "." (con un punto)

Como hago???

ContraVeneno

16-05-2008 16:19:04

Código Delphi [-]If RigthStr(UnTexto.Text, 1) = '.' then 'Sí termina' else 'No Termina';

mefixxto

16-05-2008 16:21:52

Cita:

Empezado por ContraVeneno (Mensaje 287187)

Código Delphi [-]If RigthStr(UnTexto.Text, 1) = '.' then 'Sí termina' else 'No Termina';

Me sale que no existe el identificador RigthStr....
Hay que aumentar algo en uses???

Luis M.

16-05-2008 16:33:51

Hola.

Es RightStr.
En el uses la unidad StrUtils.

Un saludo.

mefixxto

16-05-2008 16:42:17

Muchas gracias ya funco...:D

La franja horaria es GMT +2. Ahora son las 06:16:47.