Asignar path para guardar imágenes

[radenf]

Hola amigos:

Necesito asignar un path para insertar archivos de imágenes que se almacenan en una BD de Access, con la siguiente estructura:

Application.ExeName\Dicom Data\Archivos Dicom\fecha de hoy\Estudios\Series\Imagenes

Las carpetas Dicom Data y Archivos Dicom van incluidos en el ejecutable.
Estoy complicado con la asignación de las carpetas Estudios, Series e Imagenes, cuyo valor debiera obtenerlo de un Edit.
Lo que llevo hasta aquí para obtener el path en el siguiente código:

Código Delphi [-]
var
Destino: String;
begin
Destino:= ExtractFilePath(Application.Exename)+ 'Dicom Data\Archivos Dicom\'+ DatetoStr(DateEdit1.Date)+ (lo que me falta);
CopyDir(OpenDialog1.Directory, Destino);
end

Puede alguien iluminarme para completar el código asignando valores a Edit, por ejemplo.

Edit1:= Estudios;
Edit2:= Series;
Edit3:= Imagenes

Para insertarlos en la BD uso el siguiente código:

Código Delphi [-]
EditBD.Text:= Destino;
Data1.TablaImagenes.FieldByName('ARCHIVODICOM').AsString := EditDB.Text;

Saludos y muchas gracias