Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[14152] Re:Re:Re:[질문] TFileStream.Create() 함수에서 Mode 설정???
kylix [] 3618 읽음    2012-03-02 17:45
기존의 파일을 읽으려면 fmOpenRead를 쓰세요

MarunGuy 님이 쓰신 글 :
: 답변 감사합니다.
:
: C 에서처럼 Mode 옵션으로 할 수 있는 방법은 없는건가요?
:
TFileStream.Create(파일명, fmCreate or fmOpenReadWrite)

: 이렇게 하면 항상 새로 파일 생성하더군요.
:
: 일단, 알려준 방법대로 해야겠네요.
:
: kylix 님이 쓰신 글 :
: :
: : 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+");

: : :
: : : 그럼,

+ -

관련 글 리스트
14148 [질문] TFileStream.Create() 함수에서 Mode 설정??? MarunGuy 2765 2012/02/29
14150     Re:[질문] TFileStream.Create() 함수에서 Mode 설정??? kylix 2139 2012/03/02
14151         Re:Re:[질문] TFileStream.Create() 함수에서 Mode 설정??? MarunGuy 1960 2012/03/02
14152             Re:Re:Re:[질문] TFileStream.Create() 함수에서 Mode 설정??? kylix 3618 2012/03/02
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.