창조유저그룹-커즈닷컴

질문게시판
- 반드시 검색을 하신 후 원하는 답변을 찾을 수 없을 때, 질문을 올려주세요.

LIST ALL

Posted by 구루™

2003-03-08 22:37:52, Hit : 3733

흑흑 똑같이 했는데 ㅠㅠ

Post URL : http://cugz.sjworks.net/bbs/zboard.php?id=qna&no=415

창조에서 나오는 그 초록색 배경창 있죠?

그거와 비슷하게 구현했지만...

문제는 그림파일입니다.

환경파일에 저장하도록 하고, 실행할때 꺼내 읽고 그림 표시하게 했는데,

이상하게 기록이 안됩니다.

명령어를 보여드리지요;; 혹시 모르니 초기화, 그 버튼의 액션을 함께 올립니다.

---------초기화 명령어-----------
_프로그램제목 := "Puren Object Admin 2003";
실수: 핸들, 완료;
완료 := 0;
문자: 비번;
핸들 := 환경열어(현재경로+"\pro_option.ini");
비번 := 환경문읽어(핸들, "Object", "pass", "admin");
환경닫아(핸들);

----------창1.버튼2 클릭했을때-----------
만일(파일관리창0.보여(ㅇㅈ열기))
{
실수: 대화결과;
대화결과 := 대화창보여("작업 질문: 적용 여부", "결정하셨으며, 설정을 저장 하시겠습니까?", ㄷㅇ질문, ㄷㅂ예아니오);
만일(대화결과 = ㄷㅊ예)
{
에디트2.문자 := 파일관리창0.파일명;
만일(파일존재여부(현재경로+"\pro_option.ini"))
{}
아니면
{ 파일만들어(현재경로+"\pro_option.ini");}
핸들 := 환경열어(현재경로+"\pro_option.ini");
환경문써(핸들, "Object", "image", 파일관리창0.파일명);
환경닫아(핸들);
}
}

-----------창3 생성할때---------------------
문자: 임시;
핸들 := 환경열어(현재경로+"\pro_option.ini");
임시 := 환경문읽어(핸들, "Object", "image", "");
환경닫아(핸들);
만일(임시 = "")
{ 문자창보여("그림 경로 값이 없습니다.");}
아니면
{ 창2.그림판1.그림.파일읽어(임시);}

-----------환경파일(pro_option.ini)-----------
--------------정상모습
[Object]
pass=admin
image=C:\????.jpg
--------------현재모습
[Object]
pass=admin

--------------------------------------------

참고: 에디트2는 파일명을 보여주는 곳입니다.

이상하게도 재실행하면 그림이 떠야 정상인데, 환경파일에 기록조차 되지 않았습니다.