ITPub博客

利用DELPHI编写WINDOWS外壳 (转)[@more@]  利用Delphi编写windows外壳 　　 对于操作系统原理比较了解的朋友都会知道，一个完备的操作系统都会提供一个外壳（shell），以方便普通用户使用操作系统提供的各种功能。Windows（在这里指的是Windows 95windows NT4.0以上版本的操作系统）的外壳不但提供了方便美观的GUI图形界面，而且还提供了强大的外壳扩展功能，大家可能在很多软件中看到这些外壳扩展了。例如:如果你的系统中安装了winzip的话，当你在Windows Explore中鼠标右键点击文件夹或者文件时，弹出菜单中就会出现Winzip

在VC中修改显示器的分辩率和色彩 (转)[@more@]  在VC中修改显示器的分辩率和色彩 　　在日常的程序开发中，有时我们想让自己编写的程序运行在显示器一定的分辨率和色彩数目下。如何让程序自动修改当前的显示器设置呢？这首先得从显示器的工作原理谈起。　　一、相关原理　　我们知道，显示器所显示的内容对应于显存，在显示器上最小的单位是象素(Pixel，这里仅考虑逻辑象素)，显存的最小的单位是位(Bits)。 显示器工作的特征主要体现在色彩数和分辨率两方面。显示器所显示的色彩的数目取决于单位象素所使用的显存的位数(Bits

Asp(Active Server Page)的语言特性 (转)[@more@]ASP(Active Server Page)的语言特性 web源于静态文本，现在很多站点几乎还是采用这种方式。静态文本的缺点就是维护难(文件数目多)、查询难、修改难。虽然可以采用FrontPage对站点进行管理，但这只是其中的一个办法。现在，很多的站点都会在后台采用数据库，动态生成超文本。这样，要改变式样，只需修改几个文件；要变更内容，只需对数据库进行操作即可，而且易于保持致性；而对于全文检索等查询应用，这种方式的优越性更为突出。(经常说的“动态”　也包括图片的动态显示，如动态GIF、Java

读书软件做自己的 (转)[@more@]  读书软件做自己的 　　 不知各位对E_book的读书效果是否感兴趣，它是用vb做的，其实在c＋＋builder中也可以很轻松的实现类似效果。现在让我们step by step 吧!　　1)新建工程。单元存盘为"read.cpp"　　加入一个popupmenu; 窗体属性设置如下　　Name: MainForm;　　AutoScroll:false;　　BorderStyle:bsNone;　　Font:宋体,Fontsize:9;　　Position:poScreenCenter;　　PopupMenu:PopupMenu1;　　 2)添加一panel,设置为：　　BevelOuter:bvNone;　　BorderStyle:bsSingle;　　Ctl3D:false;　

谈谈VB的数据库编程方式 (转)[@more@]VB全称Visual Basic,是微软公司推出的基于Basic语言的可视化编程环境,以其简单易学功能强大而倍受广大电脑爱好者的青睐。VB的数据库编程方面按其难易程度可分为三类(由易到难);●使用数据库控制项和绑定控制项●使用数据库对象变量进行编程●直接调用OdbC2.0api在使用VB进行数据库编程时,通常,会首先选择三种基本方法之一来进行数据库应用程序的方案设计, 现在就将以上三种设计方法的适应范围及其优缺点进行一个比较。1 使用数据库控制项和绑定控制项1.1优点?它是三种方法中编码量最小的?不必了解CD

在应用程序中开关WINDOWS系统 (转)[@more@]在实际应用时,修改了系统的某些设置,必须重新启动windows;而有些时候演示完 一个软件后,必须关闭WINDOWS;同时在演示期间,又禁止用户强行关闭WINDOWS.如何 解决上述问题,笔者编制了一个程序全面地解决了上述问题. 实现原理: 1.重新启动WINDOWS,关闭WINDOWS,结束当前的用户进程都是通过调用 EXITWINDOWSEX函数实现的.该函数有两个参数,前一个参数使用EWX_FORCE表示 强行关闭WINDOWS而不提醒保存其他应用程序的运行结果,后一个参数EWX_LOGOFF 表示注销当前的用户进程; EWX_SHUTDOWN表示

