http://soft.yesky.com/SoftChannel/72342371928440832/20040726/1834794.shtml你的电脑有没有摄像头？看到别人用QQ玩视屏你会不会去想怎么实现的？这里介绍使用DELPHI使用MS的AVICAP32.DLL就可轻松的实现对摄像头编程，如果再加上你的网络编程水平，实现一个视屏聊天就不成什么问题了。看看下面代码的代码：

1.1 此份文件的目的为何？ 这份文件的目的是为了解答有关撰写 Delphi组件时常见或文件上找不到的问题。我曾经花了一段很长的时间来了解探索 TDataLink 类别，这让我觉得应该将撰写组件时常遇到的问题及经验心得写下来，分享给大家。不过我并不能保证写在这份文件里头的解答完全正确。如果你对其中的任何问题有更好的解决方法，或认为有什么信息适合放在这份文件里的话，请告知作者。有任何错误或缺漏也欢迎

1.用一条语句得出某日期所在月份的最大天数？　　SELECT DAY(DATEADD(dd, -DAY(2004-02-13), DATEADD(mm, 1, 2004-02-13))) AS Day Number　　2.少记录变成多条记录问题　　有表tbl　　日期       收入    支出　　2004-02-11 00:00:00 60 45　　2004-03-01

摘 自 http://blog.youkuaiyun.com/nhconch/archive/2004/12/04/204816.aspx　　微软的每一个产品，无论功能还是界面设计都会带给我们一定的惊喜，比如OfficeXP、Office2003、Messenger的界面设计，早已成为众多软件竞相模仿的对象，就拿Messenger来说，我就见过好几套网络视频会议的软件都借鉴了它的界面风格。　　前段时间因为

转贴自 http://blog.youkuaiyun.com/visli/archive/2004/12/02/202246.aspx如何减小应用程序(EXE)的大小?一般来说，由Delphi生成的EXE文件，要比其由它编程语言生成的体积大一些。这主要是由于使用VCL的原因（当然，VCL是有许多优点的！）以下是减小EXE文件大小的几种途径：01) 使用加壳工具（如 UPX，ASPack 等）02) 使

转自http://blog.youkuaiyun.com/nhconch/archive/2004/12/05/205127.aspx　　本文利用Listbox自绘实现了两种特殊效果，其中第两种风格来自C++ Builder 研究 www.ccrun.com，老妖用BCB实现了，现在把它转换成Delphi代码。演示图片：//-----------------------------------------

Delphi是一种面向对象的编程语言，由于它采用完全集成OOP的优点，因此使它成为目前十分流行的Windows开发工具。在Delphi包含的众多类中，TApplication是一个有着十分重要作用的类。TApplication类是用于描述Delphi编制的应用程序的一个类。通过对这个类的灵活应用可以编制许多有特点的程序。下面我们就举几个这方面的例子。  ---- 1 检测当前Windows程序是否

下面的过程放到一个Timer中，每隔一段时间执行一次，如5秒。{************************************* Clear Memory* From Muse2008************************************}procedure ClearMemory;begin        if Win32Platform = VER_PLATFORM

下面的这些东西是我转贴的。至于搞三层，我曾经用ASTA实现过，但是我一般用的是两层。也许对于小系统来说就比较好，但大系统的话，我看还是够怆。我应该研究这方面的东西如JAVA的一些应用服务器，以及DEPHI如何和它们通信；或。NET的一些解决办法。毕竟企业级应用才是王道。紧跟时代潮流才能前进。——————————————————————————————————————————下面的东西都是转贴的，包

PDF Page Count AlgorithmDecember 2004Its not often that you cant find coding examples on the internet to do basic programming tasks, so I was surprised when I couldnt find code to determine the pag

Having found the DHTMLEdit looked ideal solution except this "Unknowninterface"Think I have a potential solution (not as nice as I would like due toissues overriding interfaces :s)Here is what I have

Rotated EllipsesDecember 2005There is no native Windows function to draw ellipses at rotated angles, so every programmer has to do the drawing themselves. It took me a while to find some decent code o

消息，就是指Windows发出的一个通知，告诉应用程序某个事情发生了。例如，单击鼠标、改变窗口尺寸、按下键盘上的一个键都会使Windows发送一个消息给应用程序。消息本身是作为一个记录传递给应用程序的，这个记录中包含了消息的类型以及其他信息。例如，对于单击鼠标所产生的消息来说，这个记录中包含了单击鼠标时的坐标。这个记录类型叫做TMsg，它在Windows单元中是这样声明的：type

DELPHI中拖放的操作 拖放(DragDrop)是Windows提供的一种快捷的操作方式。作为基于Windows的开发工具，Delphi同样支持拖放操作，而且开发应用系统的拖放功能十分方便，真正体现了Delphi 的强大功能和方便性。　　Delphi提供的所有控件(Control，即能获得输入焦点的部件)都支持拖放操作，并有相应的拖放属性、拖放事件和拖放方法。下面我们先介绍控件的拖放支持

