FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
campos memos
esto del memo funciona de la misma manera con dbmemo.
así que pon un dbmemo y conectalo a la tabla correspondiente y crea un ciclo mas o menos así for i:=0 to dbmemo1.lines.capacity do // esto recorrera todo el dbmemo hasta el final de sus lineas. if dbmemo1.lines.strings[i] = 'lo que busques' then // y asi haces la comparacion. suerte |
#2
|
|||
|
|||
Otra forma
Ahi te va otra forma de hacerlo...
usaremos un TRichEdit en lugar del memo Código:
Procedure TForm1.... Var Encontrado : LongInt; Desde, Hasta : Integer; Cad : String; Begin Cad := 'Cadena a Buscar'; RichEdit1.Lines.Assign(Tabla.FielByName('campoMemo')); //Ahora la busqueda If RichEdit1.SelLength <> 0 then Desde := RE1.SelStart + RE1.SelLength Else Desde := 0; Hasta := Length(RichEdit1.Text) - Desde; Encontrado := RichEdit1.FindText(Cad, Desde, Hasta, [stMatchCase]); If Encontrado <> -1 then ShowMessage('La palabra se encontro en : '+IntToStr(Encontrado)) Else ShowMessage('No se encontro la palabra'); End; como siempre a tus ordenes y siempre con buena cara
__________________
saludos desde Puebla Mexico.. asanxt@hotmail.com "como siempre a sus ordenes y siempre con buena cara" 'lolita me excitas, perversa piel de melocotón' |
#3
|
||||
|
||||
Bueno, peroooo, ¿en qué momento dijo nvalerio que estaba buscando datos en un memo, dbmemo o richedit. Yo por campo memo entiendo un campo de una base de datos y por búsqueda en un campo memo entiendo búsqueda de registros con un texto determinado en dicho campo.
// Saludos |
#4
|
|||
|
|||
Asi es...
Asi es como dices compañero roman.. por eso pense..
si lo va a hacer con un memo y recorrerlo todo mejor le damos otra idea mas productiva no crees ademas no le caeria mal otra forma de hacerlo je como siempre a sus ordenes y siempre con buena cara
__________________
saludos desde Puebla Mexico.. asanxt@hotmail.com "como siempre a sus ordenes y siempre con buena cara" 'lolita me excitas, perversa piel de melocotón' |
|
|
|