街头巷尾_博客

文章列表

2009-02-18 19:27

透明的控件, 一般继承自TGraphicControl的(就是那些没有handle属性, 不能有focus的控件, 如image)
都有Transparent属性. 对TWinControl类的控件, 要实现透明只要完成以下
四步基本上就成了.

1.在Create中设定ControlStyle :=ControlStyle - [csOpaque];

2. override 它的CreateParams方法, exstyle 里加上WS_EX_TRANSPARENT.

阅读全文>>

类别：delphi相关 | 评论(0) | 浏览()

Delphi从内存流中判断图片格式

2008-12-31 16:49

利用内存流来判断文件的格式，其实判断文件的前几个字节就可以简单的判断这个文件是什么类型的文件，例如

jpg文件是 FFD8 (从低位到高位就要反过来 D8FF 下面都是一样)

BMP文件是 424D ---4D42

其他的我就不一一列举了，想知道跟多文件类型分别是用什么字符作为文件的开头的话，下载个C32asm或者UE等这类16进制编辑器就可以看到了。

procedure TForm1.Button1Click(Sender:

阅读全文>>

类别：delphi相关 | 评论(0) | 浏览()

OleContainer控件介绍

2008-12-26 12:06

OLEContainer 控件的主要属性

1) AllowInPlace property AllowInPlace:Boolean;
这个属性用于决定启动OLE对象服务程序的方式,如果为假,那么运行其间激活OLE对象时,打开整个OLE服务程序,即单独

开一个窗口,而为真时, 则把服务的菜单合并到应用程序中.

2) AutoActive type TAutoActivate=(aaManual,aaGetFocus,aaDoubleClick);
property AutoActiv

阅读全文>>

类别：delphi相关 | 评论(0) | 浏览()

DelphiX简介摘录

2008-12-19 19:31

下载地址：http://www.delphigamedev.com/downloads/DelphiX_D6-7.zip

参考地址：Delphix For Delphi 3, 4, 5
http://www.yks.ne.jp/~hori/data/DelphiX2000_0717-2.zip
http://www.tommstudio.com/zips/delphix.zip

Delphix For Delphi 6 的下载地址!
http://seth5.free.fr/

阅读全文>>

类别：delphi相关 | 评论(0) | 浏览()

C++经典电子书下载地址集锦

2008-12-02 20:59

钱能 c++程序设计教程第二版高清PDF版
http://bbs.topsage.com/dispbbs.asp?boardID=121&ID=166018
Essential C++ 中文版+英文版侯捷译
http://bbs.topsage.com/dispbbs.asp?boardID=121&ID=167578
编程点金之Visual C++(电子教程) iso

阅读全文>>

类别：c++相关 | 评论(0) | 浏览()

判断两个矩形是否相交

2008-09-22 14:23

假定矩形是用一对点表达的(minx,miny)(maxx, maxy)
那么两个矩形rect1{(minx1,miny1)(maxx1, maxy1)}, rect2{(minx2,miny2)(maxx2, maxy2)}

相交的结果一定是个矩形，构成这个相交矩形rect{(minx,miny)(maxx, maxy)}的点对坐标是：
minx = max(minx1, minx2)
miny = max(miny1, miny2)
maxx = min(maxx1, maxx2)
maxy = min(maxy1, maxy2)

如果两个矩形不相交，那么计算得到的点对坐标必然满足
minx

阅读全文>>

类别：delphi相关 | 评论(0) | 浏览()

使长的文本在矩形区内自动换行

2008-09-02 15:44

Delphi(Pascal) code

Code highlighting produced by Actipro CodeHighlighter (freeware)

http://www.CodeHighlighter.com/

var
S: string;
r: TRect;
begin
r.Left := 0;
r.Top := 0;
r.Right := 100;
r.Bottom := 100;

Canvas.Rectangle(r); //画矩形

Inc(r.Left,

阅读全文>>

类别：delphi相关 | 评论(0) | 浏览()

上网其实只为等你

2008-08-14 13:36

自从与你相识上网，只为等你。尽管有时等得都累了

阅读全文>>

类别：杂七杂八 | 评论(0) | 浏览()

俯卧撑：八种练法锻炼全身肌肉

2008-07-04 12:25