wuqinxiang的专栏

procedure TForm1.btn1Click(Sender: TObject); var   newbmp : TBitmap;   x,y,k : integer;   T : pByteArray; begin    newbmp := TBitmap.Create;    newbmp.LoadFromFile('test.bmp');    for k:=0 to

TImage、TPaintBox、TPicture、TBitmap、TCanvas、TGraphic 的关系与区别 作者：万一  来源：博客园  发布时间：2009-01-09 23:01  阅读：3209 次  原文链接   [收藏]   TGraphic 是 TBitmap 的父类, 很多绘图函数的参数是 TGraphic, 但我们经常给函数的是 TBitmap; TBit

Bmp:TBitMap;     begin         Bmp:=TBitMap.Create;     Bmp.Height:=Form1.Height-200   ;     Bmp.Width:=Form1.Width-150;         Bmp.Canvas.CopyRect(Form1.Canvas.ClipRect,Form1.Canvas,Im

在form，panel上添加TPaintBox然后在create中写上：form.doublebuffered := true;或者panel.doublebuffered := true;即可实现

unit Unit1; interface uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,   Dialogs; type   TForm1 = class(TForm)     procedure FormPaint(Sender: TObject);