아래의 내용만가지고는 어디가 잘못되었는지 알수 없습니다.

SaveAsClick 이벤트역시 봐야 하구요...

'제목없음' 이 FFilName의 초기값이 맞는지도 확인해봐야 겠네요.



확인해 보세요.



김종성 께서 말씀하시기를...

> 에디터를 만들고 있는데 "다른이름으로 저장"을 하면 저장이되는

> 화면이 뜨질 않습니다.

> 아래와 같은 방법을 썼는데 저장화면이 나타나질 않습니다.

> 어디가 잘못되었는지 잘 모르겠습니다.

> 내용을 수정하고, 다른이름으로 저장할때 꼭 그런 현상이 나타납니다.

> 에디터 화면에 아무런 내용이 없이 저장을 하면

> "다름이름으로 저장" 화면이 뜨는데...

> 어느부분에서 잘못 되었는지 고쳐주세요!

>

>

> // "파일-다른 이름으로 저장" 메뉴 항목의 이벤트 핸들러

> procedure TForm1.SaveFileItemClick(Sender: TObject);

> begin

> {상태바에 현재 작업내용을 표시함}

> statusbar1.simpletext:='지금 문서를 다른이름으로 저장합니다';

> application.processmessages;

>

> if FFileName = '제목없음' then

> SaveFileAsItemClick(Sender)

> else

> begin

> RichEdit1.Lines.SaveToFile(FFileName);

> RichEdit1.Modified:=False;

> end;

> end;