indy 10终于随着Delphi2005发布了，不过indy套件在我的印象中总是复杂并且BUG不断，说实话，不是看在他一整套组件的面子上，我还是喜欢VCL原生的Socket组件，简洁，清晰。Indy9发展到了indy10几乎完全不兼容，可叹啊。言归正传。在使用IdTCPServer组件的时候发现了他的漏洞，他的OnConnec，OnExecute，OnDisconnect等事件是在其他线程中执行的，通常情况下这没有问题，但是在特殊的情况下会造成问题，如果其他部分的程序写得有问题...
照旧，先上delphi的界面控件布局：1个adoconnection、1个adoquery、1个DataSource、1个button、1个dbgrideh（随意）前期准备：1、设置adoconnection的connectionstring，为了方便：Provider=SQLOLEDB.1;Password=数据库登录密码;Persist Security Info=True;User ID=数据库登录名;Data Source=数据库服务器地址，设置LoginPrompt设置为False 2、adoquery的connection指向adoconnection 3、DataS...
相关资料：http://blog.csdn.net/earbao/article/details/46514313 结果注意：1.Use IdContext、IdGlobal 这两个单元2.不能使用string类型，在分存分配时会出错的。3.手机中不支持string[20]。 实例代码： 1unit Unit1;2 3interface 4 5uses 6 System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,7 FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.ScrollBox,8 FMX.Me...
untMain;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,IniFiles, ExtCtrls, DB, ADODB,ActiveX;typeTFrmMain = class(TForm)Timer2: TTimer;procedure FormClose(Sender: TObject; var Action: TCloseAction);procedure FormShow(Sender: TObject);procedure Timer2Timer(Sender: TObject);private{ Private declarations }public{ Public declarations }procedure getXXData();end;/...
delphi 6数据库连接之长短模式(sqlserver)标签： delphi数据库 2015-08-12 20:59 351人阅读 评论(0) 收藏 举报 分类： delphi（3） 版权声明：本文为博主原创文章，未经博主允许不得转载。1 delphi连接sqlserver之长短连接我们连接数据库通常有长连接和短连接模式，在delphi里面经常采用TADOConnection建立数据库连接，然后用TADOQuery来进行CRUD操作。TADOConnection可以设置连接超时，KeepConnection一直保持数据库连接，直到程序...
一般情况下，使用程序连接数据库的时候，当数据库服务器不存在，或者数据库服务器没有启动的时候， 会导致数据库连接失败，所花费的时间很长。所以，在进行连接前，有必要对这些做出判断，然后返回给用户一 个正确的提示信息，减少等待的时间。 2. 数据库服务器连接不上，可以分成以下几种情况： 1>. 根本就不存在数据库服务器，及系统根本就没有安装数据库服务器。 2>. 系统安装了数据库服务器，但是数据库服务器没有开启。 3>. ...
。适用条件：装有 SQL Server，且有SQLDMO.dll文件。速度：中调用示例：GetSQLServerList(ListBox1.items);代码： ComObj;function GetSQLServerList(var AList: TStrings): Boolean; SQLServerApp: Variant; ServerList: Variant; i: Integer; Result := True; try SQLServerApp := CreateOleObject(‘SQLDMO.Application‘); ServerList := SQLServerApp.ListAvailableSQLServers; for i := 1 to ServerList.Coun...
create proc SelectAddr2 as 3 begin 4 select * from MTable 5 end--修改存储过程1 alter proc SelectAddr --增加一个入参 2 @addr varchar(50) 3 as 4 begin 5 select * from MTable t where t.Addr = @addr 6 end点击执行，就可以才数据库-可编程性-存储过程下看到新建的SelectAddr这个存储过程了 2、在Delphi设计好的界面双击Button按钮1 procedure TForm4.Button1Click(Sender: TObject); 2 var 3 sSqlText:strin...
TForm1.Btn_OKClick(Sender: TObject); var sqlconn:string; beginSqlconn:=‘Provider=SQLOLEDB.1;‘+‘password=‘+Edit_Password.Text+‘;Persist Security Info=true;User ID=‘+Edit_Name.Text+‘;Data Source=‘+Edit_Server.Text;if Edit_Server.Text=EmptyStr then beginshowmessage(‘请输入SQL服务器的名称或者IP地址!‘);Edit_Server.SetFocus;exit;end;if Edit_Name.Text=EmptyStr then beginShowMessage(‘请输入登陆...
服务器的OnExecute事件,例如trys := AContext.Connection.IOHandler.ReadLn(IndyTextEncoding_UTF8);ok:=true;excepton e:exception do winapi.windows.beep(500,500); end;基本问题是从客户端发送到服务器解决方法:我通过在Java代码的字符串末尾添加LF字符来解决它String str = "Test\n";try {socket = new Socket("localhost", 13428);osw =new OutputStreamWriter(socket.getOutputStream(), "UTF-8");osw.write( str, 0, str.l...
再谈delphi XE的中间层应用服务器（其实任何语言开发的中间件）连接MS Sql Server数据库 步骤： 1、检查MS Sql Server数据库的默认端口1433（其实你也可以改端口）是否处于开放端口状态、是否处于监听状态 1.1、你数据库服务器：防火墙应当放开1433端口的入站规则和出站规则、后台云服务器的安全组应放开1433端口的进出。 1.2、telnet <sql200N服务器IP地址> 1433 ，检查服务器1433端口是否成功配置在进行监听！ 或者：检查...
我想连接到MS SQL Server以使用FireMonkey为我的Android应用程序插入或更新一些数据,我正在使用Delphi xe8.有什么办法可以使用默认组件执行此操作？不使用其他组件.我正在通过ID地址使用远程服务器.解决方法:我建议您使用XML / JSON服务连接SQL Server数据库.它将节省您的时间,数据安全性,应用程序安全性和应用程序开发时间. Indy组件非常适合Http Rio,您也可以直接从代码创建soap连接对象.这取决于您的选择. 您也可以使用FireDAC组...