richedit 保存到数据库,但是我错了

harabi 2003-08-19 01:03:12
TBlobField(zlink.AdoQueryMYB.FieldByname('text')).SaveToStream(memstrm);

zmain.Editor.Lines.LoadFromStream(memstrm);

显示 stream writre error
...全文
31 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
DWGZ 2003-08-19
  • 打赏
  • 举报
回复
memstrm.Seek(0, 0);
zmain.Editor.Lines.LoadFromStream(memstrm);
harabi 2003-08-19
  • 打赏
  • 举报
回复
上面读
这是写
Editor.Lines.SaveToStream(memstrm);
zlink.ADOQueryMYB.Edit;
TBlobField(zlink.AdoQueryMYB.FieldByname('text')).LoadFromStream(memstrm);
zlink.ADOQueryMYB.post;
这是2003年得一个作品,陆续做了基本得功能,当初做这个只是一时性起,帮朋友讲解树型得数据结构,并写了个简单得例子,但后来还是作成一个软件。该程序功能已经实现,并且可以正常使用,但是‘最爱’收藏夹还有一些问题,一直没有修改过;另外,ADO方式写二进制数据到表里,速度确实太慢了。当时得能力有限,很多代码未很好得设计,可以重构得地方很多,程序可以给初学者作为参考。//////////InfoBase 0.2 Beta Build 20031119开发日志这是我续 ASPDecoder(ASP反编码 delphi版) 之后很长时间的又一个作品;目前还在开发期间,完成度80%。如果你对程序的功能或者是程序的错误上有建议,请给作者发信。开发前: 作者学习delphi 过程中见过很多类型的资料管理软件,比如myBase 是非常典型的软件,myBase 的作者的编程功底很深,myBase做的非常实用;并且带上好几兆的Delphi 开发资料。所以我也想自己写一个这样的文档资料管理软件。一来可以锻炼自己的编程能力,因为很多软件看到功能自己能想出实现方法,但往往只是在想,而没去做,这样可不行。二个就是,这类软件做的好的基本上都需要收费。 但这些都不是促使我去编写InfoBase的目的。而是因为我的室友兄弟们也在学delphi,正学到树型,缺少一个树型的好算法;所以我写了个树型分类打算让他们参考一下,没想到结果还是做成了现在这个样子 :)未实现的功能: 2003.7.8 准备将部分功能模块移植到WEB 上,把一些常用数据信息存储在服务器上,这样无论今后在何地均可使用该软件访问资源。但目前作者缺少服务器资源,是个很头痛的问题,想法在写InfoBase 之前就已经策划妥善。 2003.11.19 准备着重实现“导入功能”,具体涉及所支持的导入类型还在策划中……软件名称: InfoBase 0.2中文名称:信息数据库软件版本: 0.1 Build 20031119 Beta软件作者: Chinasf (萧寒)(S.F.)作者邮箱: Chinasf@hotmail.com软件网站: http://chinasf.cnblogs.com软件语言: 中文应用平台: Win9x/Win2000/WinXP + IE5.0以上软件简介: 1、无限级分类(分类名作为文章头) 2、文档内容支持多种类型,如图片,URL地址,包括任意OLE对象 3、支持选定部分文档内容打印 4、支持自动给代码加颜色(语法加亮) 5、支持将文本内容直接转换为图形 6、支持快速索引定位文章(类似CHM文档索引) 7、支持书签记录(类似CHM文档书签) 8、‘最爱’网站链接收藏功能 9、支持多种打开URL方式 10、支持将URL送如系统收藏夹 11、支持导出到HTML 12、文档支持附件 13、内置浏览器,可浏览网站和浏览附件 14、执行附件文件自动监听 15、数据全程压缩 (new) 还有更多的细节……有问题的功能:..分类的拖动未实现..文本编辑环境功能选项有待加强,并等待bug 信息反馈..打印未实现预览..预计加入代码格式化排版功能..文档内容保存到图象高度计算有误差..其他细节的设计…最爱模块发现小错误更新历史: 2003.7.3 树型分类算法 开始和朋友讨论树型算法,一时兴起,写了个树型结构并做了个示例。2003.7.4 主程序和数据库设计 见自己完成了树型分类和节点的管理代码,感觉不能浪费,便有做InfoBase的想法;开始使用PowerDesigner 建立数据库模型(有点杀鸡用牛刀的味道),并生成数据库文件 (1.0 ?)。 开发环境采用delphi 7.0 Enterprise,使用ADO 连接Access数据库,软件名字也定了,叫做infoBase 。 最后将程序的主框架搭好,并实现了richEdit 的文本读取和保存。2003.7.5 “OLE嵌入、URL捕获、UI、附件监听”(代码的实现) 搞定了richEdit 读取保存后开发增加高级功能,其后写完了插入OLE对象,URL文本捕获,插入图形……最后感觉差不多象个样子了,把主界面的图标,工具条统统更新了一遍,变成了现在这个样子。 吃了晚饭就开始写文件附件功能;搞定了附件存储,又写到凌晨一直在实现文件附件监听……(因为明天是星期天)2003.7.6 “代码着色、索引、书签”(星期天) 加入代码加色的功能和另外一些细节功能。 继续休整代码,和修正遗留的bug。 主要的模块差不多后,准备罢手(我的坏习惯),见室友在看CHM版的水木清华的帖子,感觉索引功能和书签功能很重要,至少自己用的时候方便。赶紧加上。 再看了myBase 一些功能后,模仿它加上了一些典型的功能,增加了一个内置的浏览器,用于浏览N格式的附件。2003.7.7 增加“数据库维护”功能(星期一上班) 上午很早就起床了,结果又去睡……!·##¥%%……差点迟到了。 下班后,在家玩魔兽冰峰王座,过全关一个种族(打了3天),开始写InfoBase的MainMenu (主菜单我一直都没有整理功能,呵呵),Access数据库在删除数据后并不会减少文件尺寸,所以加了几个数据库的维护功能。2003.7.8 新增“开发日志”和“最爱收藏夹”(迟到了) 星期一弄的太晚,结果早上迟到了……罚款:¥20RMB 上午去腾讯社区见个朋友发表了自己写了很长时间的代码; 我想,先把我的这个烂东西也发出去吧,结果公司网络掉线了,只好作罢,把网友的帖子内容和代码都保存了下来放在InfoBase中。 从上个星期修正了NC接口的“最后一个BUG”后,工作上有点闲了(其实还有一大堆工作上的事情我还没解决) 想起见到一个网友写的‘梦幻浏览器’的一个功能模块是类似IE的收藏夹,感觉挺好,在网友的浏览器里叫做“最爱”,我觉得也挺好听,干脆也叫这个,做一个这个功能; 然后一直到写完这个模块后,就开始写这个文档。 目前并未让“最爱”与系统收藏夹互动,功能等到过了今天再实现吧……毕竟源代码.PAS加起来就有199KB 了。2003.11.19 增加“全程压缩”功能(星期三,工作任务下来了,‘重’) 上午,客户递交上来了满满一页的新需求和需求的修正列表,哎!相当痛苦,是整整做了一年的东西啊,什么时候才是尽头…… Infobase自己使用了一段时间,总有些不足的地方,最明显的就是,数据文件的大小。我习惯把代码参考和相关的Code文件都保存下来,结果,数据库越来越大,已经差不多60多兆了,如果某篇文章保存的内容多的话,加载的速度非常慢,并不是程序的问题,而是字段内容太大了,Access数据库必须先读入到内存里,才能把字段的值给我。考虑之后决定采用压缩的方式保存文件数据,并且文本内容也压缩,因为文本格式是富文本格式的,它支持OLE,而OLE的信息格式是相当大的,而压缩算法对文本字符串的压缩比率是相当高的,压缩它是化得来得,但是丢失了一个功能,因为压缩后得数据必须是二进制模式,所以,“全文搜索”功能只能简化到“标题搜索”了。下次再想办法解决“全文搜索”得功能。
endnote 是一种很强大的文献管理软件,可帮助我们有效管理文献以及在文章写作时我么能够很便即地进行参考文献编辑。 一、在线搜索文献:直接从网络搜索相关文献并导入到Endnote的文献库内   二、建立文献库和图片库:收藏,管理和搜索个人文献和图片、表格   三、定制文稿:直接在Word中格式化引文和图形,利用文稿模板直接书写合乎杂志社要求的文章。   功能一 在线搜索文献   Endnote利用Z39.50信息获取协议可以方便进入全世界绝大多数的文献数据库,并将连接和   搜索这些数据库的信息用“Connection Files”的形式储存起来直接提供给使用者。 Con   nection Files的设置可以自己创建或修改   搜索过程:   1.进入Endnote7.0,从“Tools”菜单下点击“Connect”   2.出现“Choose A Connection File”对话框,选定数据库,点击“Connect”   3.按照布尔逻辑设定搜索词,点击“Search”   4.出现搜索结果,存入指定的文献库   提示:   1.通过点击“Find” 进行查找设置可以提高对某一类型数据库的查找效率   2.很多数据库需要输入帐号和密码   3.“ Save Search”可以保存搜索设置;“Load Search”可以导入已保存的搜索设置;“   Add Field” 和“Delete Field”分别添加和删除设置栏   功能二 管理库内文献   一、导出文献   EndNote库内的文献可以以4种格式导出:Rich Text Format (RTF), HTML, XML, 和 plai   n text documents(TXT)。从而创建独立的文献集或者创建可以导入到其他数据库的参考   文献。导出的文献样式由当前样式决定,当前样式可以从“Edit”菜单下的“Output Sty   les”或者工具栏上的样式下拉框选定。   导出步骤:   1.选定要导出的文献库   2.按照自己的要求排列文献的顺序   3.选择合适的文献样式   4.从 “File”菜单下点选“Export”.   6.出现导出对话框,选择要保存的文件格式.rtf; .html; .XML; .txt 和文件名   7. 保存   注意: 如果文献库内有图像的话,图像将不会随之导出。只能另外粘贴
第一部分 界面设计 实例001 如何实现程序闪屏效果 实例002 如何实现程序窗口闪烁 实例003 如何制作吸附窗口程序 实例004 如何制作透明程序窗口 实例005 如何制作半透明程序窗口 实例006 如何制作不规则程序窗口 实例007 如何制作程序渐变背景 实例008 如何设置程序背景图像 实例009 如何设置MDI程序背景图像 实例010 如何动态关闭MDI程序所有子窗口 实例011 如何去掉MDI程序子窗口标题栏 实例012 如何拖动非标题栏区域移动窗口 实例013 如何控制程序最小化窗口 实例014 如何限制程序最大最小化窗口 实例015 如何控制程序窗口自动隐藏或显示 实例016 如何隐藏应用程序 实例017 如何控制程序在任务栏上是否出现 实例018 如何使一个程序在任务栏同时出现多个标题 实例019 如何使程序窗口总在最前面显示 实例020 如何隐藏应用程序标题栏 实例021 如何设置程序主标题 实例022 如何设置程序图标 实例023 如何在程序中改变菜单位置 实例024 如何删除程序系统关闭菜单 实例025 如何拷贝当前程序界面 实例026 如何动态创建程序表单 实例027 如何遍历窗体所有组件 实例028 如何保证组件位置相对固定 实例029 如何在窗体中动态增加组件 实例030 如何使组件在程序运行时可以移动 实例031 如何使用组件创建托盘程序 实例032 如何使用动画组件播放动画 实例033 如何在状态栏上加载进度条 实例034 如何在编辑框内显示图像 实例035 如何在列表框中增加水平滚动条 实例036 如何在列表框中同时显示图像和文字 实例037 如何设置属性表组件标签图像 实例038 如何控制Memo组件的文字边界 实例039 如何使用代码控制文字滚动 实例040 如何纵向显示字符串 实例041 如何旋转显示字符串 实例042 如何设置显示文字分辨率 第二部分 程序设置 实例043 如何使用消息框 实例044 如何显示简单关于对话框 实例045 如何在程序中增加热键 实例046 如何在程序中自定义消息 实例047 如何在程序中自定义系统菜单 实例048 如何在执行程序间进行数据通信 实例049 如何使用OLE技术启动画图 实例050 如何在程序中添加Word文档表格 实例051 如何在程序中设置Word文档的字体风格 实例052 如何使用Onldle事件 实例053 如何使程序在循环时响应外界事件 实例054 如何设置程序在系统启动时自动运行 实例055 如何创建多线程程序 实例056 如何创建可独立执行程序 实例057 如何编写单文档应用程序 实例058 如何编写多文档应用程序 实例059 如何编写COM服务器程序 实例060 如何编写COM客户端程序 实例061 如何编写DDE服务器程序 实例062 如何编写DDE客户端程序 实例063 如何编写DLL服务器程序 实例064 如何编写DLL客户端程序 实例065 如何注册DLL服务器程序 实例066 如何制作聊天服务器程序 实例067 如何制作聊天客户端程序 实例068 如何获取程序名称和路径 实例069 如何获取程序命令行参数 实例070 如何析取动态链接库中的图标 实例071 如何设置Edit组件的文本选择范围 实例072 如何将小写金额转换成大写金额 实例073 如何将全角字符串转换成半角字符串 实例074 如何按照指定的有效位数转换数字 实例075 如何获取汉字的拼音索引 实例076 如何设置输入方法 实例077 如何控制数据输入格式 实例078 如何控制编辑框中的输入法 实例079 如何设置回车键后的焦点 实例080 如何将项目保存到对象库 实例081 如何检测鼠标信息 实例082 如何读取鼠标信息 实例083 如何实现鼠标拖动操作 实例084 如何限制鼠标活动范围 实例085 如何读取键盘信息 第三部分 文件操作 实例086 如何复制文件 实例087 如何定制文件复制操作 实例088 如何更名文件 实例089 如何更改文件扩展名 实例090 如何删除文件 实例091 如何删除文件夹 实例092 如何选择文件夹 实例093 如何创建多层文件夹 实例094 如何自动获取文件夹和文件 实例095 如何搜索指定目录下的文件 实例096 如何搜索指定目录下的隐藏文件 实例097 如何搜索文本文件中的字符串 实例098 如何替换文本文件中的字符串 实例099 如何将长文件名转换为短文件名 实例100 如何在文件打开对话框中选择多个文件 实例101 如何定制文件打开和关闭对话框 实例102 如何修改文件打开对话框的按钮标题 实例103 如何使用查找与替换对话框 实例104 如何获取和设置当前目录 实例105 如何判断文件类型 实例106 如何获取系统所有文件类型 实例107 如何获取和设置文件属性 实例108 如何获取和设置文件时间属性 实例109 如何对文件名函数进行操作 实例110 如何读写文本文件 实例111 如何打印文本文件 实例112 如何创建特大型文件 实例113 如何制作临时文件 实例114 如何启动帮助文件 实例115 如何使用组件在主机问传送文件 实例116 如何对文件进行编码和解码 实例117 如何设置RichEdit组件的存盘格式 实例118 如何在WIN.INI文件中保存程序信息 实例119 如何将数据转换成Word文档格式 实例120 如何直接从Excel文件导入数据 实例121 如何直接将数据导入到Excel文件 实例122 如何发送电子邮件(一) 实例123 如何发送电子邮件(二) 第四部分 图像处理 实例124 如何浏览图像 实例125 如何滚动浏览大图像 实例126 如何拖动图像 实例127 如何动态显示图像 实例128 如何维护多个图像 实例129 如何绘制图形 实例130 如何以不规则方式裁剪图像 实例131 如何以任意角度旋转显示图像 实例132 如何在桌面上显示图像 实例133 如何拷贝当前屏幕 实例134 如何打印图像文件 实例135 如何制作马赛克图像 实例136 如何实现图像中心扩散效果 实例137 如何实现图像百叶窗效果 实例138 如何实现图像底片化效果 实例139 如何实现图像翻页效果 实例140 如何实现图像镜像效果 实例141 如何柔化处理图像 实例142 如何锐化处理图像 实例143 如何雾化处理图像 实例144 如何将彩色图像转换成黑白图像 实例145 如何将BMP图像文件转换为JPG图像文件 实例146 如何全屏播放AVI文件 实例147 如何制作媒体播放器 第五部分 系统编程 实例148 如何获取键盘类型 实例149 如何获取声卡配置 实例150 如何获取处理器信息 实例151 如何获取系统元素颜色 实例152 如何获取显示元素信息 实例153 如何获取系统支持的显示模式 实例154 如何动态设置系统的显示模式 实例155 如何获取内存空间信息 实例156 如何获取磁盘类型 实例157 如何获取磁盘卷信息 实例158 如何获取磁盘空间信息 实例159 如何在我的电脑中隐藏磁盘 实例160 如何隐藏系统任务栏 实例161 如何隐藏桌面图标 实例162 如何在桌面上创建快捷方式 实例163 如何获取和设置桌面墙纸 实例164 如何设置桌面墙纸显示方式 实例165 如何进行系统桌面切换 实例166 如何禁止系统屏幕保护程序 实例167 如何在程序中启动系统屏幕保护程序 实例168 如何在开始右键菜单中添加菜单项 实例169 如何清空系统回收站 实例170 如何删除文件到回收站 实例171 如何启动控制面板程序 实例172 如何在系统控制面板中添加项目 实例173 如何为计算机增加启动日志 实例174 如何获取操作系统的启动模式 实例175 如何变暗屏幕颜色 实例176 如何关闭计算机 实例177 如何禁止关闭Windows操作系统 实例178 如何修改IE浏览器的背景 实例179 如何在程序中控制IE窗口 实例180 如何使用默认浏览器打开指定网页 实例181 如何获取当前正在运行的程序 实例182 如何监视系统剪贴板变化 实例183 如何获取系统剪贴板的数据格式 实例184 如何设置系统日期 实例185 如何获取操作系统的产品序列号和产品名称 实例186 如何获取和设置鼠标双击响应速度 实例187 如何弹出和关闭光驱 实例188 如何检测网络连接 实例189 如何创建拨号网络 第六部分 数据库应用 实例190 如何创建不写代码的数据库程序 实例191 如何添加TDBNavigator组件的按钮功能 实例192 如何对数据库记录求和 实例193 如何对数据库记录求平均值 实例194 如何使用Locate方法查询数据库记录 实例195 如何查询固定范围的数据库记录 实例196 如何提高数据库应用程序查询效果 实例197 如何使用数据集的书签 实例198 如何浏览数据库中的图像 实例199 如何在删除数据库记录前给予提示 实例200 如何取得数据集的当前状态 实例201 如何创建主从关系的数据集 实例202 如何在一个数据集中浏览另一个数据集的数据 实例203 如何在数据库更新过程中增加事务操作 实例204 如何在程序中实现查找字段 实例205 如何在程序中实现自定义字段 实例206 如何使用字段拖放功能 实例207 如何为程序添加报表打印功能 实例208 如何使用向导创建打印报表 实例209 如何设置一对多数据库表 实例210 如何设置一对多报表打印功能 实例211 如何根据一对多数据库表绘制图形 实例212 如何根据数据库表显示饼图 实例213 如何根据数据库表绘制条形图 实例214 如何动态绘制数据库图表 实例215 如何设置多重群组的打印报表 实例216 如何编写商业决策分析程序 实例217 如何导出对象库中的商业决策分析程序 实例218 如何打印含有图像字段的数据库表 实例219 如何实现数据库表整表复制 实例220 如何实现数据库记录的批量删除 实例221 如何实现数据库记录的批量修改 实例222 如何使用SQL Builder工具创建SQL语句 实例223 如何在程序运行时指定SQL语句 实例224 如何在程序中创建并使用数据库 实例225 如何在程序中控制与数据库的连接 实例226 如何在程序中创建Access数据库ODBC数据源 实例227 如何在程序运行时创建数据库BDE别名 实例228 如何在安装程序中设置BDE引擎 实例229 如何消除MS-SQL Server数据库连接的登录框 实例230 如何连接MS-SQL Server数据库 实例231 如何连接MS-Access数据库 实例232 如何连接dBase数据库 实例233 如何使用ODBC连接Excel表 实例234 如何使用ADO操作Access数据库 实例235 如何定制DBGrid组件的列表头 实例236 如何统计DBGrid组件多选单元格 实例237 如何设置DBGrid组件指定单元格的颜色值 实例238 如何在DBGrid组件单元格中增加下拉菜单 实例239 如何定制StringGrid组件指定单元格的颜色 实例240 如何获取StringGrid组件鼠标指定单元格的值 实例241 如何使用StringGrid组件显示数据库查询结果 实例242 如何禁止数据控制组件与数据集组件同步刷新 实例243 如何把数据库表转换成文本文件 实例244 如何把数据库中的数据写入Word文档 实例245 如何设置数据库字段的输入显示格式 实例246 如何管理数据库程序的错误信息 实例247 如何获取数据库BDE别名 实例248 如何获取数据库BDE别名参数信息 实例249 如何获取数据库的工作目录 实例250 如何获取数据库驱动程序名称

5,379

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