用SAVEDIALOG好像不行

解决方案 »

  1.   

    if savedialog.execute then 
      MEMO1.lines.savetofile(savedialog.filename + '.txt');
      

  2.   

    直接读出写到txt文件不就行了
      

  3.   


    if savedialog.execute then 
      MEMO1.lines.savetofile(savedialog.filename + '.txt');
    如果用户已经输入了a.txt的话岂不是变成了a.txt.txt
      

  4.   

    ChangeFileExt(SaveDialog1.FileName, 'txt');
      

  5.   

    memo1.lines.savetofile('c:\filename.txt')
      

  6.   

    变通一下嘛!!
    if savedialog.execute then 
    begin
      if Pos('.TXT', Uppercase(savedialog.filename)) > 0 then
        MEMO1.lines.savetofile(savedialog.filename)
      else
        MEMO1.lines.savetofile(savedialog.filename + '.txt');
    end;
      

  7.   

    if Pos('.TXT', Uppercase(savedialog.filename)) > 0
    什么意思?
      

  8.   

    最简单的:memo.lines.savetofile('保存的路径')