델파이 비트 연산을 코볼로 변환

Question

이 코드를 어떻게 COBOL로 변환 할 수 있습니까?

Result := GetSysColor(Color and $000000FF) 

값 유형은 DWORD입니다. 비트 연산이라고 생각합니다. 내가 제대로 내 COBOL을 기억한다면

Answer 1

예, 그것은 비트 연산이다, 그러나이 특별히 작업은

COMPUTE Result = Color mod 256. 

또는

COMPUTE Result = MOD(Color, 256). 

에 해당합니다. 그것은 COBOL의 행을 worte 이후 십 년간 년되었습니다.