计算机二级:Delphi回传数据操作文件计算机二级考试
文章作者 100test 发表时间 2009:05:16 19:19:18
来源 100Test.Com百考试题网
2009年下半年全国计算机等级考试你准备好了没?考计算机等级考试的朋友,2009年下半年全国计算机等级考试时间是2009年9月19日至23日。更多优质资料尽在百考试题论坛 百考试题在线题库
delphi回传数据和操作文件的实例代码。
回传数据:
name:=dbgrid1.Fields[3].AsString.
操作文件:
OpenDialog1.Execute.
Edit1.Text := Trim(OpenDialog1.FileName).
CopyFile(Pchar(Trim(Edit1.Text)),Pchar(Trim(Edit2.Text) \ \\\ ExtractFileName(Trim(Edit1.Text))),False).
ShowMessage(\ 拷贝成功.\ ).
Edit1.Clear.
Edit2.Clear.
Except
ShowMessage(\ 系统出错.\ ).
End.
yourFileName := ExtractFileName(\ c:\\fql\\fql.dat\ ).
ExtractFileName //取文件名
ExtractFileExt //取扩展名
ExtractFilePath //取路径
相对路径:
MyPath:=ExtractFilePath(ParamStr(0)).
CopyFile(Pchar(Trim(Edit8.Text)),Pchar(MyPath \ \\upfile\\\ ExtractFileName(Trim(Edit8.Text))),False).
其中false表示覆盖!
特别推荐:
2009年9月全国计算机等级考试时间及科目预告