Utilizar SaveToFile y LoadToFile

[creus]

Estoy intentando guardar un texto con un nombre de archivo el cual escribo en un edit.
Para esto uso el siguiente codigo

Código Delphi [-]
begin
   try
      with MENU.Memo.Lines do
      begin
         Memo.Lines.SaveToFile(Edit.Text);
      end;
   except
      begin
         showmessage ( 'No hay archivo para guardar' );
      end;
   end;
end;

Este archivo despues lo traspaso a un ListBox donde hay varios ejercicios más.

Necesito poder escojer un ejercicio del ListBox, cargarlo y que el texto del ejercicio me aparezca en el Memo.


No se si me he explicado bien pero de todos modos muchas gracias por la atención.