begin
Inifile :=TIniFile.Create(ExtractFilePath(Application.ExeName)+'SysSet.ini');
DBS :=IniFile.ReadString('Database','DBS','');
Server :=IniFile.ReadString('Database','Server','');
Database :=IniFile.ReadString('Database','Database','');
User :=IniFile.ReadString('Database','User','');
Passwd :=IniFile.ReadString('Database','Passwd','');
Conn:=Concat('Provider=',DBS,';Password=',Passwd,';Persist Security Info=True;User ID=',User,';Initial Catalog=',Database,';Data Source=',Server);
Globe.DM_1.Conn_1.ConnectionString:=Conn;
Lbl_Title.Caption :=BookCenter;
begin其中Globe为Datamoudle
报错
project mis.exe raised exception class EAccessViolation with message 'Access at address 00531A3 in module 'mis.exe. read of address 00000060
解决方案 »
- 双击DBGRID在checklistbox中显示记录状态
- 在delphi里直接执行批处理文件的指令怎么写?调用DLL文件的指令怎么写?
- 求助!如何在动态改变大小的Image上画图!
- 如何获取本机的ip地址?
- 用什么压缩.swf文件流能得到较大的压缩比?
- 库存管理程序……
- 什么错误
- 请问:在indy控件中,怎样在tcp server端知道tcp client端的机器号?
- 今年最后一次散分,并问两个小问题
- [**100**]在Delphi中如何使用98 DDK库文件进行编程?
- Form1中有一个Edit1控件,我想双击Edit1后,调出另一个Form2,Form2紧挨显示在Edit1的下边,很像COMBOBOX的效果,大家给点思路
- idhttp.get中文乱码
这有个实例的,你看看吧