设计一个函数返回给定文件名的后缀名
def get_suffix(filename, has_dot=False):

 """
 获取文件名的后缀名

 :param filename:文件名
 :param has_dot:返回的后缀名是否需要带点
 :return:文件的后缀名
 """


 pos = filename.rfind('.')
 if 0 < pos < len(filename) - 1:
  index = pos if has_dot else pos + 1
  return filename[index:]
 else:
  return ''

测试
print(get_suffix('aa'))
print(get_suffix('aa.txt'))
print(get_suffix('aa.py'))
print(get_suffix('aa.txt.py'))

设计一个函数返回给定文件名的后缀名


本来想着这自己的思路没有错，能输出结果，寻寻觅觅，发现自己正逆序没弄清楚。

虽然我这个代码一开头是以逆序遍历的，可是我index用错了，利用index找i又会正序找，所以结果不是自己想要的

def fun(filename)😗

myfile = filename

for i in range(len(myfile)-1,-1,-1):

if myfile[i] == “.”:

return myfile[i:]

result=fun(“student.txt.zip”)

print(result)

这是改了过后的，用长度的话可以直接寻找下标，不用弄不清正反，还有一个是将index改为rindex这样的话就会从右边找起，也不会找到前面的“.”号。


文件名操作常用函数 


通过下面的函数，可以方便地对文件名进行操作： 

1. ExpandFileName 

将当前驱动器名(盘符)、路径名和指定的文件名合成一个绝对文件名。 

函数原型如下： 

function ExpandFileName(const FileName: string): string; 

返回值为合成的绝对文件名。 

2. ExpandUNCFileName 

获取一个以U N C格式的包括网络驱动器名的绝对文件名。 

函数原型如下： 

function ExpandUNCFileName(const FileName: string): string; 

3. ExtractFileDir 

从绝对文件名中获取目录名。 

函数原型如下： 

function ExtractFileDir(const FileName: string): string; 

4. ExtractFileDrive 

从绝对文件名中获取驱动器号(盘号)。 

函数原型如下： 

function ExtractFileDrive(const FileName: string): string; 

5. ExtractFileExt 

从绝对文件名中获取文件名的扩展名。 

函数原型如下： 

function ExtractFileExt(const FileName: string): string; 

6. ExtractFileName 

从绝对文件名中获取文件名。 

函数原型如下： 

function ExtractFileName(const FileName: string): string; 

7. ExtractFilePath 

从绝对文件名中获取路径名。 

函数原型如下： 

function ExtractFilePath(const FileName: string): string; 

8. ExtractRelativePath 

从绝对文件名中获取相对于某一个路径的相对路径名。 

函数原型如下： 

function ExtractRelativePath(const BaseName, DestName: string): string; 

9. ExtractShortPathName 

将长文件名转化成短文件名。 

函数原型如下： 

function ExtractShortPathName(const FileName: string): string;


日期时间函数
SysUtils.StrToDate();

SysUtils.StrToDateDef();

SysUtils.TryStrToDate();


SysUtils.StrToTime();

SysUtils.StrToTimeDef();

SysUtils.TryStrToTime();


SysUtils.StrToDateTime();

SysUtils.StrToDateTimeDef();

SysUtils.TryStrToDateTime();


SysUtils.DateToStr();

SysUtils.TimeToStr();

SysUtils.DateTimeToStr();

SysUtils.DateTimeToString();


SysUtils.FormatDateTime();
{

  d: TDateTime;

  str: string;

  fmt: TFormatSettings;

begin

  d := StrToDateTime('2009-5-21 11:22:33');


  str := DateTimeToStr(d);

  ShowMessage(str);  // 2009-5-21 11:22:33


  GetLocaleFormatSettings(GetThreadLocale, fmt);

  fmt.DateSeparator := '/';

  fmt.TimeSeparator := '_';

  fmt.ShortDateFormat := 'dd/mm/yyyy';

  fmt.ShortTimeFormat := 'hh:mm:ss';

  str := DateTimeToStr(d, fmt);

  ShowMessage(str);  // 21/05/2009 11_22_33


  DateTimeToString(str, 'yyyy 年 m 月 d 日 h 点 m 分 s 秒', d);

  ShowMessage(str); //2009 年 5 月 21 日 11 点 22 分 33 秒

}


delphi 时间差函数及部分字符串与日期时间相互转换的函数


