| iamdream
24920
|
2006/7/14 15:47:06 |
| mbahamut的方法的确简单，不过如果出现滚动条，则点滚动条时效果就不好了。 |
| mbahamut
24649
|
2006/6/29 12:54:39 |
不用这么复杂...这五行足够解决问题:
procedure TForm1.FormCreate(Sender: TObject);
begin
Brush.Bitmap := TBitmap.Create;
Brush.Bitmap.LoadFromFile(ExtractFilePath(ParamStr(0)) + 'Back.bmp');
Brush.Bitmap.FreeImage;
end;
procedure TForm1.FormDestroy(Sender: TObject);
begin
Brush.Bitmap.Free;
Brush.Bitmap := nil;
end; |
| goodpb
24642
|
2006/6/29 8:45:27 |
| 好象可以直接放TIMAGE组件的吧 |
| kinneng
24639
|
2006/6/28 23:47:41 |
| bitblt 是Windows系统一个绘图函数，即系统API |
| chl_csdn
24636
|
2006/6/28 23:14:12 |
"当然里面只是使用了 Form 的 Canvas 来绘图，如果使用 BitBlt 可能更快，但是在这里应该察觉不出来，大家可以尝试使用 BitBlt 和 StretchBlt 来改写。"
什么是bitblt啊？delphi6中我找不到的，可以详细解释一下吗？ |
