dephi+oracle 从TMemo存读varchar2类型数据(一篇文章) 数据超过256个字节 其中有换行符
caven 2003-09-10 10:49:47 contentStream:=TMemoryStream.Create;
MContent.Lines.SaveToStream(contentStream);
DMHelp.ADOQContent.edit;
DMHelp.ADOQContent.FieldByName('CONTENT_CONTENT').SetData(contentStream.Memory);
DMHelp.ADOQContent.Post;
contentStream.Free;
contentStream为TMemoryStream类型,MContent为TMemo类型,DMHelp.ADOQContent为TADOQuery类型,已经查询出数据(已经锁定到一条记录)
提示出错:提交数据类型不匹配
contentStream:=TMemoryStream.Create;
MContent.Lines.SaveToStream(contentStream);
setlength(contentArr,contentStream.Size);
move(contentStream.Memory,contentArr[0],contentStream.Size);
DMHelp.ADOQContent.edit;
DMHelp.ADOQContent.FieldByName('CONTENT_CONTENT').SetData(contentArr);
DMHelp.ADOQContent.Post;
contentStream.Free;
与上不同的是把数据从TMemoryStream存到动态数组contentArr,再SetData(contentArr);contentArr中数据没有什么问题
不提示出错,但提交的数据变成乱码
如果SetData(字符串);没有什么问题