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:
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