哪位帮忙,怎么让生成的文件名是当日的日期,最好有原码!
谢谢

解决方案 »

  1.   

    DateToStr(Date)————————————————————————————————————
    宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
    ————————————————————————————————————
      

  2.   

    var filename:string;filename:=DateToStr(Date);
      

  3.   

    var
      SData,SFileName:String;//sdata为当前日期变量,Sfilename为存放文件名称变量
    begin
      SData:=DataTimetoStr(Now);//取得当前日期及时间
      SFilename:='';//自定义文件名称;
      SFilename:=SFilename+SData;
      .....
    end;
    以上代码可以根本实际情况自行简化
      

  4.   

    以上代码更正:凡Data均改为Date。如Datatimetostr改为Datetimetostr
      

  5.   

    你将文件名改为:
    strtodatatime(now)就可以了呀
    这是加具体时间的,要是不加具体时间就用:StrtoData(Now)