Notice
Recent Posts
Recent Comments
Link
일 | 월 | 화 | 수 | 목 | 금 | 토 |
---|---|---|---|---|---|---|
1 | 2 | 3 | 4 | 5 | 6 | |
7 | 8 | 9 | 10 | 11 | 12 | 13 |
14 | 15 | 16 | 17 | 18 | 19 | 20 |
21 | 22 | 23 | 24 | 25 | 26 | 27 |
28 | 29 | 30 |
Tags
- 셋업
- c#
- 기초
- 예제
- vb
- SDK
- WIN32 SDK
- 인스톨
- Visual Studio 2005
- 설치
- xml
- MySQL
- 파라미터
- SQL
- 시리얼 통신
- MFC
- VB.NET
- 데이터베이스
- winsock
- 문자열
- Delphi
- Visual Basic
- PostgreSQL
- 입문
- dll
- 소니
- Firebird
- 파이어버드
- 델파이
- 초보
Archives
- Today
- Total
목록2진수 (1)
프로그래밍 노트
델파이에서 16진수 문자열을 2진수 문자열로 바꾸기
델파이에서 16진수 문자열을 2진수 문자열로 바꾸기 function HexToBin(sHex: string): string; var iHex, iDigit : integer; begin iDigit := Length(sHex) * 4; iHex := StrToInt('$' + sHex); result := StringOfChar('0', iDigit); while iHex > 0 do begin if (iHex and 1) = 1 then result[iDigit] := '1'; dec(iDigit) ; iHex := iHex shr 1; end; end;
델파이
2010. 4. 14. 14:45