在Embarcadero C ++ Builder中反转位图

如何解决在Embarcadero C ++ Builder中反转位图

在Borland C ++ Builder 6和Embarcadero C ++ Builder 2010中也会发生相同的问题。

当我尝试反转图像时,表单冻结约5秒钟,并且没有任何反应。当我再次单击时,图像在眨眼间就反转了,一次又一次...

要进行复制,请使用以下代码创建一个包含TImage和两个TButton的表单:

//---------------------------------------------------------------------------
#include <vcl.h>
#include <jpeg.hpp>
#pragma hdrstop
#pragma package(smart_init)
#pragma resource "*.dfm"
#include "Unit1.h"
TForm1 *Form1;
Graphics::TBitmap *CurrentBitmap;
bool bLoaded = false;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) {
    CurrentBitmap = new Graphics::TBitmap;
}
//---------------------------------------------------------------------------
bool __fastcall Invert( TImage *img ) {
    if( bLoaded ) {
        double Scale,ScaleW,ScaleH;
        Graphics::TBitmap *bmp = new Graphics::TBitmap;
        bmp->Assign( CurrentBitmap );
        DWORD **pixel = new DWORD*[bmp->Height];
        for( long y=0; y<bmp->Height; y++ ) {
            pixel[y] = (DWORD*)(bmp->ScanLine[y]);
            for( long x=0; x<bmp->Width; x++ ) {
                if( pixel[y][x] == clBlack ) {
                    pixel[y][x] = clWhite;
                } else if( pixel[y][x] == clWhite ) {
                    pixel[y][x] = clBlack;
                }
            }

        }
        delete[] pixel;
        ScaleW = (double)bmp->Width / img->ClientWidth;
        ScaleH = (double)bmp->Height / img->ClientHeight;
        if( ScaleW > ScaleH ) {
            Scale = ScaleW;
        } else {
            Scale = ScaleH;
        }
        CurrentBitmap->Assign( bmp );
        img->Picture->Bitmap->Canvas->StretchDraw(Rect(0,bmp->Width/Scale,bmp->Height/Scale),bmp );
        delete bmp;
        return true;
    } else {
        return false;
    }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender) {
    TJPEGImage *jpg = new TJPEGImage();
    jpg->LoadFromFile( "V:\\CBuilder\\BCB10\\GerberTest\\Testdata\\GerberTest.dpi2400.mskcmp.jpg" );
    CurrentBitmap->Width = jpg->Width;
    CurrentBitmap->Height = jpg->Height;
    CurrentBitmap->Canvas->StretchDraw(Rect(0,jpg->Width,jpg->Height),jpg );
    bLoaded = true;
    double Scale,ScaleH;
    ScaleW = (double)jpg->Width / Image1->ClientWidth;
    ScaleH = (double)jpg->Height / Image1->ClientHeight;
    if( ScaleW > ScaleH ) {
        Scale = ScaleW;
    } else {
        Scale = ScaleH;
    }
    Image1->Canvas->StretchDraw(Rect(0,jpg->Width/Scale,jpg->Height/Scale),jpg );
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender) {
    Invert( Image1 );
}

我无法解释为什么应用程序冻结,或者在5秒的延迟期间代码在做什么。

解决方法

就像Remy Lebeau提到的那样,您应该设置PixelFormat。我尝试了您的解决方案,该解决方案似乎无法正确反转图像。在下面,您可以找到一种可以正常使用的解决方案。

#include <JPEG.hpp>

Byte __fastcall IntToByte(int AValue)
{
    if (AValue > 255)
        return 255;
    else if (AValue < 0)
        return 0;
    else
        return AValue;
}
// ---------------------------------------------------------------------------

void __fastcall InvertBitmap(Graphics::TBitmap *ABitmap)
{
    Byte *p0;
    int red,green,blue;
    for (int y = 0; y < ABitmap->Height; y++) {
        p0 = (Byte*) ABitmap->ScanLine[y];
        for (int x = 0; x < ABitmap->Width; x++) {
            red = p0[x * 3];
            green = p0[x * 3 + 1];
            blue = p0[x * 3 + 2];

            // invert
            red = 255 - red;
            green = 255 - green;
            blue = 255 - blue;

            p0[x * 3] = IntToByte(red);
            p0[x * 3 + 1] = IntToByte(green);
            p0[x * 3 + 2] = IntToByte(blue);
        }
    }
}
// ---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    Screen->Cursor = crHourGlass;
    TJPEGImage *jpeg = new TJPEGImage();
    Graphics::TBitmap *bitmap = new Graphics::TBitmap();
    try {
        jpeg->LoadFromFile("**YOUR-JPEG-FILE**");
        bitmap->SetSize(jpeg->Width,jpeg->Height);
        bitmap->Canvas->Draw(0,jpeg);    
        bitmap->PixelFormat = pf24bit;
        InvertBitmap(bitmap);
        Image1->Picture->Bitmap->Assign(bitmap);
    }
    __finally {
        jpeg->Free();
        bitmap->Free();
    }
    Screen->Cursor = crDefault;
}
// ---------------------------------------------------------------------------

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。

