//---------------------------------------------------------------------------
String TForm1::LJname(String LJpath) //路径取出文件夹名
{
String Lname="";
for(int i=LJpath.Length();i>=1;i--)
{
if ( LJpath.SubString(i,1)!="\\" )
{
Lname=LJpath.SubString(i,1)+Lname;
}
else
break;
}
return Lname;
}