Delphi 中 的 图 形 显 示 技 巧

领测软件测试网

---- 3. 水 平 交 错 效 果 

---- 同 垂 直 交 错 效 果 实 现 方 法 一 样， 只 是 将 分 成 两 组 后 的 图 形 分 别 由 左 右 两 端 移 进 屏 幕。 

---- 程 序 略。 

---- 4. 雨 滴 效 果 

---- 将 缓 存 图 形 的 最 后 一 行 像 素， 依 次 搬 移 到 可 视 位 图 的 第 一 行， 让 此 行 像 素 在 屏 幕 上 留 下 它 的 轨 迹。 接 着 再 把 缓 存 图 形 的 倒 数 第 二 行 像 素， 依 次 搬 移 到 可 视 位 图 的 第 二 行， 其 余 的 依 此 类 推。 

---- 程 序： 

procedure TForm1.Button3Click(Sender: TObject); 
var
 newbmp:TBitmap;
 i,j,bmpheight,bmpwidth:integer;
begin
newbmp:= TBitmap.Create;
newbmp.Width:=image1.Width;

文章来源于领测软件测试网 https://www.ltesting.net/