Q&A

  • 바이너리 파일 끝에 입력된 랜덤문자를 읽으려면...
FileInfo := Copy('파일명', FileStream.Position-20, FileStream.Size);
바이너리 파일의 끝부분에 랜덤으로 입력된 문자를
읽어오려고 하는데 Copy명령으로는 읽지 못하는듯 싶네요...
어떻게해야 할지...고수님의 조언 부탁드립니다요
1  COMMENTS
  • Profile
    최용일 2004.06.02 19:26
    안녕하세요. 최용일입니다.

    Copy함수는 문자열을 다루는 함수입니다. 파일입출력이 아니라...

    procedure TForm2.Button4Click(Sender: TObject);
    var
        F: file of Byte;
        StrBuf: array[0..19] of Char;
    begin
        AssignFile(F, 'c:\test.txt');
        Reset(F);
        Seek(F, FileSize(F) - 20);
        BlockRead(F, StrBuf, 20);
        CloseFile(F);
        ShowMessage(StrBuf);
    end;

    ^^ 항상 즐코하세요...