引言: 使用Winamp是有个EasyMove的功能,也就是不在标题栏上拖动鼠标就能移动窗体,虽然EasyMove功能很好实现,可还不如做个控件一劳永逸,另外这个控件还有一个更有用的功能,呆会儿就能见到。
摘要: 如何设计美观的程序一直是程序员的一大难题,很多程序员可以写出很好的程序,但往往困于拙劣的外观。其中如何使美观的程序能在不同的环境下一样美观也同样困扰着我们,我在一些程序的制作中掌握了一些使程序在不同环境同样美观的方法,希望给大家一点启示。
不同环境一般有不同的色彩数和不同的分辨率等等,我只对这两种环境进行说明。
一. 不同的色彩数
对于不同的色彩数我们可以用启动时加以判断并选择相应的配色......
摘要:怎样判断当前剪贴板中的内容为文件,如何将指定文件(不是文件内容)拷贝到剪贴板中。请问各位大侠:怎样判断当前剪贴板中的内容为文件,如何将指定文件(不是文件内容)拷贝到剪贴板中。
int getclipboardformatname(
uint format, // clipboard format to retrieve
lptstr lpszformatname, // address of ......
制作可移动的窗体的MovePanel控件 使用winamp是有个easymove的功能,也就是不在标题栏上拖动鼠标就能移动窗体,虽然easymove功能很好实现,可还不如做个控件一劳永逸,另外这个控件还有一个更有用的功能,呆会儿就能见到.我们先看看如何实现它吧!
【程序编程相关:
移动Windows的开始按钮】 【推荐阅读:
如何在状态栏中加入图标,图片,还有动态的】
---- 建立一个空的unit,把以下代码copy进去,再把它添加到delphi的控件库里,这样movepanel控件就做好了. 【扩展信息:
Delhpi写MTS初步】
unit movepanel;
interface
uses
windows, classes, controls,extctrls;
type
tmovepanel = class(tpanel) //这个控件是继承tpanel类的
private
prepoint:tpoint;
down:boolean;
{ private declarations }
protected
{ protected declarations }
public
constructor create(aowner:tcomponent);
override;
//重载鼠标事件,抢先处理消息
procedure mousedown(button: tmousebutton;
shift: tshiftstate; x, y: integer);override;
procedure mouseup(button: tmousebutton;
shift: tshiftstate; x, y: integer);override;
procedure mousemove(shift: tshiftstate;
x, y: integer);override;
{ public declarations }
published
{ published declarations } ...
下一页 摘要: 我们知道从delphi 3 开始,它自带的控件中有基于internet开发的控件。如果我们充分利用这些控件开发internet程序则可以简化编程工作,提高效率。鉴于目前pop3客户端的软件的种类繁多,(如outlook express,foxmail 以及web 方式下的各免费邮局),而服务器端(除unix email系统)很少公开原代码,下面我就向大家着重介绍一下利用 delphi 4中in......