一般在做CS程序,都存在一个连接的问题 ,连接参数怎样设置, 安全性最好.
解决方案 »
- 请看一下代码,如何将textout输出的文字放到放到矩型的某行的中间呢?
- 关于WIN2000 professional与SQL Server2000的问题
- 窗体可以直接打印,就不知道怎么直接打印控件?
- 数据库的问题。
- indy控件编程:用idpop3接收邮件程序怎么写啊!急急!!!在线等待!
- 菜鸟问题!快些来拿分!!!
- 哪位高手能举一个例子说明指针有什么用啊?我怎么觉得哪也用不上啊?
- sdk编程中,edit控件的EN_CHANGE消息不能响应,该怎么做?
- 我帮一个单位做了一个小型设备管理平台。却始终不能做成安装文件。
- 各位大哥大姐,小弟有一问题:有什么软件可以看到 EXE或DLL中的API啊?
- 高手参与吧
- 如何使当前程序控制另一程序的文本框
真的高手想挖你,你也没则
var Reg:TRegistry;
begin
Reg:=TRegistry.Create;
try
Reg.RootKey:=HKEY_LOCAL_MACHINE;
Reg.OpenKey('Software\MYProject',True);
Reg.WriteString('SERVER',edit1.text); //当然要加密了
Reg.WriteString('PASSWORD',edit2.text);
Reg.CloseKey;
finally
Reg.Free;
end;
end;
(2) 运行应用程序,先读取注册表的信息。作为参数保留。
mserser:=Reg.ReadString('SERVER');
(3) adoconnection1.connectstring:='.....data source='+mserver+'....
ok!
GetPrivateProfileString('DBMS','username','',username,20,pchar(filename));
GetPrivateProfileString('DBMS','servername','',servername,20,pchar(filename));
GetPrivateProfileString('ver','ver','',version1,20,pchar(filename));
ConnectionString:='Provider=SQLOLEDB.1;Persist Security Info=False'+
';User ID='+username+';Password=123456'+';Initial Catalog=manage'+
';Data Source='+servername+';';
ADOConnection1.ConnectionString:=ConnectionString;