关于网友提出的“ 谁帮忙这段C++Builder代码翻译成DELPHI啊?”问题疑问,本网通过在网上对“ 谁帮忙这段C++Builder代码翻译成DELPHI啊?”有关的相关答案进行了整理,供用户进行参考,详细问题解答如下:
问题: 谁帮忙这段C++Builder代码翻译成DELPHI啊?
描述: #include
#pragma hdrstop
#include "Unit1.h"
#define IT_BW 1
#define IT_GRAY8 4
#define IT_RGB 16
#define CAP_SCAN_IMAGE_TYPE 100
#define CAP_SCAN_IMAGE_TYPES_SUPPORTED 1
#define IT_ADF true
#define IT_FLADTED false
#define CAP_SCAN_MODE 107
#define CAP_SCAN_ADF_SUPPORTED 16
#define IT_Simplex False
#define IT_Duplex True
#define CAP_SCAN_Duplex 110
#define CAP_SCAN_Duplex_SUPPORTED 17
#define IT_Brightness true
#define IT_Contrast true
void __fastcall TForm1::SetImgType(int iImgType)
{
VARIANT vCap; V_VT(&vCap) = VT_I2;
VARIANT vScanImgType = ImgScan1->GetScanCapability(CAP_SCAN_IMAGE_TYPES_SUPPORTED);
if(V_VT(&vScanImgType) == VT_ERROR)
Application->MessageBox ("不支持图像类型","提示",MB_OK);
else
{
switch (iImgType)
{
case 0: if(V_I4(&vScanImgType) & IT_BW)
{
V_I2(&vCap)= IT_BW;
ImgScan1->SetScanCapability (CAP_SCAN_IMAGE_TYPE,vCap);
}
else
{
Application->MessageBox ("你的扫描仪不支持黑白图像","提示",MB_OK);
}
break;
case 1: if(V_I4(&vScanImgType) & IT_RGB)
{
V_I2(&vCap)= IT_RGB;
ImgScan1->SetScanCapability( CAP_SCAN_IMAGE_TYPE,vCap);
}
else
{
Application->MessageBox ("你的扫描仪不支持彩色图像","提示",MB_OK);
}
case 2: if(V_I4(&vScanImgType) & IT_GRAY8)
{
V_I2(&vCap)= IT_GRAY8;
ImgScan1->SetScanCapability (CAP_SCAN_IMAGE_TYPE,vCap);
}
else
{
Application->MessageBox ("你的扫描仪不支持灰度图像","提示",MB_OK);
}
break;
}
}
}
如题,谢谢!
以上介绍了“ 谁帮忙这段C++Builder代码翻译成DELPHI啊?”的问题解答,希望对有需要的网友有所帮助。
本文网址链接:http://www.codes51.com/itwd/2478668.html