Ir al contenido


Foto

Extraer informacion de un archivo texto.


  • Por favor identifícate para responder
9 respuestas en este tema

#1 Jaime08

Jaime08

    Newbie

  • Miembros
  • Pip
  • 6 mensajes
  • LocationAntigua & Barbados

Escrito 13 noviembre 2008 - 10:29

Primero que nada gracias por leer esta consulta.
Tengo en un formulario un tmemo y un tbutton.
Lo que quiero es que de un archivo texto se obtenga la informacion y se muestre en el memo cuando se presione el boton.
Cualquier sugerencia sera bienvenida, gracias.
  • 0

#2 eduarcol

eduarcol

    Advanced Member

  • Administrador
  • 4.483 mensajes
  • LocationVenezuela

Escrito 13 noviembre 2008 - 10:35

puedes utilizar el metodo LoadFromFile del TMemo, y como parametro le pasas la ruta del archivo.  Si quieres que te salga la ventana para seleccionar el archivo puedes utilizar un TOpenDialog
  • 0

#3 Jaime08

Jaime08

    Newbie

  • Miembros
  • Pip
  • 6 mensajes
  • LocationAntigua & Barbados

Escrito 13 noviembre 2008 - 10:42

gracias por responder.
donde esta ese metodo LoadFromFile, no lo veo en properties ni en events, como se usa. :-[
me podrias dar un ejemplo.

  • 0

#4 eduarcol

eduarcol

    Advanced Member

  • Administrador
  • 4.483 mensajes
  • LocationVenezuela

Escrito 13 noviembre 2008 - 10:50

agrega al formulario:

1 Memo
1 Boton
1 Open Dialog(Pestaña Dialogs)

en el evento on click del boton coloca este codigo



delphi
  1.   Opendialog1.Filter := '*.TXT';  //Indica que solo busque archivos de texto
  2.    if OpenDialog1.Execute then     //Abre el cuadro de dialogo
  3.       Memo1.Lines.LoadFromFile(OpenDialog1.FileName);  //Carga el archivo en el memo


  • 0

#5 Jaime08

Jaime08

    Newbie

  • Miembros
  • Pip
  • 6 mensajes
  • LocationAntigua & Barbados

Escrito 13 noviembre 2008 - 11:28

gracias, funciono perfecto.
otra pregunta, si el texto es muy grande no se ve completo, como hago para ponerle unas flechas de desplazamiento.
si me lo explica con otro codigo se lo agradecere.
gracias por la ayuda
  • 0

#6 Fenareth

Fenareth

    Advanced Member

  • Administrador
  • 3.486 mensajes
  • LocationMexico City

Escrito 13 noviembre 2008 - 11:40

Intenta con la propiedad ScrollBars del TMemo...

Saluditos  :D
  • 0

#7 eduarcol

eduarcol

    Advanced Member

  • Administrador
  • 4.483 mensajes
  • LocationVenezuela

Escrito 13 noviembre 2008 - 11:47

Intenta con la propiedad ScrollBars del TMemo...

Saluditos  :D


Para que no se diga que se hace a medias:



delphi
  1. Memo1.ScrollBars := ssVertical;



aunque podrias hacerlo desde el inspector de objetos...
  • 0

#8 Fenareth

Fenareth

    Advanced Member

  • Administrador
  • 3.486 mensajes
  • LocationMexico City

Escrito 13 noviembre 2008 - 11:53


Intenta con la propiedad ScrollBars del TMemo...

Saluditos  :D


Para que no se diga que se hace a medias:



delphi
  1. Memo1.ScrollBars := ssVertical;



aunque podrias hacerlo desde el inspector de objetos...


:o Como decimos aqui... peladito y en la boca ?  :p...
No fue a medias amiguito Eduardo... es sólo que me di cuenta de que Jaime08 ya sabe cómo dirigirse a las propiedades de los componentes y con el nombre de la misma a modificar, me pareció más que suficiente  :D...

Pero bueno amiguito Jaime08 no puedes negar que se te trata bien, jejejeje  :)
  • 0

#9 Jaime08

Jaime08

    Newbie

  • Miembros
  • Pip
  • 6 mensajes
  • LocationAntigua & Barbados

Escrito 13 noviembre 2008 - 11:58

gracias, ya me funciono, perfecto.
el trato es de lo mejor, muchas gracias.
cuando tenga otra duda regreso a molestar. :D
  • 0

#10 eduarcol

eduarcol

    Advanced Member

  • Administrador
  • 4.483 mensajes
  • LocationVenezuela

Escrito 13 noviembre 2008 - 11:59

ok, pasa por caja y das mi nombre cuando te pregunten quien te atendio, tu sabes por la comision jajaja


PD. Es broma, un placer servir por aqui
  • 0




IP.Board spam blocked by CleanTalk.