Hola carlosprotos.
Usando la función anterior, un ejemplo para obtener: ruta + nombre + extensión, nombre + extensión y el nombre solo:
Código Delphi
[-]
var
FullName, NameAndExt, OnlyName: string;
begin
FullName:= LastModifiedFile('C:\Users\Rodrix\AppData\Local\Tmp');
NameAndExt:= ExtractFileName(FullName);
OnlyName:= ChangeFileExt(NameAndExt, '');
ShowMessage(FullName + #10 + NameAndExt + #10 + OnlyName);
...
Saludos
