다른 폴더에 있는 파일을 사용하기 위해 OpenDialog를 이용했습니다.
그런데 문제는 열어볼 파일을 선택하지 않고 '취소'버튼을 클릭했을 경우
에러가 납니다.
에러코드는 'Access violation at address 004ED12E in Module 'PRJCMS.EXE. Read do address FFFFFFFF'입니다.
파일을 열어본 것도 아니고 그냥 취소버튼을 클릭했는데도 에러가 나는게
이상해서 이렇게 글을 올립니다.
OpenDialog1.InitialDir := ExtractFilePath(Application.ExeName);
IF OpenDialog1.Execute Then
Begin
sPath := ExtractFilePath(OpenDialog1.FileName);
sFile := ExtractFileName(OpenDialog1.FileName);
sFileName := sPath + sFile;
Memo1.Lines.LoadFromFile(sFileName);
Gauge1.MaxValue := Memo1.Lines.Count-1;
이하생략....
이분까지가 실제로 open Dialog를 사용하는 부분입니다.
IF OpenDialog1.Execute Then
Begin
sPath := ExtractFilePath(OpenDialog1.FileName);
sFile := ExtractFileName(OpenDialog1.FileName);
sFileName := sPath + sFile;
Memo1.Lines.LoadFromFile(sFileName);
Gauge1.MaxValue := Memo1.Lines.Count-1;
....
end;
..... <- 이부문이 에서 에러가 났을꺼에요
취소버튼 누르시면 Begin ... End 문은 타지 않아요..