Buscar substring en string con IndexOf?

[Belaix]

Hola

Este es mi primer mensaje y seguro que no último en este foro. Llevo unos dias dandole vueltas ... y es una gran fuente de información. Gracias

Estoy tratando de averiguar como puedo meter en una variable integer la posición de un substring en un string (si se encuentra), buscando ese substring desde una posición predeterminada en vez desde el principio del string (Como lo haría POS).

O sea lo que hace exactamente este código: ... pero a mi no me va porque supongo ... que es delphi.net?

program Project1;
{$APPTYPE CONSOLE}

var
strA : String;
result : Integer;

begin
strA := 'ABCABCABC';

Console.WriteLine('Guide= 0123456789');
Console.WriteLine('strA = ' + strA);

result := strA.IndexOf('ABC', 5, 3);
Console.WriteLine('Looking for ABC, starting @ 5 for count of 3');
Console.WriteLine('Result = ' + result.ToString);

result := strA.IndexOf('ABC', 5, 4);
Console.WriteLine('Looking for ABC, starting @ 5 for count of 4');
Console.WriteLine('Result = ' + result.ToString);

Console.ReadLine;
end.

O sea ... esto se puede hacer desde delphi? Alguien lo sabe?

result := strA.IndexOf('ABC', 5, 3);

Saludos

[jhonny]

Mira la función PosEx de la unidad StrUtils, seguramente es la que necesitas .

Código Delphi [-]
const
   Texto = 'ABCDEFGABC';
begin
  ShowMessage(IntToStr(PosEx('ABC', Texto, 8)));
end;

[Belaix]

Efectivamente Jhonny !!!


Me salvaste la vida, porque me urgía.

Programé en pascal hace mas de 10 años, y apenas me acuerdo de nada, con delphi llevo con hoy, unas 10 horas , en las que 4h me las he pasado buscando por todos lados una solución a esto ... ya que para lo que quiero hacer la función POS, no es conveniente ...

No sabía ni que existia esa función, ni esa unit.

Mil gracias compañero

[jhonny]

Bueno, me alegra haber sido util .