易截截图软件、单文件、免安装、纯绿色、仅160KB

delphi canvas使用

在DELPHI为编程者提供了一个灵活的绘图场所,即本文所述的   
CANVAS类,在DELPHI中的很多控件都具有此属性,使编程者可以   
在这些的控件的表面随心所欲的绘图,这对完善用户界面或者制   
作一些屏幕特技都有着非凡的作用,下面举例说明几种特殊屏幕   
效果的形成过程。   
  
一、CANVAS必备基本知识:   
  
1.具有CANVAS属性的控件:   
TBitmap,TComboBox,TDBComboBox,TDBGrid,TDBListBox,TDirectoryListBox, 
TDrawGrid,TFileListBox,TForm,THeaderControl,TImage,TListBox,TOutline, 
TPaintBox,TPrinter,TStatusBar,TStringGrid等,   
  
2.CANVAS属性及命令:篇幅所限,省略参数及格式说明,具体请参考文后程序及DELPHI帮助文件:   
  
canvas.rectangle():画矩形pen.color:定义画笔颜色   
roundrect():画圆角矩形pen.width:定义画笔宽度   
arc():画弧线(不填充) brush.color:定义填充颜色   
chord():画弧线(填充) textout():在固定位置输出字符串   
pie:画扇形 textwidth:取字符串高度   
polygon():画多边形填充textheight:取字符串宽度   
polyline():多点连线(不填充)font.color:指定字体颜色   
Pixels():指定固定象素点颜色值font.size:指定字体大小   
moveto():指明画线起点 Ellipse():画圆或椭圆   
lineto():指明画线终点   
  
  
3.使用CANVAS注意事项:当窗口进行重画时,画布上的图像将消   
失,比如当窗口进行最小化又重新恢复时,就会引起画布上图像   
的消失,另外当刚刚运行程序时,窗口也是属于重新绘制,所以   
如果在绘制窗口之前在画布上绘图,弹出窗口后将不能显示出图   
像,比如在TForm1.FormCreate()事件中进行画布绘图操作将是   
徒劳的,但可以在此事件中进行画布操作的准备工作,比如设置   
画笔的颜色和宽度等。   
  
二、CANC


相关文档:

Delphi图像处理中ScanLine的使用

一般我们在Delphi中进行图像处理时采用Pixels像素点赋值的方法,Delphi代码如下:
var
x,y:Integer;
cColor:TColor;
begin
  for y:=0 to Image1.Height-1 do
    for x:=0 to Image1.Width-1 do
      cColor:=Image1.Canvas.Pixels[i,j];
end;
但是这种方法有个缺 ......

Delphi写的验证身份证号有效性函数


function ValidatePID(const APID: string): string;
{内部函数,取身份证号校验位,最后一位,对18位有效}
function GetVerifyBit(sIdentityNum: string): Char;
var
    nNum: Integer;
begin
    Result := #0;
    nNum := StrToInt(sIdentityNum[1]) * 7 +
  ......

Delphi 隐藏窗口表单

   
  我一开始以为,将表单设置为隐藏,可以在表单创建事件中即FormCreate(Sender:TObject)去设置
  因此, 我在这个procedure TForm.FormCreate(Sender:TObject)中,
   想用一下两种方式实现
   即:
   调用      from.Hi ......

Delphi Open Tools API 浅探

savetime2k@yahoo.com  2004.1.28
http://savetime.delphibbs.com
今天开始学习元件编辑器,感觉比属性编辑器简单许多,但还是遇到了一些疑问。如果你能解答文中记录的问题,请告诉我答案,谢谢!
目 录
===============================================================================
⊙ TBaseComponentEdit ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号