Ayuda kn este programa :S

[[Caral]]

Hola
Comienzo:
Crea un nuevo proyecto, osea, abre delphi y se creara solo.
Veremos el form1 en blanco.
Presiona el boton Guardar (arriba en el menu), crea una carpeta (en la pantalla que sale) y guarda el Unit1 dentro de ella.
Luego presiona el boton save all y guarda el proyecto en la misma carpeta.
Listo, me sigues?.
Saludos

[llSnakell]

sip
sorry que estaba en otra !!
dale !!
listo

[[Caral]]

Hola
En el menu de delphi hay varias paletas con los componentes, la primera se llama Standard, de ahi colocaremos en el form:
Un Tmemo.
Tres Botones.

No posicionamos en el memo y en el vemos (en la pantallita pequeña de la izquieda) las propiedades.
Nos vamos a la propiedad Lines y presionamos donde dice (Tstrings).
Ahi nos saldra una pantalla con Tmemo escrito dentro, simplemente borralo y presiona OK.

En el Caption de los botones pondremos en uno VER y en el otro Guardar y en el otro Cerrar.

Me sigues?
Saludos

[llSnakell]

listo !! te sigo !!
que mas !!!

[[Caral]]

Hola
Vamos a crear una variable local para que nos de la ruta del archivo que vamos a tener:
En el Unit (la zona Blanca) veremos que existe esto:

Código Delphi [-]
var
  Form1: TForm1;

implementation

Simplemente colocaremos la variable ahi mismo, quedara asi:
La nombraremos Ruta:

Código Delphi [-]
var
  Form1: TForm1;
  Ruta: String;

implementation

Me sigues?
Saludos

[llSnakell]

ok listo !!
String es una cadena que sirve para recibir los resultados ??
o algo parecido ???
es lo que entiendo yo !!
dale

[[Caral]]

Hola
Lo que hace esa variable (Ruta) es recoger el resultado (en texto) de lo que contiene la Dirección del archivo que usaremos para el archivo.

Seguimos:

Dale doble click al boton CERRAR, te saldra el evento OnClick y ponemos esto:

Código Delphi [-]
Close;

Dale Doble click al boton GUARDAR y colocaremos esto:

Código Delphi [-]
  Ruta:= ExtractFilePath(Application.exename);
  Memo1.Lines.SaveToFile(Ruta + 'Notas.txt');
  Showmessage('Archivo Guardado');
  Memo1.Lines.Clear;

1- Aqui (Ruta:= ExtractFilePath(Application.exename); ) la ruta sera el mismo directorio donde este el programa.
2- Aqui (Memo1.Lines.SaveToFile(Ruta + 'Notas.txt'); ) dice que Salve o guarde las lineas, el contenido del memo dentro del archivo Notas.txt. (asi lo hemos denominado)
3- Aqui (Showmessage('Archivo Guardado'); ) nos muestra un mensaje.
4- Aqui ( Memo1.Lines.Clear; ) nos limpia el memo.


Dale doble click al boton VER y coloca esto:

Código Delphi [-]
 Ruta:= ExtractFilePath(Application.exename);
 Memo1.Lines.LoadFromFile(Ruta + 'Notas.txt');

1- Aqui (Ruta:= ExtractFilePath(Application.exename); ) Nos muestra la ruta de nuestro programa.
2- Aqui (Memo1.Lines.LoadFromFile(Ruta + 'Notas.txt'); ) Recoge los datos del archivo Notas.txt y los muestra en el memo.

Ahora corre el programa, escribe algo en el memo y presiona Guardar, veras que te muestra el mensaje y el memo queda en blanco, si presionas el boton ver podras ver lo que guardaste, lo puedes modificar y volver a guardar y ver.

Espero que esto te enseñe el concepto basico de guardar datos en un archivo.

Espero haber servido de ayuda.
Saludos

[Neftali [Germán.Estévez]]

Te recomiendo el libro "La cara oculta de Delphi". Es de lo mejorcito que hay para empezar (además de ir preguntando por aquí ).