我们可以通过执行下面的一些命令，来打开一些特殊的系统窗口，下面的一些参数可能在WIN2000下无效，自己可以试一试。我在XP上试过。　　命令列: rundll32.exe shell32.dll,Control_RunDLL　　功能: 显示控制面板　　命令列: rundll32.exe shell32.dll,Control_RunDLL access.cpl,,1　　功能: 显示“控制面板－

从Delphi5开始，Delphi集成开发环境中的Object Inspector就使用了图形化的风格来显示某些属性。比如Cursors、Colors、Fonts和Image List等等属性就是这种类型。第一次看到这样的效果，的确令人感到神奇，各种字体的名称可以直接以这种字体的样式显示出来，在选择字体的时候真是很方便。这种效果是如何实现的呢，其实就是使用了组件的“自绘”（Ower-drawing

　随着网络的深入应用，各种软件都增加了一些网络功能，常用的文本编辑器也出现了这样的一种功能，当你把一个网址输入完毕后，网址由黑色变成了带下划线的宝蓝色，点击之后，你的缺省Web浏览器将会被启动，显示出该URL所标识的网站内容；而如果你输入的是“mailto:webmaster@yesky.com”那么你的缺省电子邮件程序将被打开，这样你就能通过一个使用文本编辑器来发送电子邮件了。

    编写Delphi应用程序时，经常会遇到一些ActiveX控件[注：扩展名为OCX的控件或DLL的类型库]，它们为应用程序的开发提供了简单的操作途径。然而，这些程序在发布的同时，面临ActiveX控件注册问题。    解决途径：一、用安装程序制作打包文件，往往会给增加程序本身的大小，系统重装时，则必须重新安装它；二、用程序本身进行代码编写函数的形式处理它。使用方法分为两种：一、直接把可视化的

 出处：http://www.delphizine.com/newsletterarticle/2004/08/di200408jc_l/di200408jc_l.asp版权：属原作者所有，转载请注明出处！翻译：lucentoff 2004年Delphi Informant杂志读者选择奖（Delphi Informant Magazine Readers Choice Aw

调用DLL文件中的FORM 作者：e梦缘好久发表文章了！！！ 调用DLL文件中的FORM,具体实现过程如下：library Project1;uses SysUtils, Classes,Forms,windows,dialogs, Unit1 in Unit1.pas {Form1};{$R *.res}function showf

这是我在一个论坛的讨论稿，我想这些情况在实践程序设计过程中会常碰到，所以就将这些讨论资料写了下来：作者：e梦缘？请问用什么方法可以运行一个外部的EXE并返回它的Handle？WinExec 返回不是该EXE的HandleShellExecute, ShellExecuteEx 也不是CreateProcess 返回的是 Process Handle到底要如何才可以返回和 GetWind

 风花雪月 e梦情缘网络代号:wnhoo or sos_admin网名:e梦缘Mail:wnhoo@163.com功能：第一次執行的時候…會開啟project1.exe第二次執行的時候…不開啟project1.exe(因程式已執行)…但会将參數會丟給已執行的project1.exe第3次執行的時候…不開啟project1.exe(因程式已執行)…但会将參數會丟給已執行的project1.e

二、怎样处理多媒体数据　　1．多媒体数据的存储　　多媒体信息包括图像、声音和视频等，它们都是以二进制数据集合的形式存在的，在本系统中处理的对象是图像。SQL Server提供了Image数据类型来存储可变长度二进制数据（大小范围为0~2GB）。但Image字段并不能将多媒体数据直接装入，必须经过一些中间步骤才能将数据存进去。下面以图像数据的存储为例，给大家介绍怎样在Delphi中实现这些中间步骤。

http://blog.codelphi.com/nil/articles/1483.aspx看到最简单的用非Form的控件拖动Form 只要在onMouseDown事件里加入    ReleaseCapture;    ((Sender as TControl).Owner as TForm).Perform(WM_SYSCOMMAND, $F012, 0);

zt:SQL语句导入导出大全 /*******  导出到excelEXEC master..xp_cmdshell bcp SettleDB.dbo.shanghu out c:/temp1.xls -c -q -S"GNETDATA/GNETDATA" -U"sa" -P""/***********  导入ExcelSELECT * FROM OpenDataSource( M

几个Delphi小技巧1、判断Num Lock、Caps Lock、Scroll Lock指示灯状态  以Num Lock为例：  function IsNumLockOn() : boolean;  begin    Result := (GetKeyState(VK_NUMLOCK) and $01)   end;  如果灯亮则返回True，不亮返回False。  VK_NUMLOCK 替换成

一次有趣的探索document.title="一次有趣的探索 - "+document.title我们的程序有时候只允许运行一次，并且最好的情况是，如果程序第二次运行，就激活原来的程序。网上有很多的方法实现程序只运行一次，但对于激活原来的窗口却都不怎么好。   关键就在于激活原来的程序，一般的做法是在工程开始时，打开互斥量对象，如果打不开表示程序还没有运行，创建