在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;