📄 mqualityclassmgr.cpp
字号:
//---------------------------------------------------------------------------
#pragma hdrstop
#include "mQualityClassMgr.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
//---------------------------------------------------------------------------
char* __stdcall ValidFieldValue(int ClassCode,int Param)
{
int result;
AnsiString retstr;
switch(ClassCode)
{
case 1090101: //质检内容
sdQcc=new TKSQcc();
result=sdQcc->ValidFieldValue(Param);
if(result!=0)
retstr=sdQcc->ErrorMessage;
delete sdQcc;
break;
case 1090102: //质检等级
sdQcl=new TKSQcl();
result=sdQcl->ValidFieldValue(Param);
if(result!=0)
retstr=sdQcl->ErrorMessage;
delete sdQcl;
break;
case 1090103: //缺陷等级
sdQdl=new TKSQdl();
result=sdQdl->ValidFieldValue(Param);
if(result!=0)
retstr=sdQdl->ErrorMessage;
delete sdQdl;
break;
case 1090104: //质检员
sdQcm=new TKSQcm();
result=sdQcm->ValidFieldValue(Param);
if(result!=0)
retstr=sdQcm->ErrorMessage;
delete sdQcm;
break;
case 1090105: //重检原因
sdRqr=new TKSRqr();
result=sdRqr->ValidFieldValue(Param);
if(result!=0)
retstr=sdRqr->ErrorMessage;
delete sdRqr;
break;
case 1090106: //技术要求
sdTrd=new TKSTrd();
result=sdTrd->ValidFieldValue(Param);
if(result!=0)
retstr=sdTrd->ErrorMessage;
delete sdTrd;
break;
case 1090107: //质检方法
sdQcWay=new TKSQcWay();
result=sdRqr->ValidFieldValue(Param);
if(result!=0)
retstr=sdQcWay->ErrorMessage;
delete sdQcWay;
break;
case 1090201: //质检单
sdQcsh=new TKSQcsh();
result=sdQcsh->ValidFieldValue(Param);
if(result!=0)
retstr=sdQcsh->ErrorMessage;
delete sdQcsh;
break;
default:
break;
}
return retstr.c_str();
}
//---------------------------------------------------------------------------
char* __stdcall CommandExecute(int ClassCode,int Param)
{
int result;
AnsiString retstr;
switch(ClassCode)
{
default:
break;
}
return retstr.c_str();
}
//---------------------------------------------------------------------------
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -