BCB写入mysql blob字段没有结果

2008-09-03 06:05:18 134 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

实战指南：UOS专业版命令行高效下载离线安装包及依赖本文提供了一份UOS专业版离线安装包的实战下载指南。针对无外网环境下的软件部署难题，详细介绍了如何通过命令行精准获取软件包名，并利用`apt download`命令高效下载主程序及其所有依赖。文章重点解析了使用`apt install --dry-run`模拟安装来完整获取依赖包的方法，并给出了离线安装、问题排查及自动化脚本编写等高级技巧，帮助管理员和运维人员实现可靠的批量离线部署。阅读详情

请老大们给看一下了，为什么执行完后，没有出错
但是表中的blob字段没有内容，其它的字段正确
另外发现TemplateStream创建后模式还是bmRead，而不是bmReadWrite

表结构
CREATE TABLE `task_info` (
`record_id` INTEGER(32) NOT NULL AUTO_INCREMENT,
`type` INTEGER(32) DEFAULT NULL COMMENT 'type',
`param_len` INTEGER(32) DEFAULT NULL,
`param` BLOB,
PRIMARY KEY (`record_id`)
)ENGINE=InnoDB
AUTO_INCREMENT=19 CHARACTER SET 'gbk' COLLATE 'gbk_chinese_ci'
COMMENT='InnoDB free: 4096 kB';

AnsiString strComText = "insert into task_info(type,param_len) values('";
strComText = strComText+"'"+vstTrcTask.ulTrcType+"'"+","; //type
strComText = strComText+"'"+vstTrcTask.ulFilterParamLen+"'"+","; //param_len
strComText = strComText+")";

if(ADOQuery->Active)
{
ADOQuery->SQL->Clear();
ADOQuery->SQL->Add(strComText);
UINT32 ulRowsAffected = ADOQuery->ExecSQL();

strComText="select * from task_info where ne_ip_addr='"+
vstTrcTask.stNeInfo.strIpAddr+"'"+" AND "+ "task_id='"+vstTrcTask.ulTaskId+"'";

ADOQuery->SQL->Clear();
ADOQuery->SQL->Add(strComText);
ADOQuery->Open();
ADOQuery->First();

ADOQuery->Edit();

UINT32 param_len = 12;

TBlobStream* TemplateStream=(TBlobStream*)ADOQuery->CreateBlobStream(ADOQuery->FieldByName("param"),bmReadWrite);
unsigned char newParam[12] = {0,0,0,1,0,0,0,1,0,1,0,2};
int i = TemplateStream->Write(newParam, param_len);

ADOQuery->Post();

}

...全文