if FileExists(파일명) then
  Stream := TFileStream.Create(파일명, fmOpenReadWrite)
else
  Stream := TFileStream.Create(파일명, fmCreate);

MarunGuy 님이 쓰신 글 :
: 안녕하세요.
:
: TFileStream 을 이용하여 파일의 마지막부분에 새로운 내용을 추가하는 다음과 같은 코드를 작성했습니다.
:

:   with TFileStream.Create('testfile.txt', fmOpenReadWrite ) do
:   try
:     Seek(0, soEnd);
:     WriteBuffer(Pointer(LogStr)^, Length(LogStr));
:   finally
:     Free;
:   end;

:
: testfile.txt 이 있을 경우에는 문제없이 동작하지만, testfile.txt 가 없을 경우에는 에러가 발생합니다.
: 파일이 없을 경우에는 새로 생성해서 내용을 추가하고, 있을 경우에는 마지막에 추가할려면 어떻게 해야 하나요?
: C 라면 다음과 같이 하면 되는데, 델파이는 초보인지라 좀 어렵네요..
:

FILE *file = fopen("testfile.txt", "a+");

:
: 그럼,