jpg文件保存出现问题！

我在保存JPG文件时，在文件名后加.jpg后缀，就能生成jpg文件，否则不生成。请问能不能有什么方法使只输入文件名也能生成.jpg型文件！ 问题点数：100、回复次数：7Top

1 楼yzykjh（言子儿）回复于 2002-11-26 13:55:05 得分 0

程序自动给文件名加上扩展文件名不行吗？Top

2 楼yzykjh（言子儿）回复于 2002-11-26 13:56:10 得分 10

或者使用TSavePictureDialog组件Top

3 楼aonesky（甜甜）回复于 2002-11-26 14:48:58 得分 0

我在后面加扩展文件名了，可文件名却变成了*.jpg.jpg了。Top

4 楼caixiaofei（天天呆在这）回复于 2002-11-26 15:03:34 得分 0

image1.Picture.SaveToFile('c:\a.jpg');Top

5 楼d983074（d983074）回复于 2002-11-26 15:06:09 得分 80

function   ExtractFileName(const   FileName:   string):   string;  
  function   ExtractFileExt(const   FileName:   string):   string;  
   
  if   ExtractFileExt(filename)<>'.jpg'   then  
      filename=ExtractFileName(filename)+'.jpg';Top

6 楼Jackeystone（晋少）回复于 2002-11-26 15:06:30 得分 10

同意三楼的说法用TSavePictureDialog或者TSaveDialogTop

7 楼aonesky（甜甜）回复于 2002-11-29 12:32:39 得分 0

谢谢！Top

相关问题

• 文件名
• 文件
• jpg
• 保存
• tsavepicturedialog
• 生成
• extractfileext
• extractfilename
• filename
• const

• 帖主：aonesky
• yzykjh
• d983074
• Jackeystone

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载