当前位置:主页>销售管理软件> 列表

问两个关于配置文件的问题? 找erp软件

仓库管理软件版1楼: 第一个问题是这样的:
现有这样一段代吗:
with query1 do
begin
close;
sql.Clear ;
sql.Add(''select * from ymx'');
sql.add(''where rq>=:param1 and rq<=:param2'');
paramByName(''param1'').asdatetime:=strTodatetime(edit1.Text );
paramByName(''param2'').asdatetime:=strTodatetime(edit2.Text );
open;
end;
现在我想把这两个日期变量从配置文件中读出,请问该如何实现?曾有大虾指点我说用ReadString(),可是小弟愚笨,实在是不会呀!哪位好心的大虾能给个实例吗?

第二个问题:
我想把数据库登陆信息从配置文件中读取,我是这样写的:
procedure TForm1.FormCreate(Sender: TObject);
Var
DataBaseName,UserName,UserPassWord,IP:String;
Begin
IniFile:=TiniFile.create(ExtractFilePath(Application.ExeName )+''DBconfig.ini'');
IP:=IniFile.ReadString (''DBSet'',''IP'',IP);
DataBaseName:=IniFile.ReadString(''DBSet'',''DataBaseName'',DataBaseName); UserName:=IniFile.ReadString(''DBSet'',''UserName'',UserName); UserPassWord:=IniFile.ReadString(''DBSet'',''UserPassWord'',UserPassWord);
End;

配置文件里是这样写的:

[DBSet]
IP=192.168.0.12
DataBaseName=kbd
UserName=sa
UserPassWord=

然后在Form窗口上放一个按钮,加以下代码:
with query1 do
begin
close;
sql.Clear ;
sql.Add(''select * from ymx'');
open;
end;


可是不知错在哪里,登陆总是失败?

2楼: 大虾们,帮一下忙呀! 如免费库存管理软件

3楼: 不知道楼主具体的目的,是想要知道INI文件的读写方法,还是数据库方面的。

4楼: 基础
楼主。。。。

5楼: 感谢两位大虾的帮助,问题我想我应该说清楚了,第一个问题问的是怎样从配置文件中读出变量,第二个问题是关于数据库登录的问题。
我也知道这是基础的问题,可是从不懂到懂总是一个过程,我想所有的大虾都是这么过来的,难道各位一开始学习时就都会的吗?
。。。。。。。。。。

6楼: 。。。。。。
我的意思是你需要看基础了
通过全文检索也有一堆

1、配置文件操作建议使用专用类封装。
日期类型可以使用字符串类型存入INI,然后在使用的时候进行转换。
读取字符串的代码:
tempstr := iniFile.ReadString(节名, 段名, 默认值);

2、使用 1 中的读取字符串方法读取各字段的值,然后连接成标准数据库字符串即可

仓库管理软件版7楼: 就用楼上的方法,我只是补充一下。.
1.
d: TDate;
d := StrToDate(iniFile.ReadString(节名,关键字,默认值),Now);
2.不同的数据库的ConnectionString会有所不同,要分别对待。

8楼: 你的变量都是字符型的,应该这样写。后面的默认傎为空。
IniFile:=TiniFile.create(ExtractFilePath(Application.ExeName )+''DBconfig.ini'');
IP:=IniFile.ReadString (''DBSet'',''IP'','''');
DataBaseName:=IniFile.ReadString(''DBSet'',''DataBaseName'',''''); UserName:=IniFile.ReadString(''DBSet'',''UserName'',''''); UserPassWord:=IniFile.ReadString(''DBSet'',''UserPassWord'','''');

9楼: 第一个问题,你的数据库如果是ACCESS,SQL语句中比较日期时要加#

10楼: 第一个问题,用类似于第二个问题中的方法,读出两个日期字符串,
然后用strToDateTime函数将其转换成DateTime型,赋给参数即可
第二个问题,你在FormCreate中读取了数据库、用户名等信息,


但是没有看到你用这个信息设置数据源(比如TDatabase控件)。

11楼: 多谢各位大虾了,我用的是数据库是SQL。
本人是个菜鸟,各位大虾所说的的大多是一种思路,而本人非常愚笨,光有思路是不够的,需要的是具体的代码和操作,要不然各位的好心我是只能心领了。
关于配置文件:本人从DELPHI帮助中也看到了一些,可是水平实在是太差了,帮助中所举的例子我看明白了,可是想把把换一个地方使用却是心有余而力不足。就好象读书时老师讲个例题,然后再做有点变动的题目,我就不会了,唉!

To happycyp:
按照你的方法:
运行后提示:Missing connection or connectionstring
不知是哪里出问题了?

12楼: 接受答案 如erp软件