Q&A

  • 함수질문..
begin
s1 := StrToIntDef(ParamStr(1),506);
s2 := StrToIntDef(ParamStr(2),746);
AssignFile(f1,'C:정보처리기사new 정보처리기사문제흡연문제abc.txt');
AssignFile(f2,'C:정보처리기사정보처리Dataans1.txt');
reset(f1);
rewrite(f2);

coding 이 이렇게 되고 abc.txtd의 값은 아래와 같습니다.
00001EM32S0503EE0120010705
00941BM17S1503EE0120010702
00532AF14S0201ET0320010701
00574FM46D1314ET0120010704
                  .
                  .
                  .
s1에 값은 506 s2의 값은 746이 되겠죠.근대 이게 잘이해가 안돼서.
정보처리기사 보신분이나 잘아시는분 설명좀.
paramstr이 주어진 파라미터 리턴이라는데 위의 내용으로 설명좀 부탁합니다.
1  COMMENTS
  • Profile
    미소나눔 2002.03.09 00:05
    c:test.exe  x1, x2

    StrToIntDef(ParamStr(1),506);  // 파라미터 받은 값(x1)을 정수로 변환한다.
                                               // 숫자 이외의 값이 들어오면 506
    StrToIntDef(ParamStr(2),746); // 파라미터 받은 값(x2)을 정수로 변환한다.
                                               // 숫자 이외의 값이 들어오면 746

    AssignFile(f1,'C:정보처리기사new 정보처리기사문제흡연문제abc.txt');
    // abc.txt를  파일변수 f1 에 연결

    AssignFile(f2,'C:정보처리기사정보처리Dataans1.txt');
    // ans1.txt를 파일변수 f2에 연결

    reset(f1); // 파일변수 f1을 열기
    rewrite(f2);  // 파일변수 f2에 쓰기