uses CommCtrl; var OldWindowPr_程序员之家(判断MonthCalander中鼠标点中了日期还是翻页按钮!)

开发技术指南» 文章正文

引言： uses CommCtrl; var OldWindowPr

摘要： 1.支持c#、delphi for .net、delphi for win32 2.code snippets 3.for loop(支持delphi for win32) 4.refactoring for delphi and c#(***) 5.error inside 6.help inside提示信息中的链接(***) 7.history view(****) 对于f......

·在delphi 7中用dbexpress连接mysql »显示摘要«

摘要：在delphi 7中用dbexpress连接mysql 环境： os　：　windows 2000 server dbms : mysql 4.0.20 client : delphi 7/dbexpress 准备：由于在delphi 7中并没有提供对应mysql4.0以上版本的dbexpress驱动（虽然在borland的codecentral中有相关的驱动下载，但我却使用......

判断MonthCalander中鼠标点中了日期还是翻页按钮!

uses commctrl;

procedure tform1.mywindowproc(var msg: tmessage); 【程序编程相关:大自然的BUG、人的BUG、软件的疑难杂】

var oldwindowproc: twndmethod; 【推荐阅读:生成BIG5字符集所有字符】

begin 【扩展信息:基于阻塞Socket(Indy)的远程控】

if msg.msg = cn_notify then

begin

case twmnotify(msg).nmhdr.code of

mcn_getdaystate: memo1.lines.add(mcn_getdaystate);//點了翻页

mcn_select, mcn_selchange: memo1.lines.add(mcn_select, mcn_selchange);//選中日期

end;

oldwindowproc(msg);

end;

procedure tform1.formcreate(sender: tobject);

begin

oldwindowproc := monthcalendar1.windowproc;

monthcalendar1.windowproc := mywindowproc;

end;

549的問題, 吃完飯看了下vcl的源碼, 應該可以! 不過, 點了翻页按鈕也會觸發日期選中的消息的, 相反則不會!

同時還看到一個:

... 下一页

·firebird嵌入式数据库 »显示摘要«

摘要： firebird是一个跨平台的开源数据库，适用interbase授权协议(ipl)，从borland的interbase脱胎而来。以前用interbase/firebird的时候，发布程序的时候哪怕只有一个用户至少也得安装一个localserver，一些单机版的程序只好使用access来保存数据。但是微软那个mdac偏偏常出现一些莫名其妙的问题，access2000的数据库文件在win98上就经......

» 本期热门文章：

· 热门栏目：

» 相关精选文章

» 其它相关：