自定义博客皮肤VIP专享

*博客头图：

点击选择上传的图片

格式为PNG、JPG，宽度*高度大于1920*100像素，不超过2MB，主视觉建议放在右侧，请参照线上博客头图

请上传大于1920*100像素的图片！

博客底图：

点击选择上传的图片

图片格式为PNG、JPG，不超过1MB，可上下左右平铺至整个背景

栏目图：

点击选择上传的图片

图片格式为PNG、JPG，图片宽度*高度为300*38像素，不超过0.5MB

主标题颜色：

RGB颜色，例如：#AFAFAF

Hover：

RGB颜色，例如：#AFAFAF

副标题颜色：

RGB颜色，例如：#AFAFAF

预览取消提交

自定义博客皮肤

-+

上一步保存

luhongjun的专栏

luhongjun CSDN认证博客专家 CSDN认证企业博客

码龄23年

14: 原创

19万+: 周排名

134万+: 总排名

2万+: 访问

: 等级

421: 积分

11: 粉丝

5: 获赞

1: 评论

7: 收藏

私信

关注

热门文章

分类专栏

BCB文档 6篇
BCB程序 7篇
数据库 2篇

最新评论

使用原生ADO进行数据库存取。
风归叶: 不能上翻,可能是这里问题 <br>VRecordSet.OleFunction("Open","Select * from employee", VConnect); <br>默认可能是只能向下翻. <br> <br>我的代码,没完善,但可以上下翻 <br>//--------------------------------------------------------------------------- <br> <br>#include <vcl.h> <br>#pragma hdrstop <br> <br>#include "Unit1.h" <br>#include "ComObj.hpp" <br>//--------------------------------------------------------------------------- <br>#pragma package(smart_init) <br>#pragma resource "*.dfm" <br>TForm1 *Form1; <br>//--------------------------------------------------------------------------- <br>__fastcall TForm1::TForm1(TComponent* Owner) <br> : TForm(Owner) <br>{ <br> <br>} <br>//--------------------------------------------------------------------------- <br>void __fastcall TForm1::btnFirstClick(TObject *Sender) <br>{ <br> if( VRecordSet.OlePropertyGet("BOF").intVal == -1 ) <br> btnFirst->Enabled = false; <br> else <br> { <br> VRecordSet.OleProcedure("MoveFirst"); <br> MyStringGrid->Row = 1; <br> } <br>} <br>//--------------------------------------------------------------------------- <br>void __fastcall TForm1::btnNextClick(TObject *Sender) <br>{ <br> if( VRecordSet.OlePropertyGet("EOF").boolVal ) <br> btnNext->Enabled = false; <br> else <br> { <br> VRecordSet.OleProcedure("MoveNext"); <br> //没有判断是否越过范围 <br> MyStringGrid->Row++; <br> } <br>} <br>//-------------------------------

最新文章

BCB文档

关注

文章平均质量分 50

关注数：文章数：6 文章阅读量：12905 文章收藏量：6

作者: luhongjun

这个作者很懒，什么都没留下…

展开