현제경로를 사용하지 마시고..
문자:경로;
경로:=경로추출(실행파일명)+"\";
를 사용해주세요..
그리고 환경문에
실수:핸들;
핸들 := 환경열어(현재경로+"\pro_option.ini");
비번 := 환경문읽어(핸들, "Object", "pass", "admin");
환경닫아(핸들);
하지마시고..
문자:환경파일,경로;
실수:핸들;
경로:=경로추출(실행파일명)+"\";
환경파일:=경로+"pro_option.ini";
핸들 := 환경열어(환경파일);
비번 := 환경문읽어(핸들, "Object", "pass", "admin");
환경닫아(핸들);
을써보세요..
그리고 환경파일 이름에는 환경파일을 쓰면되겠죠..
그리고 이곳은..
문자: 그림파일;
만일(파일관리창0.보여(ㅇㅈ열기))
{
실수: 대화결과;
대화결과 := 대화창보여("작업 질문: 적용 여부", "결정하셨으며, 설정을 저장 하시겠습니까?", ㄷㅇ질문, ㄷㅂ예아니오);
만일(대화결과 = ㄷㅊ예)
{
에디트2.문자 := 파일관리창0.파일명;
만일(파일존재여부(환경파일))
{//--------------//}
아니면
{ 파일만들어(환경파일);}
그림파일:=파일관리창0.파일명;
핸들 := 환경열어(현재경로+"\pro_option.ini");
환경문써(핸들, "Object", "image", 그림파일);
환경닫아(핸들);
}
}
이렇게 해보세요..
제가 봐도 다른곳은 잘못된곳이 없네요..
|
|