Busqueda de texto

[Gerson12]

hola amigos de clubdelphi vengo a expresarles una duda que tengo ya que la verdad estoy aprendiendo mucho de este foro y gran ayuda de un amigo ,bueno vamos al grano lo que quiero hacer es una aplicación que busque textos que se le pondra en un edit y el texto sera buscado en un memo pero lo que me crea dificultad es que quiero que el edit solo sea una parte del texto a buscar ahora les dejare un ejemplo.

Ejemplo:


como dije quiero que el edit sea solo una parte de texto a seleccionar pero lo malo es quiero que 'file:' y'exe' sean como textos predeterminados de busqueda


Gracias
Espero que me hayan entendido eh echo lo mejor posible para q me entiendan gracias

[roman]

No estoy seguro de entender pero vamos a ver. Si quieres buscar lo que está en el edit dentro del memo, sólo tendrías que poner:

Código Delphi [-]
Start := Pos(Edit.Text, Memo.Text);
if Start > 0 then
begin
  Memo.SelStart := Start;
  Memo.SelLength := Length(Edit.Text);
end;

Pero si quieres buscar el texto del edit pero sólo si está con el texto predeterminado, puedes concatenar dicho texto al momento de buscar:

Código Delphi [-]
Start := Pos('file:' + Edit.Text + '.exe', Memo.Text);
if Start > 0 then
begin
  Memo.SelStart := Start + Length('file:');
  Memo.SelLength := Length(Edit.Text);
end;

// Saludos

[Gerson12]

Empezado por roman

No estoy seguro de entender pero vamos a ver. Si quieres buscar lo que está en el edit dentro del memo, sólo tendrías que poner:

Código Delphi [-]
Start := Pos(Edit.Text, Memo.Text);
if Start > 0 then
begin
  Memo.SelStart := Start;
  Memo.SelLength := Length(Edit.Text);
end;

Pero si quieres buscar el texto del edit pero sólo si está con el texto predeterminado, puedes concatenar dicho texto al momento de buscar:

Código Delphi [-]
Start := Pos('file:' + Edit.Text + '.exe', Memo.Text);
if Start > 0 then
begin
  Memo.SelStart := Start + Length('file:');
  Memo.SelLength := Length(Edit.Text);
end;

// Saludos

gracias por la respuesta lo provare pero antes disculpame pero otra pregunta
como haria para agregar a otro memo el texto seleccionado por la busqueda

[roman]

Podrías agregarlo como una nueva línea:

Código Delphi [-]
OtroMemo.Lines.Add(Edit.Text);

// Saludos

[Gerson12]

roman disculpa pero el codigo q me enseñas no me soombrea todo lo q quiero solo me sombre lo q esta en el edit lo q yo quiero es sobrear todo incluyendo file: y .exe

[[José Luis Garcí]]

Gerson12, si lo que vas a introducir es la ruta completa, tendrias que modificar sólo al código que te expuso Román lo siguiente

Código Delphi [-]
Start := Pos('file:' + Edit.Text + '.exe', Memo.Text);
if Start > 0 then
begin
  Memo.SelStart := Start + Length('file:');
  Memo.SelLength := Length('File:'+Edit.Text+'.exe');
end;

En caso contrario te indico que es mejor que crees un tabla en memoria carges los datos y busques con un like en Sql.

Esper te sirva de algo la ayuda

[roman]

Empezado por Gerson12

roman disculpa pero el codigo q me enseñas no me soombrea todo lo q quiero solo me sombre lo q esta en el edit lo q yo quiero es sobrear todo incluyendo file: y .exe

Pues es que así lo tienes en la imagen que pusiste Si quieres sombrear todo entonces así:

Código Delphi [-]
Start := Pos('file:' + Edit.Text + '.exe', Memo.Text);
if Start > 0 then
begin
  Memo.SelStart := Start;
  Memo.SelLength := Length('file:' + Edit.Text + '.exe');
end;

// Saludos

[Gerson12]

hola amigos quisiera hacerles una pregunta es que segun eh visto por internet se puede obtener un texto de un memo supongamos que en el el texto esta escrito esto:

gfdg
df
gdf
g
dfgdfgdfg
holaamigosclubdelphi
dsf
sdfsdfsdfsdfsdf
sdfdsholaamigosclubdelphi

como veran yo quiero que el texto que dice'holaamigosclubdelphi' eso me obtenga y salga en otro memo
es posible hacer eso ¿?


Estuve averiguando y segun parece se tiene que usar settext o gettex pero realmente estoy confundido

[roman]

Bueno, realmente esto ya lo preguntaste y se te respondió en el otro hilo. Detente a estudiar un poco las respuestas que te dimos para que aprendas a aplicar la técnica en este y otros casos.

//Saludos

[Gerson12]

hola Roman pero lo que yo pregunte en el hilo pasado fue para hacer una busqueda o puede ser similar al otro hilo ¿? y q es get text(ya se q es obtener text xD) pero aparte como puedo usar un get text eso mas me interesa saber

[roman]

Pues para encontrar el texto que dices tienes precisamente que hacer una búsqyeda, o sea, lo mismo que en el hilo anterior. No veo que relación pueda tener eso con GetText o SetText.

// Saludos

[Gerson12]

pero yo quiero q lo buscado se agrege a otro memo diferente