
2. Delphi
文章平均质量分 69
SafeF8
这个作者很懒,什么都没留下…
展开
-
Delphi水平测试试卷(初中级)样题
Delphi水平测试试卷(初中级)样题一. 选择题(共40道)1. 用户开发程序时需要经常在窗体和编辑器窗口之间来回切换,可使用快捷键()。A、 F12和F11 B、 F12和F13 C、 F12和Ctrl+F12 D、 F12和Alt+F12 E、F12和Shift+F122. 某函数如下:Function c原创 2004-12-12 14:36:00 · 4019 阅读 · 0 评论 -
Shutdown reboot logoff Windows 98/ME/XP
{1.} function MyExitWindows(RebootParam: Longword): Boolean; var TTokenHd: THandle; TTokenPvg: TTokenPrivileges; cbtpPrevious: DWORD; rTTokenPvg: TTokenPrivileges; pcbtpPreviousRequir原创 2005-01-24 19:54:00 · 1529 阅读 · 0 评论 -
Create a menu item into the Delphi menu
{....} uses ToolsApi, Menus; {....} var item: TMenuItem; begin {get reference to delphis mainmenu. You can handle it like a common TMainMenu} with (BorlandIDEServices as INTAServices).GetMainMe原创 2005-01-24 21:50:00 · 1307 阅读 · 0 评论 -
Create a simple Delphi Expert(创建一个简单的Delphi专家)
{ Diese Unit kann in ein Package compiliert werden und erscheint danach im Delphi Menu unter Hilfe. } { This unit can be compiled into a package and will then appear in the delphi Help menu. }原创 2005-01-24 21:52:00 · 1333 阅读 · 0 评论 -
面试题
2005-02-26 00:19:49) 徐剑文(64445322)有10堆西瓜,每堆10个,其中9堆每个10斤,1堆每个9斤,外表看不出区别,用一把秤称1次,挑出9斤的那堆。=========================今天去一家软件公司时候的面试题之一,郁闷哦,没有做出来,有人知道吗? 26510448(西门废铁) 00:36:21从第一堆拿一个,第二堆拿二个,第三堆拿三个... 26原创 2005-02-26 00:45:00 · 1745 阅读 · 0 评论 -
用户界面设计参考 (ZT)
用户界面设计是软件研发过程中很重要很重要的一个环节,然而,却没有什么规则能将软件界面设计规范化。在这里,我们从互联网上整理出一些朋友的(或这些朋友整理的)观点,希望能对大家在界面设计上有所帮助。 注:以下内容均来自互联网上的链接,如有冒犯请多多原谅!荣耀先生关于用于界面的建议(http://www.royaloo.com/articles/articles_2002/UI_content.h转载 2005-06-26 17:43:00 · 5291 阅读 · 4 评论 -
一个磁性窗体VCL组件的具体实现
一个磁性窗体VCL组件的具体实现 副标题: 作者:佚名 文章来源:大富翁 点击数:52 更新时间:2005-2-25 文:陈达军日期:2003-10-29记得《程序员》杂志中曾有一篇文章介绍过如何实现磁性窗体,该篇文章总结了网上相关的讨论帖子,分析了实现磁性窗体的基本原理,并最终给出了一个可行的解决方案。但文中介绍的具有磁性吸附能力的主窗体只能是应用程序的主窗体,不具有灵活性,且文中给出的示例原创 2005-03-14 12:13:00 · 2349 阅读 · 1 评论 -
Delphi 下用Windows API 创建窗体
Delphi 下用Windows API 创建窗体 副标题: 作者:佚名 文章来源:大富翁 点击数:119 更新时间:2005-2-25 Delphi 下用Windows API 创建窗体// Delphi 下调用Windows API 创建窗体. //// 模板-------BY Hottey 2004-4-13-0:18 //// 作者网站:http://a原创 2005-03-14 12:16:00 · 1729 阅读 · 0 评论 -
回车键替换TAB
在Delphi编程中,如何实现用回车键在若干个编辑窗口中切换?比如,姓名和密码两个输入窗口,输入姓名后,只能用Tab键或用鼠标定位光标到密码输入窗口,我想用回车键切换窗口。 回答: 先将窗体的KeyPreview属性设为True。然后在FormKeyPress事件中加入以下代码: procedure TForm1.FormKeyPress(Sender: TObject;原创 2005-09-19 23:20:00 · 4129 阅读 · 2 评论 -
复制DBGrid当前行到剪切板
uses Clipbrd; {------------------------------------------------------------------------------- 过程名: CopyCurrentDBLine 作者: Bird 日期: 2005.10.16 参数: DBGrid: TDBGrid 返原创 2005-10-16 02:52:00 · 3088 阅读 · 0 评论 -
简化版拼音反查单元
unit IMCode; // 简化版拼音反查单元interface{ iMode 二进制功能位说明 X X X X X X X X X X X X X X X X 3 2 1 1: 0 - 只取各个汉字声母的第一个字母; 1 - 全取 2: 0 - 遇到不能翻译的字符不翻译; 1 - 翻译成 ? (本选项目针对全角字符) 3:原创 2005-12-17 16:29:00 · 2660 阅读 · 0 评论 -
Simulate the pressing of keyboard keys
1. PostKeyEx32 function} procedure PostKeyEx32(key: Word; const shift: TShiftState; specialkey: Boolean); {************************************************************ * Procedure PostKeyEx32原创 2005-01-24 19:48:00 · 2223 阅读 · 0 评论 -
关机源码( for WinNT)
procedure ExitWindowsNT(uFlags : integer); var hToken : THANDLE; tkp, tkDumb : TTokenPrivileges; DumbInt : DWORD; begin FillChar(tkp, sizeof(tkp), 0); // Get a token for this process if no原创 2005-01-16 18:54:00 · 1920 阅读 · 0 评论 -
动态连接数据库及动态建立ODBC,DSN(ZT)
在ODBC数据源里配置数据库,通过这种方式,应用程序的编写变的简单。只需要在应用程序里面指定已经配置好的数据源就可以连接,访问数据库。但是,这种方式也有一定的局限性,需要手工的在ODBC数据源里面配置。需要教会程序的使用者如何去配置,而且,如果一不小心更改了ODBC数据源的配置(也许是无意的)。就会造成连接数据库失败。这时候,程序的使用人员也许会一筹莫展,束手无策。在form或Data Modul转载 2004-12-09 15:28:00 · 1877 阅读 · 0 评论 -
如何移动没有标题的窗体
★、如何移动没有标题的窗体 △"欺骗"系统,让他认为点中的是窗体的标题行:在FORM的Private定义中作如下声明:Procedure WMNCHitTest(var M: TWMNCHitTest); message wm_NCHitTest; 函数的实现: Procedure TForm1.WMNCHitTest(var M: TWMNCHitTest); begin inheri原创 2004-12-20 11:01:00 · 1306 阅读 · 0 评论 -
FindWindowEX应用实例二则
函数功能:该函数获得一个窗口的句柄,该窗口的类名和窗口名与给定的字符串相匹配。这个函数查找子窗口,从排在给定的子窗口后面的下一个子窗口开始。在查找时不区分大小写。 函数原型:HWND FindWindowEx(HWND hwndParent,HWND hwndChildAfter,LPCTSTR lpszClass,LPCTSTR lpszWindow); 参数; hwndPar原创 2004-12-20 12:52:00 · 4532 阅读 · 1 评论 -
界面设计与测试规则
界面设计与测试规则界面是软件与用户交互的最直接的层,界面的好坏决定用户对软件的第一印象。而且设计良好的界面能够引导用户自己完成相应的操作,起到向导的作用。同时界面如同人的面孔,具有吸引用户的直接优势。设计合理的界面能给用户带来轻松愉悦的感受和成功的感觉,相反由于界面设计的失败,让用户有挫败感,再实用强大的功能都可能在用户的畏惧与放弃中付诸东流。目前界面的设计引起软件设计人员的重视的程度还远远不原创 2005-01-03 19:29:00 · 1506 阅读 · 0 评论 -
将数据集转换为Excel格式的一个实现
{ 将数据集转换为Excel格式的一个实现 在做项目时,很多情况下,客户需要对我们保存在数据库中的数据再加工再利用, 如财务需要一份今年财务情况的电子报表,总经理需要今年销售情况的一个电子报表。 我们的程序可以把这些数据用DBGrid显示出来,也可以用QuickReport打印出来,但是 这些数据都不能被客户自由的完整地拷贝,没有独立的电子化形式,因而不能被独立地使用。 要把数据库中的数据,在De原创 2005-01-03 21:00:00 · 3731 阅读 · 0 评论 -
巧用DBGrid控件的Sort属性实现“点击标题栏自动排序功能”。(改进版本)
曾看见优快云文档中有介绍到:通过ADOQuery或其它数据集组件的Sort属性配合DBGrid的OnTitleClick事件,可以方便地实现此功能。因为Sort属性可以让活动数据集按指定的字段进行排序,也可以选择排序方式(升序/降序)。这个功能的确很实用。(http://blog.youkuaiyun.com/jlee084/archive/2004/12/20/223284.aspx)。我改进了一下这功能原创 2005-01-09 10:44:00 · 2248 阅读 · 3 评论 -
最精简的小写金额转大写的函数
.测试通过了。 function NumToChar(const n: Real): string; //可以到万亿,并且可以随便扩大范围 const cNum: WideString = 零壹贰叁肆伍陆柒捌玖--万仟佰拾亿仟佰拾万仟佰拾元角分; cCha:array[0..1, 0..12]of string= (( 零元,零拾,零佰,零仟,零万,原创 2005-01-23 21:38:00 · 2763 阅读 · 0 评论 -
GetIdeDiskSerialNumber
// (c) Alex Konshin mailto:alexk@mtgroup.ru 30 jul 2000 program IdeSN; // PURPOSE: Simple console application that extract first IDE disk serial number. {$APPTYPE CONSOLE} uses Windows, Sy原创 2005-01-24 21:09:00 · 2648 阅读 · 0 评论 -
How can I create a tray icon
{***************************************************** * How can I create a tray icon? * Fortunately, creating an application that runs in the system tray is pretty easy - only one (API) function,原创 2005-01-24 22:32:00 · 2017 阅读 · 0 评论 -
DBGrid 应用全书
{***********************************************************************} {*在 Delphi 语言的数据库编程中,DBGrid 是显示数据的主要手段之一。 {*但是 DBGrid 缺省的外观未免显得单调和缺乏创意。其实,我们完全可 {*以在我们的程序中通过编程来达到美化DBGrid 外观的目的。通过编程, {*我们可以改变原创 2006-01-02 12:06:00 · 2782 阅读 · 1 评论