我使用 firebird db 和 Delphi XE2 开发了一个客户端/服务器应用程序。问题是客户端上的 TSQLConnection 组件自动将 HostName 属性设置为 localhost。我想知道,我如何编写代码,让用户在客户端第一次启动时可以选择设置主机名。
我将 TSQLConnection 组件放在客户端的数据模块上。
在主窗体上,我为用户放置了一个选项来设置 HostName 属性,并使用以下代码分配用户在 TextBox 中输入的值:
Database.SQLServer.Params.Add('HostName='+edtHostName.Text);
但似乎一旦程序启动 TSQLConnection 组件将主机名设置为 localhost,我无法将其设置为用户主机名。谁能帮帮我吗