开发过indy以及用过ADO的，请进来帮一下忙！

[zhgwbzhd]

我用的是indy9，在IdTCPServer的OnExecute事件内。使用ADO。对SQL进行统计。

ADOConnection_Auto = new TADOConnection(NULL);
ADOQuery_Auto = new TADOQuery(NULL);

ADOConnection_Auto->Close();
ADOConnection_Auto->LoginPrompt = false;
ADOConnection_Auto->ConnectionString = ADOConnection_ok->ConnectionString;
ADOConnection_Auto->Open();

ADOQuery_Auto->Connection = ADOConnection_Auto;

这里是代码，使用ADOQuery。

try
{
//下面准备销毁这些
ADOQuery_Auto->Close();
ADOConnection_Auto->Close();

delete ADOQuery_Auto;
delete ADOConnection_Auto;
}
catch(...)
{
Write_LOG("删除ADO出错！");
}


//不知道上面的做法怎么不正确。会出很多"删除ADO出错！"的日志。

[我不懂电脑]

用ADOQuery_Auto->Free()

[zhgwbzhd]

2楼的意思是：

ry
{
//下面准备销毁这些
ADOQuery_Auto->Free();
ADOConnection_Auto->Free();
}
catch(...)
{
Write_LOG("释放ADO出错！");
}

[周药师]

楼主的这段代码看不出错误，检查其他地方吧
是不是
try
{
//这里还有代码，这里出错的？
//下面准备销毁这些
ADOQuery_Auto->Close();
...

[zzbinfo]

我也觉得楼主的代码没有什么问题呀，是不是其他地方有问题了

[ccrun.com]

你这个try...catch用的不合适。应该这样用：

ADOConnection_Auto = new TADOConnection(NULL);
ADOQuery_Auto = new TADOQuery(NULL);

try
{
	try
	{
		ADOConnection_Auto->Close();
		ADOConnection_Auto->LoginPrompt = false;
		ADOConnection_Auto->ConnectionString = ADOConnection_ok->ConnectionString;
		ADOConnection_Auto->Open();

		ADOQuery_Auto->Connection = ADOConnection_Auto;

		// 这里是代码，使用ADOQuery。
	}
	catch(...)
	{
	    Write_LOG("删除ADO出错！");
	}
}
__finally
{
    ADOQuery_Auto->Close();
    ADOConnection_Auto->Close();

    delete ADOQuery_Auto;
    delete ADOConnection_Auto;
}

[zhgwbzhd]

还是妖哥强。
我也发现这个问题了。
不过我现在改成这样了。明天给客户测试一下。

try
{

DOConnection_Auto = new TADOConnection(NULL);
ADOQuery_Auto = new TADOQuery(NULL);

ADOConnection_Auto->Close();
ADOConnection_Auto->LoginPrompt = false;
ADOConnection_Auto->ConnectionString = ADOConnection_ok->ConnectionString;
ADOConnection_Auto->Open();

ADOQuery_Auto->Connection = ADOConnection_Auto;

try
{

这里是代码，使用ADOQuery。
}
catch(...)
{
Write_LOG("使用过程中出错！");
}

try
{
//下面准备销毁这些
ADOQuery_Auto->Close();
ADOConnection_Auto->Close();

delete ADOQuery_Auto;
delete ADOConnection_Auto;
}
catch(...)
{
Write_LOG("删除ADO出错！");
}
}
catch(...)
{
Write_LOG("创建ADO出错！");
}

[ccrun.com]

你这样子try...catch，如果中间有代码执行出错，会有内存的泄露的可能啊。不信你加个断点试试，如果中间有代码出错，delete ADOQuery_Auto未必能执行到。

try...finally组合可以保证finally段内的代码即使前面有异常也能正常执行到。

[songqi1227]

谁知道 pwpack20080320 哪里下载啊 修改武器外观的

[songqi1227]

全部都是高手啊

[僵哥]

为什么在catch之后不记录下来具体的错误内容呢？

[zhgwbzhd]

请妖哥仔细看一下我的代码。
由于csdn自动把tab给取消了。
造成格式混乱。

try
{

DOConnection_Auto = new TADOConnection(NULL);
ADOQuery_Auto = new TADOQuery(NULL);

ADOConnection_Auto->Close();
ADOConnection_Auto->LoginPrompt = false;
ADOConnection_Auto->ConnectionString = ADOConnection_ok->ConnectionString;
ADOConnection_Auto->Open();

ADOQuery_Auto->Connection = ADOConnection_Auto;

try
{

这里是代码，使用ADOQuery。
}
catch(...)
{
Write_LOG("使用过程中出错！");
}

//即便是上面使用的代码出错，也会执行下面的代码吧，我是这么理解的。

try
{
//下面准备销毁这些
ADOQuery_Auto->Close();
ADOConnection_Auto->Close();

delete ADOQuery_Auto;
delete ADOConnection_Auto;
}
catch(...)
{
Write_LOG("删除ADO出错！");
}
}
catch(...)
{
Write_LOG("创建ADO出错！");
}

[周药师]

这些办法都是不能解决根源的；
断点调试一下，看看具体错误在哪里，然后修改之
不然始终会出大问题的

[zhgwbzhd]

问题在于有些客户那里使用。
没有这些错误日志啊。

也就是正常的运行。

就是在这个客户这里。出现了这样的错误日志。

每天少则几条，多则上千条了。

为了这个快有点疯了。