自定义博客皮肤VIP专享

*博客头图:

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

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

博客底图:

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

栏目图:

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

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(6)
  • 资源 (1)
  • 收藏
  • 关注

原创 日期排序 deque

<br /><br />struct MyStruct<br />{<br />        AnsiString Date;<br />        TDate ToDate()const{return StrToDate(Date);}<br />};<br />bool aa(const MyStruct &r,const MyStruct &t)<br />{<br />return r.ToDate() < t.ToDate();<br />}<br />//#include<iostream

2010-06-26 00:54:00 263

转载 bde 发布

<br />从网上找到的文章 <br />InstallShield   Express制作Delphi数据库安装程序   <br />关键所在   <br />用Delphi编写的数据库程序在发布时需要同时发布BDE(Borland   Database   Engine),但BDE占用空间较大(不同版本大小不一,最新的Delphi5有17M多),远比一般的程序本身要大。但实际上,有些文件用不上的,所以我们可以在发布时用Delphi附带的InstallShield制作安装程序来定制BDE驱动,这样可以精简

2010-06-25 07:40:00 661

原创 ole 读写 excel

<br /><br />Variant ea,wb,s,s1;<br /> <br />        ea = Variant::CreateObject ("Excel.Application");<br />        ea.OlePropertySet("Visible", (Variant)false);<br />        wb=ea.OlePropertyGet("Workbooks");<br />        wb.OleFunction("add",-4167);<br />

2010-06-24 05:49:00 580

原创 关于继承于TCheckListBox的子类对 Items属性的修改

 在子类中重写了父类的属性__property TStringList* Items = {write = witem, read = ritem};void __fastcall witem(TStringList* s);TStringList* __fastcall ritem();在这个属性的读写函数中,可以对Items指针的地址进行操作和修改,得到完整的数据并加入自己的代

2007-04-12 17:20:00 753

原创 对于文件在窗口之间拖放的补充

之前使用网上下载的CDataSource、CDataObject—等等类实现了 对文件拖放的目的。然而,此类原码竟是VC++代码。并且拖放时,鼠标下文件图标的显示也并不能实现。因此,自己从收集到的资料BCB的原码。拖放的原码网上比较多,且简单。因此在此说明一下对于显示图标的步骤:首先,对于CDataObject类的SetData方法,不能把非TYMED_HGLOBAL数据排除在外。

2006-11-12 09:58:00 1838

原创 关于在不同程序间拖放文件的实践记录

由于最近的一个项目需要实现与其它程序的文件拖放(拖进/拖出),而手上没有现成的控件.在网络上也找不到合适的原代码.因此,决定自己做了一个.它是继承于TLlistView类的.对于拖进文件可以用简单的函数实现:步骤为: No. 1在构造或初始函数中,注册接受窗口DragAcceptFiles(ListView->Handle,true); No.2加入窗口响应消息的函数,并使用DragQ

2006-11-02 12:42:00 1222

家庭记帐簿

绿色软件<br/>简单的数据记录,核算,分类,统计<br/>每月花费统计,图示等等<br/>软件当前还在改善当中,如果有不足 意见 或者 想法都请您提出来.<br/>在下不胜感激,本人的<br/>EMAIL:programuser@citiz.net <br/>QQ: 694796939 <br/>谢谢各位提出宝贵的意见

2007-05-20

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除