Q&A

  • char의 값 #12에서 숫자만 integer로 어떻게?
rest : char;

rest := #12;
showmessage(chartoint(rest));

위 처럼 할 수 없나요?
1  COMMENTS
  • Profile
    이중철 2005.09.08 20:37
    ORD 사용해보세요
    헬프에 있거든요 다음과 같이 ^^

    uses Dialogs;
    type

       Colors = (RED,BLUE,GREEN);

    var

      S: string;
    begin
       S := 'BLUE has an ordinal value of ' + IntToStr(Ord(BLUE)) + #13#10;
       S := S + 'The ASCII code for "c" is ' + IntToStr(Ord('c')) +  ' decimal';
       MessageDlg(S, mtInformation, [mbOk], 0, mbOK);
    end;