assignfile(file,ExtractFilePath(Application.FileName) + 'filename')
解决方案 »
- VCL内部的消息
- 通过汉字取得字母
- 用paintbox绘曲线的困惑
- 求模???????????????????????????????????
- 总结兼散分
- delphi如何判断是中文还是英文??
- 申请了一个空间,不会做软件下载页
- 高分 软件调查 不够再加
- 有没有类似MFC的<MFC深入浅出>一样讲vcl怎么对windows Api进行封装的书?
- 用DELPHI编一些三层或多层的数据库软件,除了要用到ADO外还要用到一些什么工具?一般用DELPHI编什么样的软件最好(我现在靠DELPHI吃饭)?
- 怎样写播放MPEG One 文件的程序 Delphi自带的控件好像不行
- 请问如何使用DELPHI调用ACD2000的文件?给50
第一个参数返回windows目录;
getsystemdirectory(lpbuffer:pchar;usize:uint):uint;
第一个参数返回system目录;
gettemppath(usize:uint;lpbuffer:pchar):uint;
第二个参数返回临时目录;
getcurrentdirectory(usize:uint;lpbuffer:pchar):uint;
返回当前目录;
如:
a:array[0..max_path] of char;
getcurrentdirectory(sizeof(a),a);
showmessage(strpas(a)):
返回当前运行程序目录