델파초짜.. wrote:

> Byte 값을 String 값으로 변화 하고 싶은데요 어떻게 해야 하나요..

>

>

> 그리고 덤으로 Byte 를 bit 로 나타내려면. 이건또 어떻게 해야 하나요..

>

>저도 초짜인데요, Micom Programmer이라서 Binary/Hex에 대해서는 조금 알거든요...

Val(Edit1.Text, b, code); // Edit1(2자리 숫자) 의 값을 Integer로 변환

Edit2.Text := IntToHex(b, 2); // Hexa 로 변환하여 Edit2 에 Display

for i:=1 to 8 do begin // b, c, m, i, code: Integer;

c := b div 2;

m := b mod 2;

b := c;

cs[i] := IntToStr(m); // cs: array [1..8] of String;

end;

Edit3.Text := cs[8]+cs[7]+cd[6]+cs[5]+cs[4]+cs[3]+cs[2]+cs[1];

// Byte 값을 8자리의 2진수로 변환하여 Edit3 에 Display

// test 해 보았는데 잘되네요.

// 그럼...