// ==================================================================================
// Dynamischen Feldstatus setzen (Default-Sprache ist EN)
// ==================================================================================
Function SetCellState(Column : WideString; Row : Integer; State : Integer; MessageId : String; IsAnError : Boolean; Params);
begin
if IsAnError = true then
begin
ccTable.SetState(Column,Row,State,
Format(ccScriptEngine.GetResource('Message_'+MessageId+'_'+ccApplication.Language,
ccScriptEngine.GetResource('Message_'+MessageId+'_EN','Message_'+MessageId+'_EN')),Params));
end else
begin
ccTable.SetState(Column,Row,ccFS_Okay,'');
end;
end;
Procedure EventOnCheck;
begin
if ccFields.GetValue('Amount') < 10 then
begin
SetCellState('PosAmount',0,ccFS_Error,'TestErrorMsg',true,[]);
end;
end;