s :=path; filename :=ExtractFileName(s);