Delphi：易混淆的概念 (转)[@more@]一、Owner和Parent的区别： 　　Parent属性是指构件的包容器，构件只能在此范围内显示和移动。举例子如下： 　　(1)在Form1的窗体上，放一个Panel1,并将Panel1拉大， 　　(2)在Panel1上放一Button1； 　　(3)在Form1上放一Button2。 　　现在如果移动Panel1,则Button1随着Panel1移动，这是因为Button1的Parent是Panel1。现在将Button2移到Panel1上，再次移动Panel1,Button2并不跟着移动，这是因为Button2的Parent是Form1。除在窗体设计中，应注意构件的Parent是谁外，在动态创建构件时，也应指出构件的P

Delphi之快速设计(程序设计篇) (转)[@more@]*本文涉及的所有代码均在WinNt 4、Delphi4 C/S下正确运行通过。由于Delphi采用了真正的完全面向对象方法、当今世界最快的编译器以及领先的数据库技术，特别是她对windows api的完全兼容，出色的代码自动生成能力……人们已经看到，在短短的几年当中，Delphi已在众多的开发工具中脱颖而出！正是Delphi的诸多优秀品质，使程序员能在很短的时间内开发出极具专业水准的运用软件，而所做的工作却是相当的少！正所谓Let's us make better!我们应怎样充分利用Delphi的优势来更加快速地进行程序设计程序

DELPHI中使用API函数详解 (转)[@more@]大家别误会，这里的戴妃可不是已经香销玉殒的英国王妃，而是INPRISE的招牌产品Delphi的中文译名！介绍DELPHI的文章已经很多了，大家是不是被它强大的开发功能所折服？可视化编程的出现，使很多朋友圆了程序梦。的确，几个控件的搭配再加上几条语句，也许一个软件就出来了。但是，你是否已不满足使用别人的元件？想更深入的了解windows的编程？更换的掌握DELPHI？OK，请继续往下看。 　　DOS下的INT21H对于开发DOS程序很重要，而对于在WINDOWS下开发程序，了解api函数是很有必要的。元件就像招式，而A

Delphi实用编程经验二则 (转)[@more@]   Delphi是全新的可视化编程环境，为我们提供了一种方便、快捷的windows应用程序开发工具。  下面是两则Delphi编程的实用经验，希望能与大家共享：  1?使用超文本链接标示语言（HTML）。使用Windows中的打开方式（如IE等）访问HTML文件，受系统限制太大，不够灵活。Delphi提供了THTML控件，它能调用HTML文件，但在它的属性中却没有详细说明怎样调用本机的HTML文件。其实，只要使用正确的URL格式，是能够完成这一功能的，其格式如下：  file:∥<host>/<pa

