怎样保存(或者copy）一个类型文件，比如一个视频，或图形文件？(50分)

紫金山 · 2002-05-20

一个button1，一个savedialog组件 保存一个。avi文件 button1触发保存一个比如'wertt.avi'文件? 怎样编写程序?谢谢！！！ 另如果这个'wertt.avi'文件是在本机上已经存在的一个文件，那怎么编写（也就是说是另存为）?

book523 · 2002-05-20

一个视图的例子 savedialog.filter:=*.bmp|*.bmp; if savedialog1.exec then   image1.picture.savetofile(savedialog1.filename);

完颜康 · 2002-05-20

BOOL CopyFile(     LPCTSTR lpExistingFileName, // pointer to name of an existing file     LPCTSTR lpNewFileName, // pointer to filename to copy to     BOOL bFailIfExists // flag for operation if file exists   &nbsp

;

紫金山 · 2002-05-20

to book523, 若是视频文件呢？比如。rm文件 to 完颜康 copy。rm文件好像不成功

完颜康 · 2002-05-20

不会的！那是Windows api，根本不会管文件是什么格式的,当然有啥问题可以直接去文微软

紫金山 · 2002-05-22

to  完颜康   再问一个问题：我写的语句是copyFile（pchar（'./tmp.rm'),pchar(saveDialog1.Filename),false); 为什么不行? 而写成copyFile（pchar（'c:/windows/tmp.rm'),pchar(saveDialog1.Filename),false); 就可以那? ' ./tmp.rm'不就是当前应用程序所在目录下的文件么? 还有我发现DeleteFile函数好像会出现同样的错误! 你能回答我么? 多谢了!!!

小人物 · 2002-05-22

可能不支持相对路径，[

]

紫金山 · 2002-05-22

to 小人物   此话怎讲,能详细一点么?多谢一定给分!

skyweb · 2002-05-23

"./"是当前的工作路径，不是当前程序所在的路径。 要取得当前程序所在的路径你应该用ExtractFilePath(Application.ExeName)。

紫金山 · 2002-05-23

skyweb   谢谢你,但是我怎样就存储' ./tmp.rm'呢?

skyweb · 2002-05-24

看看Copy的原型定义： BOOL CopyFile(   LPCTSTR lpExistingFileName, // name of an existing file   LPCTSTR lpNewFileName,      // name of new file   BOOL bFailIfExists          // operation if file exists ); 第一个参数是要拷贝的文件，第二个参数是要拷贝到的那个文件，第三个参数告诉CopyFile 如果第二个参数指定的文件已存在的话该怎么办。 很显然，就copyFile(pchar('./tmp.rm'),pchar(saveDialog1.Filename),false);这一句 来说，如果'./tmp.rm'不存在的话，拷贝当然失败。 你可以测试一下看当前目录(.)是在什么位置： ShowMessage('CurrentDir: '+GetCurrentDir); 或者把语句改成类似这样： copyFile(pchar(GetCurrentDir+'/tmp.rm'),pchar(saveDialog1.Filename),false);

紫金山 · 2002-05-24

多谢,我试试 但是,还有问题麻烦,我得'tmp.rm'文件确实是存在的阿! 因为,程序关闭后,我还能打开他啊! 这又是为什么呢?

紫金山 · 2002-05-24

对了,我发现有一个getcurrentdirectory函数,他和getcurrentdir有啥不同呢? 谢谢,我对API函数不甚了解!

nick4309 · 2002-05-24

前者最后是'/',后者没有

紫金山 · 2002-05-24

什么意思啊?不太明白.望指教

skyweb · 2002-05-25

GetCurrentDirectory()是Windows API函数。 GetCurrentDir是Delphi对GetCurrentDirectory的Pascal语言包装，更易于使用。

紫金山 · 2002-05-25

太感谢了! 有没有更多这样的函数能提供给我!不胜感激! 有更多分相送!!!

紫金山 · 2002-05-27

多人接受答案了。

怎样保存(或者copy）一个类型文件，比如一个视频，或图形文件？(50分)

紫金山

Unregistered / Unconfirmed

book523

Unregistered / Unconfirmed

完颜康

Unregistered / Unconfirmed

紫金山

Unregistered / Unconfirmed

完颜康

Unregistered / Unconfirmed

紫金山

Unregistered / Unconfirmed

小人物

Unregistered / Unconfirmed

紫金山

Unregistered / Unconfirmed

skyweb

Unregistered / Unconfirmed

紫金山

Unregistered / Unconfirmed

skyweb

Unregistered / Unconfirmed

紫金山

Unregistered / Unconfirmed

紫金山

Unregistered / Unconfirmed

nick4309

Unregistered / Unconfirmed

紫金山

Unregistered / Unconfirmed

skyweb

Unregistered / Unconfirmed

紫金山

Unregistered / Unconfirmed

紫金山

Unregistered / Unconfirmed

Similar threads