만물님... 2번째줄 결과는 실수:=문자; 의 결과가 되어버려서 오류가 나네요. 자료형이 다르다고 나오겠네요.
지상현님 올렸던 바로가기 dll을 이용한.. 전에 쓰던 소스 올릴게요. 참고하세요.
파일탐색의 파일선택할때에... 실수:바로가기; 바로가기 := 창0.사용자함수3.GetLinkObject(0); 만일(창0.사용자함수3.LoadLink(바로가기, 파일탐색0.선택파일.부분문자(0))) { 이름표4.제목:=창0.사용자함수3.tfcPath(바로가기, ""); 이름표5.제목:=창0.사용자함수3.tfcArgs(바로가기, ""); 창0.사용자함수3.CloseLinkObject(바로가기); }
파일탐색의 두번클릭했을때에 만일(파일탐색0.선택파일.줄수>0) { 만일(폴더존재여부(파일탐색0.선택파일.부분문자(0))) { 파일탐색0.폴더:=파일탐색0.선택파일.부분문자(0); 나가; }
만일(이름표4.제목<>"" 그리고 이름표5.제목<>"" 그리고 실행파일여부(이름표4.제목)) 실행해(ㅅㅎ열기, 이름표4.제목, 이름표5.제목, ㅊㅂ기본보기); 아니면 만일(이름표4.제목<>"" 그리고 실행파일여부(이름표4.제목)) 실행해(ㅅㅎ열기, 이름표4.제목, "", ㅊㅂ기본보기); 아니면 실행해(ㅅㅎ열기, 파일탐색0.선택파일.부분문자(0), "", ㅊㅂ기본보기); }
|