DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: delphi2024
今日帖子: 79
在线用户: 19
导航: 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者:
男 acheng_wh (acheng) ★☆☆☆☆ -
盒子活跃会员
2003/12/4 15:13:09
标题:
如何在数据模块中获取当前的工作路径? 浏览:1621
加入我的收藏
楼主: 我用一个Data Module放一些连接数据库的组件,我想动态指定所连接数据库的路径,以便把应用程序及数据库换一个地方也能正常使用,我用ExtractFileDir(Application.Exename),不能通过,我想可能是参数Application.Exename错了,在Data Module里不能用这个,不知正确的是怎样用

谢谢!
----------------------------------------------
-
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2003/12/4 16:34:10
1楼: ExtractFilePath
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 acheng_wh (acheng) ★☆☆☆☆ -
盒子活跃会员
2003/12/4 16:53:59
2楼: 用: ExtractFilePath  也不行呀,哥哥!
----------------------------------------------
-
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2003/12/4 22:23:55
3楼: 倒偶没作过在 Data Module这个里面写过!
等等偶找找有没有资料!
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 zhangcusu (zhangcusu) ★☆☆☆☆ -
盒子活跃会员
2003/12/4 22:39:17
4楼: unit unit1

use ....,sysutils;

var
  s:string;
begin
  s:=sysutils.extractfilepath(application.exename);
end;
----------------------------------------------
-
作者:
男 acheng_wh (acheng) ★☆☆☆☆ -
盒子活跃会员
2003/12/6 10:01:31
5楼: 楼上的哥哥,不行呀,提示说application示定议,找不到,exename未定义,找不到,
我知道sysutils.extractfilepath(application.exename);或extractfilepath(application.exename);在Form中可以,但我现在要在Data Module里用

----------------------------------------------
-
作者:
男 cjrb (Thinking In 魂) ★☆☆☆☆ -
盒子活跃会员
2003/12/6 11:09:58
6楼: 用Application得加上uses Forms;
----------------------------------------------
按此在新窗口浏览图片 充电..........
作者:
男 hotyei (青出于蓝) ★☆☆☆☆ -
盒子活跃会员
2003/12/6 11:54:37
7楼: ExtractFilePath(ParamStr(0));
这方法我一直在使用。
----------------------------------------------
米软科技有限公司http://www.szmesoft.com
作者:
男 acheng_wh (acheng) ★☆☆☆☆ -
盒子活跃会员
2003/12/6 13:39:22
8楼: 谢谢各位,加上uses Forms,成功了
----------------------------------------------
-
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行70.3125毫秒 RSS