Q&A

  • String을 BlockWrite로쓰기...
그냥..String을 블록라이트로 쓴 다음에 BlockRead로 읽으면..포인터만 가져오더군요..



var

Buffer : String;

FH2 : FILE;

begin

Buffer := 'abcdefg';

AssignFile(FH2, 'C:WorksLogAnalyzerLogTemp.dat');

Rewrite(FH2);

BlockWrite(FH2,Buffer, 10);

CloseFile(FH2);



Buffer := '';



AssignFile(FH2, 'C:WorksLogAnalyzerLogTemp.dat');

Reset(FH2);

BlockRead(FH2,Buffer, 10);

CloseFile(FH2);

end;



바로이거지요. -_- buffer에 'abcdefg'가 있어야 하는데.. ''가 있군요..

그말은..포인터를 저장했다가 포인터를 읽었단말갔은데 -_-;;;

고수님들의 가르침 부탁드립니다....

1  COMMENTS
  • Profile
    kylix 2000.09.15 21:18
    BlockWrite(FH2, Buffer[1], 10);



    김경태 wrote:

    > 그냥..String을 블록라이트로 쓴 다음에 BlockRead로 읽으면..포인터만 가져오더군요..

    >

    > var

    > Buffer : String;

    > FH2 : FILE;

    > begin

    > Buffer := 'abcdefg';

    > AssignFile(FH2, 'C:WorksLogAnalyzerLogTemp.dat');

    > Rewrite(FH2);

    > BlockWrite(FH2,Buffer, 10);

    > CloseFile(FH2);

    >

    > Buffer := '';

    >

    > AssignFile(FH2, 'C:WorksLogAnalyzerLogTemp.dat');

    > Reset(FH2);

    > BlockRead(FH2,Buffer, 10);

    > CloseFile(FH2);

    > end;

    >

    > 바로이거지요. -_- buffer에 'abcdefg'가 있어야 하는데.. ''가 있군요..

    > 그말은..포인터를 저장했다가 포인터를 읽었단말갔은데 -_-;;;

    > 고수님들의 가르침 부탁드립니다....