delphi课程设计做好后,如果换到另外一台机子上该怎么办?老师要验收...

Question

我的delphi程序设计做好后..
如果让它在别的机子上查看运行该怎么办?
主要是SQL server 连接的问题..
我用的是ADOconnection
该怎么设置??
老师还要验收呢..
我做时在宿舍用我自己的电脑做的..
郁闷.....
谢谢大哥大姐们帮帮忙呀...

Answer 1

你可以在别的机子上配置和你自己电脑一样的SQL数据库环境

Answer 2

修改connectionstring就可以了呀~！如果只是把exe文件拷给老师看，那你就让adoconnection的connectionstring动态设置，将connectionstring放在一个.ini文件里，然后开始运行时，从里面取出来,这个修改应该还简单

Answer 3

写一个udl的文件，然后Connection用FILE NAME=ExtractFilePath(ParamStr(0)) +  '**.udl'就行了，前面用ParmStr(0)去拼相对路径吧
拿到其他机器后先把数据库还原，然后双击udl文件配置好数据源就行了

Answer 4

动态存储ini的读写设置注意前面uses加上 Inifiles
下面的代码以sqlserver为例，DM1为数据窗体,DB1为adoconnectionvar
  myini:tinifile;
  s_s1,s_s2,s_s3:string;
begin
      myini:=tinifile.Create('.\conn.ini');
      s_s1:=myini.ReadString('Host','Server','');//连接服务器名称或ip地址
      s_s2:=myini.ReadString('Host','Username','');//数据库用户名
      s_s3:=myini.ReadString('Host','Password','');//数据库用户名的密码
      myini.Free;
  try
      DM1.DB1.connected:=false;
      //动态设置连接字符串
      DM1.DB1.connectionstring:='Provider=SQLOLEDB.1;Password='+s_s3+';Persist Security Info=True;User ID='+s_s2+';Initial Catalog=master;Data Source='+s_s1+';Locale Identifier=2052;Connect Timeout=15;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID='+s_s1;
      DM1.DB1.LoginPrompt:=false;
      DM1.DB1.connected:=true;
  except
      messageboxex(handle,'连接服务器失败！请检查设置.','提示',MB_OK+MB_ICONINFORMATION,0);
  end;
end;conn.ini文件的内容
[Host]
Server=.
Username=sa
Password=
dabase=MyDB