相关推荐


依赖报错 idea导入项目后依赖报错,解决方案:https://blog.csdn.net/weixin_42420249/article/details/81191861 依赖版本报错:更换其他版本 无法下载依赖可参考:https://blog.csdn.net/weixin_42628809/a
错误1:代码生成器依赖和mybatis依赖冲突 启动项目时报错如下 2021-12-03 13:33:33.927 ERROR 7228 [ main] o.s.b.d.LoggingFailureAnalysisReporter : *************************** APPL
错误1:gradle项目控制台输出为乱码 # 解决方案:https://blog.csdn.net/weixin_43501566/article/details/112482302 # 在gradle-wrapper.properties 添加以下内容 org.gradle.jvmargs=-Df
错误还原:在查询的过程中,传入的workType为0时,该条件不起作用 &lt;select id=&quot;xxx&quot;&gt; SELECT di.id, di.name, di.work_type, di.updated... &lt;where&gt; &lt;if test=&qu
报错如下,gcc版本太低 ^ server.c:5346:31: 错误:‘struct redisServer’没有名为‘server_cpulist’的成员 redisSetCpuAffinity(server.server_cpulist); ^ server.c: 在函数‘hasActiveC
解决方案1 1、改项目中.idea/workspace.xml配置文件,增加dynamic.classpath参数 2、搜索PropertiesComponent,添加如下 &lt;property name=&quot;dynamic.classpath&quot; value=&quot;tru
删除根组件app.vue中的默认代码后报错:Module Error (from ./node_modules/eslint-loader/index.js): 解决方案:关闭ESlint代码检测,在项目根目录创建vue.config.js,在文件中添加 module.exports = { lin
查看spark默认的python版本 [root@master day27]# pyspark /home/software/spark-2.3.4-bin-hadoop2.7/conf/spark-env.sh: line 2: /usr/local/hadoop/bin/hadoop: No s
使用本地python环境可以成功执行 import pandas as pd import matplotlib.pyplot as plt # 设置字体 plt.rcParams[&#39;font.sans-serif&#39;] = [&#39;SimHei&#39;] # 能正确显示负号 p
错误1:Request method ‘DELETE‘ not supported 错误还原:controller层有一个接口,访问该接口时报错:Request method ‘DELETE‘ not supported 错误原因:没有接收到前端传入的参数,修改为如下 参考 错误2:cannot r
错误1:启动docker镜像时报错:Error response from daemon: driver failed programming external connectivity on endpoint quirky_allen 解决方法:重启docker -&gt; systemctl r
错误1:private field ‘xxx‘ is never assigned 按Altʾnter快捷键,选择第2项 参考:https://blog.csdn.net/shi_hong_fei_hei/article/details/88814070 错误2:启动时报错,不能找到主启动类 #
报错如下,通过源不能下载,最后警告pip需升级版本 Requirement already satisfied: pip in c:\users\ychen\appdata\local\programs\python\python310\lib\site-packages (22.0.4) Coll
错误1:maven打包报错 错误还原:使用maven打包项目时报错如下 [ERROR] Failed to execute goal org.apache.maven.plugins:maven-resources-plugin:3.2.0:resources (default-resources)
错误1:服务调用时报错 服务消费者模块assess通过openFeign调用服务提供者模块hires 如下为服务提供者模块hires的控制层接口 @RestController @RequestMapping(&quot;/hires&quot;) public class FeignControl
错误1:运行项目后报如下错误 解决方案 报错2:Failed to execute goal org.apache.maven.plugins:maven-compiler-plugin:3.8.1:compile (default-compile) on project sb 解决方案:在pom.
参考 错误原因 过滤器或拦截器在生效时,redisTemplate还没有注入 解决方案:在注入容器时就生效 @Component //项目运行时就注入Spring容器 public class RedisBean { @Resource private RedisTemplate&lt;String
使用vite构建项目报错 C:\Users\ychen\work&gt;npm init @vitejs/app @vitejs/create-app is deprecated, use npm init vite instead C:\Users\ychen\AppData\Local\npm-