FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Guardar datos de renglón
Buenas tardes mi duda es la siguiente, supongamos que tengo un arreglo
Tengo un memo donde escribo una palabra y la comparo con ese arreglo, ahora mi duda es como hacer que cuando encuentre esa palabra me tome todos los datos que estan en ese renglon y me los guarde en otro memo POR EJEMPLO SUPONGAMOS QUE EN EL MEMO ESCRIBO ESTO: HOLA DB HOLA La palabra que encontraria al compararse el memo con el arreglo seria DB por lo tanto quiero que tome todo el renglon HOLA DB HOLA y me lo guarde en otro memo, la comparacion ya la tengo pero no se como tomar solo los datos de ese renglon y los guarde en el memo de ante mano muchas gracias espero puedan ayudarme |
#2
|
||||
|
||||
Cita:
Según entiendo de tu mensaje, podrías hacer:
Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#3
|
||||
|
||||
Hola de nuevo.
No especificaste en que momento querías transferir las líneas. En el mensaje anterior se van pasando de forma interactiva (a medida que agregás una nueva línea), pero si deseas hacerlo de forma diferida:
Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#4
|
|||
|
|||
Si tienes razon disculpame quiero hacerlo al presionar un boton ese mismo boton comparara el memo con el arreglo y pues ara esa funcion, muchas gracias por tu respuesta eres muy amable
Pero creo que tampoco no me di a entender bien en mi explicacion jeje no solo quiero que me lea el primer renglon si no que me busque en todo el memo donde esta dato del arreglo y ya me lo mande al memo2 por ejemplo si tengo este codigo Cita:
Cita:
|
#5
|
||||
|
||||
Hola,
El código que te muestra el compañero en su anterior mensaje hace exactamente lo que tú precisas: buscar en todo el "Memo1" y almacenar en "Memo2" sólo las líneas en que se hubieran encontrado las palabras "clave". Lo que pasa es que para hacer eso tienes que recorrer el "Memo1" tal como lo hace el compañero, línea por línea, buscando en cada línea por cada palabra "clave". |
#6
|
|||
|
|||
Lo que pasa es que al poner el codigo por ejemplo
en el memo1 escribo esto Código:
Feliz db "=>$" Serio db "=]$" Decepcionado db "=/$" Triste db "=<$" Código:
Triste db "=<$" |
#7
|
||||
|
||||
Hola,
Lo que pasa es que el código que tú utilizas:
... no es el mismo que el que Daniel te propone arriba:
|
#8
|
|||
|
|||
Si entiendo a lo que te refieres lo que pasa es que yo lo acomode segun a mi modo porque lo que quiero es que al hacer click en un boton me lea automaticamente todo el memo1 y los datos encontrados los mande todos juntos al memo2, eso es lo que supongo yo que no me di a explicar bien.
Lo que el compañero me brindo (LO CUAL AGRADESCO MUCHISIMO) funciona al darle a una tecla o con un click pero yo lo que quiero es agregar un boton y al presionar ese boton lea todo y ponga lo encontrado en el memo2, muchas gracias por tus comentarios y consejos y lamento las molestias. |
#9
|
||||
|
||||
Hola,
No tienes que disculparte, pero, el código que ha puesto Daniel más arriba hace exactamente lo que precisas:
Ahí se recorre el "Memo1" línea a línea, se busca cada palabra clave en cada línea, y, si se encuentra, se añade la línea al "Memo2". Última edición por dec fecha: 01-05-2014 a las 15:38:55. |
#10
|
||||
|
||||
Mantixd,
Cita:
El código anterior en Delphi 7 y Windows 7 Professional x32, analiza cada línea del TMemo1, las compara tipo Case Sensitive con un arreglo y si haya una ocurrencia copia dicha línea a TMemo2, siguiendo el mismo comportamiento sugerido en el ejemplo del Msg #4. Espero sea útil Nelson. |
#11
|
|||
|
|||
Muchas gracias nelson lo que es no saber mucho acerca de delphi lo bueno es que gracias a uds. Uno puede aprender mucho mas lo unico que vi es que en el memo 2 me imprime el dato 2 veces por ejemplo pongo
HOLA DB HOLA y me lo imprime en el memo2 HOLA DB HOLA HOLA DB HOLA Muchisimas gracias a todos de verdad han sido de gran ayuda! |
#12
|
||||
|
||||
Mantixd,
Cita:
Revisa estas imágenes: Las imágenes anteriores fueron tomadas del código sugerido en el Msg #10, funcionando correctamente según lo esperado, siguiendo el mismo comportamiento sugerido en el ejemplo del Msg #4. Espero que sea útil Nelson. |
#13
|
||||
|
||||
Hola Mantixd.
No voy a agregar nada a lo que David ha explicado perfectamente. Solo se me ocurre mencionar que si deseas que funcione tanto para lo escrito en minúsculas como para mayúsculas, sólo hay que aplicar la función UpperCase a la línea que se está revisando:
Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#14
|
|||
|
|||
Claro que me fue de mas util, y fue mi error lo que pasa es que vi en otras publicaciones el mismo codigo que tu mismo habias posteado pero para que lo imprimiera en un listbox creo jeje y en ese codigo pusiste esta linea asi
y pues en este codigo ya no pusiste la parte del UpperCase y yo si la habia dejado jeje y por eso me imprimia doble ya ahora si quedo todo solucionado muchas gracias Nelson! |
#15
|
|||
|
|||
Hola disculpen perdon que me entrometa por aqui, este codigo si me puede servir mucho pero lo que yo estoy buscando es que me imprima en un memo2 todos los datos que sean diferentes al arreglo, por ejemplo si tengo
Que solo me guarde el HOLA HOLA lo que tengo es esto pero pues creo que me hace falta algo agradeceria mucho su ayuda
|
#16
|
||||
|
||||
Pedron,
Cita:
El código anterior en Delphi 7 y Windows 7 Professional x32, analiza cada línea de TMemo1, las compara tipo Case Sensitive con un arreglo y copia dicha línea a TMemo2 eliminando cualquier ocurrencia encontrada. Espero sea útil Nelson. |
#17
|
|||
|
|||
Hola nlsgarcia Muchisimas gracias por tu respuesta tan rapida probe el codigo que me mandaste probe con elementos que no estan dentro del arreglo y pues los pone en el memo2 pero al poner un elemento que si esta dentro del arreglo me manda este error de ante mano muchisimas gracias.
|
#18
|
||||
|
||||
Pedron,
Cita:
Revisa esta imagen: El código sugerido en el Msg #16 funciona según lo esperado como se puede apreciar en la imagen anterior. Pregunto: 1- ¿Modificastes el código sugerido en el Msg #16? 2- ¿Que data utilizastes en el Memo1 que origino el error?, ¿Que valores tienes en el arreglo de comparación?. Espero sea útil Nelson. Última edición por nlsgarcia fecha: 03-05-2014 a las 06:26:04. |
#19
|
|||
|
|||
ese es mi codigo que utilizo no le he cambiado ningun dato a tu codigo que me mandaste y pues al momento de poner AX me da ese error espero y puedas ayudarme saludos y muchas gracias! |
#20
|
||||
|
||||
Hola Pedron.
Ya habías creado un hilo con la consulta del mensaje #15, por favor no dupliques los temas ya que dificultan las búsquedas posteriores.
Resultado: Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Guardar datos en Base de Datos MySQL | knnibal | Conexión con bases de datos | 6 | 23-06-2011 15:36:42 |
añadir un renglón a un dbgrid | olybola | Varios | 8 | 07-06-2010 21:23:15 |
Ir al ultimo renglon en un StringGrid | palets | Varios | 2 | 18-02-2009 22:11:59 |
Guardar en 1 base de datos SQL, datos procedentes de 2 tablas distintas | adaypr | C++ Builder | 1 | 05-09-2006 11:56:33 |
agregar un renglón al dbgrid | olybola | Conexión con bases de datos | 1 | 26-06-2003 20:58:03 |
|