引入mydac的方法

foxe5

引入mydac的方法

1.   SYS_SFC_001_INC in '..\..\SYS_SFC_001\SYS_SFC_001_INC.pas';
   
2. 
   
3. procedure TDataModule1.DataModuleCreate(Sender: TObject);
   
4. begin
   
5.   self.MyConnection1.Server:= SYS_SFC_001_INC.getHostIP;
   
6.   self.MyConnection1.Username:=SYS_SFC_001_INC.getUserName;
   
7.   self.MyConnection1.Password:=SYS_SFC_001_INC.getPasswrod;
   
8.   self.MyConnection1.Options.Charset:='gbk';
   
9. end;

复制代码

由于delphi7默认没有utf8的支持，所以连接一般用gbk