예전에는 아래처럼 그냥 in 구문을 사용해서 했음.
if c in ['a'..'z', 'A'..'Z', '0'..'9'] then 어쩌구 저쩌구...
Delphi 2009 부터는 기본적으로 String이 WideString, Char는 WideChar로 변해서 저렇게 하면 warning이 뜸.
아래처럼 바꿔줘야 함.
CharInSet 함수 사용.
지저분하게 타입캐스팅 하지 말고...
if CharInSet(c, ['a'..'z', 'A'..'Z', '0'..'9']) then 어쩌구 저쩌구...
아래는 함수 원형
function CharInSet(C: AnsiChar; const CharSet: TSysCharSet): Boolean; overload;
function CharInSet(C: WideChar; const CharSet: TSysCharSet): Boolean; overload;
'Delphi' 카테고리의 다른 글
[Delphi] DLL Injection (CreateRemoteThread) (2) | 2010.05.31 |
---|---|
[Delphi] TStringList의 CustomSort (0) | 2010.05.24 |
[Delphi] Memory leak - TThemeServices (0) | 2010.05.18 |
[Delphi] UTF-8 인코딩 파일 읽기 (0) | 2010.05.18 |
[Delphi] 콘솔 어플리케이션(Console Application) 프로젝트에서 아이콘 적용하기. (0) | 2010.05.18 |