在Delphi中,ADO的CommandTimeout属性用于设置和获取命令执行的超时时间。超时时间是指在执行命令时,如果命令未能在指定的时间内完成,将会引发超时异常。
要使用ADO的CommandTimeout属性,需要按照以下步骤进行操作:
var
Conn: TADOConnection;
Cmd: TADOCommand;
begin
Conn := TADOConnection.Create(nil);
Cmd := TADOCommand.Create(nil);
Conn.ConnectionString := 'Provider=SQLOLEDB;Data Source=ServerName;Initial Catalog=DatabaseName;User ID=UserName;Password=Password';
Cmd.Connection := Conn;
Cmd.CommandText := 'SELECT * FROM TableName';
Cmd.CommandTimeout := 30; // 设置超时时间为30秒
Cmd.Execute;
以上代码中,将超时时间设置为30秒,如果执行命令的时间超过30秒,则会引发超时异常。
注意:在使用ADO连接和命令对象之后,需要手动释放对象,以释放资源,如下所示:
Cmd.Free;
Conn.Free;