首先使用dateutils单元，即 uses dateutils；


yearsbetween(开始时间,结束时间)-------------中间相差多少年 保留整数部分


monthsbetween(开始时间,结束时间)-------------中间相差多少月 保留整数部分


daysbetween(开始时间,结束时间)-------------中间相差多少天 保留整数部分


hoursbetween(开始时间,结束时间)-------------中间相差多少小时 保留整数部分 


以此类推 分钟、秒


yearspan(开始时间,结束时间)-------------中间相差多少年 小数表示


monthspan(开始时间,结束时间)-------------中间相差多少月 小数表示


以下以此类推


━━━━━━━━━━━━━━━━━━━━━

　　首部 function IsLeapYear(Year: Word): Boolean; $[SysUtils.pas

　　功能 返回年份Year是否是闰年

　　说明 (Year mod 4 = 0) and ((Year mod 100 <> 0) or (Year mod 400 = 0))

　　参考 

　　例子 CheckBox1.Checked := IsLeapYear(SpinEdit1.Value);

　　━━━━━━━━━━━━━━━━━━━━━


首部 function DateToStr(const DateTime: TDateTime): string; $[SysUtils.pas

　　功能 返回日期DateTime转换成字符串

　　说明 转换格式由系统变量ShortDateFormat控制

　　参考 function SysUtils.DateTimeToString;var SysUtils.ShortDateFormat

　　例子 Edit1.Text := DateToStr(Date);

　　━━━━━━━━━━━━━━━━━━━━━

　　首部 function TimeToStr(const DateTime: TDateTime): string; $[SysUtils.pas

　　功能 返回时间DateTime转换成字符串

　　说明 转换格式由系统变量LongTimeFormat控制

　　参考 function SysUtils.DateTimeToString;var SysUtils.LongTimeFormat

　　例子 Edit1.Text := TimeToStr(Date);

　　━━━━━━━━━━━━━━━━━━━━━

　　首部 function DateTimeToStr(const DateTime: TDateTime): string; $[SysUtils.pas

　　功能 返回日期时间DateTime转换成字符串

　　说明 转换格式由系统变量ShortDateFormat和LongTimeFormat控制

　　参考 function SysUtils.DateTimeToString

　　例子 Edit1.Text := DateTimeToStr(Now);

　　━━━━━━━━━━━━━━━━━━━━━

　　首部 function StrToDate(const S: string): TDateTime; $[SysUtils.pas

　　功能 返回字符串S转换成日期

　　说明 字符非日期表达时将引起异常

　　参考 function SysUtils.TryStrToDate

　　例子 DateTimePicker1.Date := StrToDate(Edit1.Text);

　　━━━━━━━━━━━━━━━━━━━━━

　　首部 function StrToDateDef(const S: string; const Default: TDateTime): TDateTime; $[SysUtils.pas

　　功能 返回字符串S转换成日期

　　说明 字符非日期表达时则返回默认值Default

　　参考 function SysUtils.TryStrToDate

　　例子 DateTimePicker1.Date := StrToDateDef(Edit1.Text, Date);

　　━━━━━━━━━━━━━━━━━━━━━


首部 function TryStrToDate(const S: string; out Value: TDateTime): Boolean; $[SysUtils.pas

　　功能 返回字符串S转换成日期Value是否成功

　　说明 字符非日期表达时返回False并且Value将输出为0

　　参考 

　　例子

　　///Begin TryStrToDate

　　procedure TForm1.Button1Click(Sender: TObject);

　　var

　　vDateTime: TDateTime;

　　begin

　　CheckBox1.Checked := TryStrToDate(Edit1.Text, vDateTime);

　　DateTimePicker1.Date := vDateTime;

　　end;

　　///End TryStrToDate

　　━━━━━━━━━━━━━━━━━━━━━

　　首部 function StrToTime(const S: string): TDateTime; $[SysUtils.pas

　　功能 返回字符串S转换成时间

　　说明 字符非时间表达时将引起异常

　　参考 function SysUtils.TryStrToTime

　　例子 DateTimePicker1.Time := StrToTime(Edit1.Text);

　　━━━━━━━━━━━━━━━━━━━━━

　　首部 function StrToTimeDef(const S: string; const Default: TDateTime): TDateTime; $[SysUtils.pas

　　功能 返回字符串S转换成时间

　　说明 字符非时间表达时则返回默认值Default

　　参考 function SysUtils.TryStrToTime

　　例子 DateTimePicker1.Time := StrToTimeDef(Edit1.Text, Time);

　　━━━━━━━━━━━━━━━━━━━━━

　　首部 function TryStrToTime(const S: string; out Value: TDateTime): Boolean; $[SysUtils.pas

　　功能 返回字符串S转换成时间Value是否成功

　　说明 字符非时间表达时返回False并且Value将输出为0

　　参考 

　　例子

　　///Begin TryStrToTime

　　procedure TForm1.Button1Click(Sender: TObject);

　　var

　　vDateTime: TDateTime;

　　begin

　　CheckBox1.Checked := TryStrToTime(Edit1.Text, vDateTime);

　　DateTimePicker1.Time := vDateTime;

　　end;

　　///End TryStrToTime

　　━━━━━━━━━━━━━━━━━━━━━

　　首部 function StrToDateTime(const S: string): TDateTime; $[SysUtils.pas

　　功能 返回字符串S转换成日期时间

　　说明 字符非日期时间表达时将引起异常

　　参考 function SysUtils.TryStrToDateTime

　　例子 Edit1.Text := DateTimeToStr(StrToDateTime(Edit2.Text));

　　━━━━━━━━━━━━━━━━━━━━━


首部 function StrToDateTimeDef(const S: string; const Default: TDateTime): TDateTime; $[SysUtils.pas

　　功能 返回字符串S转换成日期时间

　　说明 字符非日期时间表达时则返回默认值Default

　　参考 function SysUtils.TryStrToDateTime

　　例子 Edit1.Text := DateTimeToStr(StrToDateTimeDef(Edit2.Text, Now));

　　━━━━━━━━━━━━━━━━━━━━━

　　首部 function TryStrToDateTime(const S: string; out Value: TDateTime): Boolean; $[SysUtils.pas

　　功能 返回字符串S转换成日期时间Value是否成功

　　说明 字符非日期时间表达时返回False并且Value将输出为0

　　参考 

　　例子

　　///Begin TryStrToDateTime

　　procedure TForm1.Button1Click(Sender: TObject);

　　var

　　vDateTime: TDateTime;

　　begin

　　CheckBox1.Checked := TryStrToDateTime(Edit1.Text, vDateTime);

　　Edit2.Text := DateTimeToStr(vDateTime);

　　end;

　　///End TryStrToDateTime

　　━━━━━━━━━━━━━━━━━━━━━

　　首部 function FormatDateTime(const Format: string; DateTime: TDateTime): string; $[SysUtils.pas

　　功能 返回用指定的格式Format来格式化日期时间DateTime

　　说明 FormatDateTime('YYYY"年"MM"月"DD"日"', StrToDate('2002-03-09')) = '2002年03月09日'

　　参考 function SysUtils.DateTimeToString

　　例子 Edit2.Text := FormatDateTime(Edit1.Text, Now);

　　━━━━━━━━━━━━━━━━━━━━━

　　首部 procedure DateTimeToString(var Result: string; const Format: string; DateTime: TDateTime); $[SysUtils.pas

　　功能 用指定的格式Format来格式化日期时间DateTime并返回到字符串Result中

　　说明 <参见FormatDateTime>

　　参考 function System.SetString

　　例子 <参见FormatDateTime>

　　━━━━━━━━━━━━━━━━━━━━━

　　首部 function FloatToDateTime(const Value: Extended): TDateTime; $[SysUtils.pas

　　功能 返回浮点数转换成日期时间类型

　　说明 如果浮点数超出范围将触发异常

　　参考 function System.Int

　　例子 Edit2.Text := DateTimeToStr(FloatToDateTime(StrToFloatDef(Edit1.Text, 0)));

                    
 php中basename() 函数返回路径中的文件名部分
 

basename(path,suffix) 
suffix  可选。规定文件扩展名。如果文件有 suffix，则不会输出这个扩展名。 



<?php 
$path = "/testweb/home.php"; 
 
//显示带有文件扩展名的文件名 
echo basename($path); 
 
//显示不带有文件扩展名的文件名 
echo basename($path,".php"); 
?>  
输出：
home.php
home


      本文转自许琴 51CTO博客，原文链接：http://blog.51cto.com/xuqin/1073010，如需转载请自行联系原作者