función POS

[petete2008]

Lcategorias:='5#1408#';
cadena:='1408#';

if (Pos(Lcategorias,cadena)>0) then
showmessage('encontrado')
else
showmessage('no encontrado');


¿porque dá 'no encontrado' cuando debería ser 'encontrado'?
Gracias.

[WkaymQ48]

Prueba así:

if (Pos(cadena,Lcategorias)>0) then

[Casimiro Notevi]

...
Recuerda poner títulos descriptivos a tus preguntas, gracias :)

[juanlaplata]

Tal como dice WkaymQ48 , la fuente en F1.

function Pos(Substr: string; S: string): Integer;

Description

Pos searches for a substring, Substr, in a string, S. Substr and S are string-type expressions.

Pos searches for Substr within S and returns an integer value that is the index of the first character of Substr within S. Pos is case-sensitive. If Substr is not found, Pos returns zero.

[petete2008]

Prueba así:
Código Delphi [-] (http://www.clubdelphi.com/foros/#)if (Pos(cadena,Lcategorias)>0) then




Gracias, solucionado!!
Se me ha ido la "pinza" totalmente y lo había puesto al reves, jajaja.