c로된 소스를 델파이로 바꾸고 싶습니다.

부탁드립니다

-------------------------------------

#include "omrapi.h"

void main(void)

{

int ret, err, i, c ;

char err_msg[300] ;



ret = OmrOpen(0, 0, 0, 1, 1) ; // COM1, 9600, N, 8, 2

if (ret < 0) {

printf("통신포트(COM1)를 열 수 없습니다") ;

return ;

}

while (1) {

ret = OmrRead(11, 0, err_msg) ; // SHEET 읽기 (앞면=11칼럼, 뒷면=없음)

if (ret < 0) { // 읽기 오류발생

printf("오류내용 : %s", err_msg) ;

break ;

}

err = 0 ;

printf("n수험번호 : ") ;

for (i=1; i<=6; i++) { // 6자리 반복

c = OmrPosLin(1, i, 10, 10, -1) ; // 앞면, 칼럼=1, 라인=10, 마크갯수=10, 이동라인=-1

printf("%c", (c==-2) ? '*' : (c==-1) ? 'B' : c+'0') ; // 중복표기='*' , 공백='B'

if (c < 0) err = 1 ; // 하나라도 공백, 중복표기시 에러스태커로 보냄

}

for (i=1; i<=12; i++) { // 12문항 반복

c = OmrSumCol(1, 7, 13-i, 5, 1) ; // 앞면, 칼럼=7, 라인=12, 마크갯수=5, 이동칼럼=1

printf("n객관식 %d번 = %d", i, c) ;

}

if (err) OmrReject(2) ; // SHEET를 에러스태커로 보냄

else OmrReject(1) ; // SHEET를 정상스태커로 보냄

}

OmrClose() ;

}

-------------------------------------