关于TBITMAP类的使用求助

一路随云 2012-11-24 11:15:08

大家好，我有一个问题是关于图像类的。
用TBITMAP建立一个位图对象

  BmpMap:=TBitmap.Create;

  BmpMap.PixelFormat:=pf4bit;

  BmpMap.Width:=50;

  BmpMap.Height:=50;

这样的话
用白色填充全部，
然后我要将某某像素点填充为某个颜色，比如将 45,30填充为黑色。
然后输出到图片框Image
应该怎么操作呢？

...全文

117 5 打赏收藏转发到动态举报

写回复

用AI写文章

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

hsfzxjy 2012-11-25

打赏
举报

第一个问题BmpMap.Canvas.pixels[45,30]:=颜色

hsfzxjy 2012-11-25

打赏
举报

楼上正解。。

wywry 2012-11-25

打赏
举报


    BmpMap := TBitmap.Create;
    BmpMap.PixelFormat := pf4bit;
    BmpMap.Width := 50;
    BmpMap.Height := 50;
    BmpMap.Canvas.Pixels[ 45, 30] := clBlack;
    Image1.Picture.Bitmap.Assign( BmpMap );

wywry 2012-11-25

打赏
举报

bitmap.Canvas.Brush.Color := clWhite; bitmap.Canvas.FillRect(Rect(0,0,bitmap.Width,bitmap.Height));

一路随云 2012-11-25

打赏
举报

引用 2 楼 wywry 的回复:

Delphi/Pascal code? 1234567 BmpMap := TBitmap.Create; BmpMap.PixelFormat := pf4bit; BmpMap.Width := 50; BmpMap.Height := 50; BmpMap.Canvas.Pixels[ 45, 30] := clBlack; ……

请教大侠用白色填充全部呢？

Delphi中利用Tbitmap实现窗体图形动态打印.pdf

Delphi中利用Tbitmap实现窗体图形动态打印

计算机软件-编程源码-Delphi中利用Tbitmap实现窗体图形动态打印.zip

在c++buidler 10.2 中使用TBitmap显示OpenCV中的IplImage图片，用做视觉识别

本文介绍了图形的绘制和图像处理，其中详细介绍了画布（Canvas）属性与使用方法，利用它们，可以非常直观方便地绘制直线等。还介绍了Image TBitmap类和TJPEGImage类的使用，以及ScanLine技术。