BMP位图文件结构及VC操作 (转)[@more@]---- 用普通方法显示BMP位图，占内存大，速度慢，在图形缩小时，失真严重,在低颜色位数的设备上显示高颜色位数的图形图形时失真大。本文采用视频函数显示BMP位图，可以消除以上的缺点。 ---- 一、BMP文件结构 ---- 1. BMP文件组成 ---- BMP文件由文件头、位图信息头、颜色信息和图形数据四部分组成。 ---- 2. BMP文件头 ---- BMP文件头数据结构含有BMP文件的类型、文件大小和位图起始位置等信息。 ---- 其结构定义如下: typedef struct tagBITMAPFILEHEADER { WORdbfType; // 位图文件

Crystal Report（RDC8） 水晶报表在VC6环境中的调用方法 (转)[@more@]    .NET/vcrdc8/vcrdc8.htm">http://jaesyinfo.51.net/vcrdc8/vcrdc8.htm  //源文出处   Crystal Report（RDC8）水晶报表 在VC6环境中的调用方法 作者：jaesy. EMail:jaesyinfo@163.net   Seagate Crystal Report（水晶报表） 一直是报表工具中佼佼者，其功能强大，设计灵活。在Crystal Report 的8.0版本中,较多地融入COM思想，更加强调了RDC的概念。RDC为Report Designer Component的缩写。 本文主要说明如何是VC6环境中使用RDC

将某一主机域名解析为IP地址 (转)[@more@]将某一主机域名解析为IP地址。使用 WinSock 单元；过程如下：function HostToIP(Name: string; var Ip: string): Boolean;var  wsdata : TWSAData;  hostName : array [0..255] of char;  hostEnt : PHostEnt;  addr : PChar;begin  WSAStartup ($0101, wsdata);  try  gethostname (hostName, sizeof (hostName));  StrPCopy(hostName, Name);  hostEnt := gethostbyname (hostName);  if Assigned (hostEnt) then  if Assigned (hostEn

Win9x下程序间的数据传递 (转)[@more@]WIN9X下程序间的数据传递 　　大家知道在Window 9x中一个应用程序不能直接访问另一个程序的内存地址，因为WIN9x为每个运行中的进程提供了自己的虚拟空间，这起到了很好的保护作用，然而，它也使得两个程序间不能轻易的交换数据，但是这并不是说程序间就一定不能进行数据传送了，Win9x为我们提供了几个特殊的方法来实现这个目的，如通过windows消息WM_CopyData 和存储影响文件等方法。使用消息WM_CopyData传送需要传递的数据缓冲区的内存地址，前面讲过，我们不能从一个应用程序向另一个程序发送

VC++实现拨号上网程序 (转)[@more@]  VC++实现拨号上网程序 　　　　在Office2000中，就用户界面丰富程度而论，word以56个工具栏（Toolbar）、50个弹出式菜单（Popup Menu）雄居首位，但excel（工具栏40个、弹出式菜单51个）和Powerpoint（工具栏43个、弹出式菜单25个）也相差不远。大多数用户可能从来没有见过所有这些工具栏，甚至许多用户不知道Office提供了这么多命令工具。　　虽然我们可以用【视图/工具栏】菜单隐藏或显示一些工具栏，但这个菜单并没有列出全部的工具栏。对于Word，从【工具/自定义】菜单可以看到的工具

提取应用程序中的图标资源 (转)[@more@]提取应用程序中的图标资源 　　经常看见一些软件有着美丽，光艳夺目，非常个性化的图标，曾几何时也想拥有，可苦于缺少一点点艺术细胞，只好打起妙手空空的念头。经过一天的捉摸，也找到一些门道，效果还佳，再用Delphi自带的Image Editor加以修改，彻底私有化，为我所用。洒家用此法做了一些漂亮的图标，令老友羡慕不已。好了，好东西当然不敢独享，且容我为各位慢慢道来：首先用api函数LoadLibrary(lpLibFileName: PChar): HMODULE; stdcall; 把指定的程序模块映射到调用程序的地址空间去。该

轻松实现SINDOWS 98动态菜单 (转)[@more@]轻松实现SINDOWS 98动态菜单 　　 在windows 98中，当你第一次使用动态菜单时，一定感到非常奇妙。其实在windows 98中，较容易动态地建立整个弹出式菜单，并可将其加到一个已存在的菜单中。首先，用api函数CreatePopMenu()建立菜单，函数原型如下：HMENU CreatePopupMenu(void);该函数建立一个空菜单并返回菜单句柄。建立菜单后，使用AppendMenu()来增加菜单项目。菜单构造完成后即可将其用AppendMenu()增加到已存在的菜单中。使用CreatePopupMenu()函数建立的菜单必须被废弃。若菜单连接到一

WINDOWS未开函数揭密(1) (转)[@more@]  windows未开函数揭密 　　什么是未公开函数？　　 对于Windows的api函数调用相信大家已经不会陌生了。API函数调用是通过在VB中定义和调用Windows动态连接库中的函数从而扩展VB程序的功能。API函数的定义和调用方法在微软的开发工具中都有详细的说明。　　 那么什么是“未公开”函数呢？微软为了某种目的。对于一些封装在系统中的函数没有在任何开发文档提供任何函数说明和定义。而这些函数有很多都是很有用的。所幸的是一些有心之人对Windows系统动态连接库做了十分详细的分析，从而将

模式设计（三：Builder模式） (转)[@more@]  builder 模式 本文中我将采用生产汽车的例子来讲解builder 模式。 考虑如下问题：我要建造一部车，我们希望将这个复杂的对象的构建与其表示分离，使得同样的构建过程可以创建不同的表示。譬如桑塔纳，帕萨特等车，采用同一各构建过程就可构建同一对象的不同表示。 比较abstract factory和builder不同点是：（1）适用问题（2）构建方式。 builder  是构造一个复杂对象;  （适用问题）  一步一步的构建并最终返回一个产品；  （构建方式） abstract factory&nbsp

关于拉幕程序的讨论和源码 (转)[@more@]程序把一个文本文件在屏幕上缓慢输出,完全输出后再从头循环输出 修改后可以使用的程序源代码（还是不完善：还不能实现从一侧飞入的效果，容易出错）：unit Unit1;interfaceuses  windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,  StdCtrls, ExtCtrls, ComCtrls, ColorGrd, RxCombos;type  TForm1 = class(TForm)    Button1: TButton;    Edit1: TEdit;    OpenDialog1: TOpenDialog;    Button2: TButton;&n