Arcobjects获得一个图层元数据-获得文件路径和名称

//获得文件路径和名称 by yl landgis@126.com yanleigis@21cn.com

procedure GetPathFileName(pFeatureLayer: IFeatureLayer; var Path, FileName:
widestring);
var
pFeatureClass : IFeatureclass;

begin

pFeatureLayer.Get_FeatureClass(pFeatureClass);
GetPathFileName(pFeatureClass, Path, FileName);

end;

//获得文件路径和名称 by yl landgis@126.com yanleigis@21cn.com

procedure GetPathFileName(pFeatureClass: IFeatureclass; var Path, FileName:
widestring); overload;
var

pWorkspace : IWorkspace;
pDataset : IDataset;
begin
//DataType := GetDataType(pFeatureLayer);
pWorkspace := GetWorkspace(pFeatureClass);
pWorkspace.Get_PathName(Path);
pDataset := pFeatureClass as IDataset;
pDataset.Get_BrowseName(FileName);

end;