procedure TForm1.Button1Click(Sender: TObject);
var
FileStream : TFileStream;
TempChar : array [0..1000] of widechar;
begin
FileStream:= TFileStream.Create('c:\accessoryinfo.dat', fmOpenRead);
try
FileStream.ReadBuffer(TempChar, sizeof(TempChar));
finally
FileStream.Free;
end;
memo1.Text := TempChar;
end;


2바이트당 계산하기 위해서 배열선언 부분에 widechar부분을 선언햇는데요

일단 컴파일 하면 출력이되지만 유니코드로 출력이 됩니다..당연히 widechar선언햇으니..

재가 하고싶은것은 "자체 폰트 테이블파일을 읽어 들여서" 그걸 토대로 텍스트에 문자열을 출력해주고 싶은데요. 이걸 어떻게 해야할지 모르겟습니다.

그러니깐 언어 폰트 테이블.txt를 내용 // 한 라인씩 읽어주고..
8293=ｓ
8294=ｔ
8295=ｕ
8296=ｖ
8297=ｗ
8298=ｘ
8299=ｙ
829A=ｚ
829F=ぁ
82A0=あ
82A1=ぃ
82A2=い
82A3=ぅ
82A4=う
82A5=ぇ
이 데이터를 토대로 원하는 바이너리 파일의 문자들을 뽑아주고 memo에 뽑아 주고 싶습니다.
아무도 답변안해주길래 여기까지 오게 됫습니다. 도와주세요...