- 博客(19)
- 资源 (12)
- 收藏
- 关注
RSS订阅转载 Delphi与进程、窗口句柄、文件属性、程序运行状态
uses TLHelp32,PsAPI;Delphi显示进程列表procedure TForm1.Button2Click(Sender: TObject);var lppe: TProcessEntry32; found : boolean; Hand : THandle; P:DWORD; s:string;beginListBox1.Items.C
2011-10-26 20:54:47
3577
转载 richeditctrl 使用方法 （转）
一.常见问题a.可以编译,不能执行的AfxInitRichEdit();b.升级默认的Riched版本(默认的有一些bug)，如可在InitInstance中添加LoadLibrary("RICHED20.DLL") 最后注意 FreeLibrary如果是CRichEditView基类的可用BOOL CXXXXXXView::PreCreateWindow(CREA
2011-10-19 19:21:26
785
转载 如何在其它程序窗口(已知窗口的句柄)加上一个按钮
使用CreateWindow来建立按钮,也可以建立其它消息。可以使用SetWindowLong函数通过子类技术截获控件消息。下面是一个简单的例子: var Form1: TForm1; h:HWND; proc : longin
2011-10-18 21:59:06
1571
转载 Delph32位色图标
实际上,delphi是支持任意颜色的图标的.你自己可以试验一下:写个程序,读入Image1.Picture.Icon.LoadFromFile();读入一个大于16色的图标,显示颜色是正常的.然后保存Image1.Picture.Icon.SaveToFile();到文件
2011-10-18 13:43:21
427
转载 delphi 缓冲画图（内存画图）解决画图闪烁问题
介绍用双缓冲进行绘图可解决在VC中绘图时的闪烁现象 正文用vc做程序，如何画图是一个大家都很关心，但是却感到很难以理解的问题，因为在mfc的封装之下，没有现成的画图函数供你直接调用，像vb等等里面直接来个point之类的，常常让人感到无从下手。这两天帮人解决了一个用内
2011-10-12 12:40:15
1594
转载 用Delphi开发视频聊天软件
摘要：目前网上视频聊天软件、视频会议软件、可视IP电话软件随处可见，你是否想自己做一个玩玩？其实这类软件无非是视频加上网络而建成的。如果熟悉视频捕捉和网络传输技术，根本就难不倒你。微软为软件开发人员提供了一个专门用于视频捕捉的VFW SDK（Video for Windows S
2011-10-12 12:33:34
699
转载 用Delphi实现24位真彩色图标
24位真彩色图形转化为ICO文件在Delphi中我们可以采用如下方法将其他格式的图像我们要先把它转换为位图： procedure TFormMain.Pic2BMP(Picture:TPicture);var Bmp:TBitmap;begin
2011-10-12 12:25:48
640
转载 在Delphi中编制软件版权保护控件
一、概述 软件作为一种人类智力劳动成果的一种表现形式，融会了设计者和开发者辛勤的劳动和汗水，然而，由于用户观念上的差异和盗版软件的泛滥，软件开发者的权益往往得不到有效的保护，因此，作为必要的手段-----软件的自身保护也就在特定的环境下被重视起来。然而，正所谓，“魔高
2011-10-12 11:30:34
748
转载 在Delphi中开发使用多显示器的应用程序
多显示器同样可以通过顶点坐标（Top，Left）和宽高来描述它的尺寸。顶点坐标是相对于桌面坐标系原点的，也就是相对于主显示器的顶点。工作区的概念比较简单，它是指显示器中除了任务条和其他停靠在桌面上的窗体之外的矩形区域。Windows为多显示器应用程序的开发提供了一组A
2011-10-12 11:21:46
1735
转载 如何在delphi中克隆窗体
//在delphi中克隆窗体procedure FormClone(form : TForm) ;var ms : TMemoryStream; clone : TForm;begin ms := TMemoryStream.Create;
2011-10-12 11:12:38
1566
转载 Delphi2009的Indy全接触之TCP篇
我在Delphi盒子[ http://www.2ccc.com/ ]上找到了一个基于TCP协议的聊天及文件传书工具，于是把他改写成D2009版本的代码。 源代码下载地址： http://www.2ccc.com/article.asp?articleid=3894 步
2011-10-11 08:40:44
806
转载 挺得住算你厉害,都笑死！！！！
一男子入厕，刚把门关上，就听隔壁问：你来了？他说：是啊．可心里想，这隔壁是谁啊？我认识他吗？奇怪！这时隔壁又问：你来干吗啊？他很生气的说：拉屎啊！来这能干吗？！隔壁又问，那你什么时候走啊？他想：这人估计是有神经病！他懊恼的说：拉完就走！！这时隔
2011-09-27 11:13:11
299
转载 通过注册表完成文件名后缀与运用程序相关联
通过对注册表进行修改,可以实现一种文件名后缀与某个应用程序相关联 程序例如下:procedure registerfiletype(ft,key,desc,icon,prg:string);//ft:文件名后缀,如可以为'.tst'或'afile.tst'//ke
2011-09-19 19:09:49
1945
原创 让主菜单能下拉出颜色选单
为让主菜单能下拉出颜色选单，这需要设置MainMenu的OwnerDraw为True，然后逐个画出来。为了方便，可以先整个ColorMenu组件，然后直接拉过来用就可以了： ColorMenu组件（代码由本人网上收集修改，建议收藏）：===============
2011-09-19 08:36:38
520
转载 delphi下如何控制音量
一、调节全部音量 1．先在窗体中添加一个trackbar控件，可通过改变它的位置来调节音量，在trackbar1的属性中，我们把Max属性修改成255，改成这个值是为了便于进行二进制的音量调节操作。 2．为了调用一个Windows函数，在uses子句里加上Mm
2011-09-15 17:06:32
2103
转载 delphi中关于字符串的操作
原文地址：[转贴]" href="http://blog.sina.com.cn/s/blog_4e0420c50100093e.html" target="_blank">delphi中关于字符串的操作 [转贴]作者：阳光灿烂常用的字符串处理函数(一定要注意引用 str
2011-09-15 17:03:54
9068
转载 DELPHI格式化输出函数
FORMAT() var s: string; begin //指令类型 type s := Format('最大整数是: %d; 最小整数是: %d',[MaxInt,Low(Integer)]); //返回: 最大整数是: 21474836
2011-09-15 16:59:06
930
转载 delphi listview自绘图形
delphi listview自绘图形自绘ListView ,delphi源码自画TlistView带进度条的Item TListView的Item条一般是由系统自画的，但电驴就实现了自画，使之看起来很漂亮，我们用DELPHI也可以实现！
2011-09-14 13:47:54
1723
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人